| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 根据指定的条件表达式查找行找不到 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=168959) |
| -- 作者：hongyaoyu2019 -- 发布时间：2021/5/28 13:54:00 -- 根据指定的条件表达式查找行找不到 Dim str As String = e.Sender.Text Dim drsc As DataRow drsc = DataTables("绿建国标条款内部表").Find("[条款描述收藏] = \'str\'") If drsc IsNot Nothing Then Dim wz As Object = Tables("绿建国标条款内部表").FindRow(drsc) If wz >= 0 Then Tables("绿建国标条款内部表").Position = wz End If End If |
| -- 作者：有点蓝 -- 发布时间：2021/5/28 14:01:00 -- 先看2遍：http://www.foxtable.com/webhelp/topics/1284.htm drsc = DataTables("绿建国标条款内部表").Find("[条款描述收藏] = \'" & str & "\'") FindRow帮助再看看，没有必要查2次：http://www.foxtable.com/webhelp/topics/0553.htm Dim wz As Object = Tables("绿建国标条款内部表").FindRow("[条款描述收藏] = \'" & str & "\'") If wz >= 0 Then Tables("绿建国标条款内部表").Position = wz End If |
| -- 作者：hongyaoyu2019 -- 发布时间：2021/5/28 14:22:00 -- 谢谢，问题已经解决了 |