以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]在表中查找目录树所选定值的行! (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=129742) |
-- 作者:bashanren -- 发布时间:2019/1/4 22:34:00 -- [求助]在表中查找目录树所选定值的行! 各位老师晚上辛苦了!! 我在“valuechanged”中写下如下代码,但没任何反应,请老师们指导。 If Tables("员工资料").Position >= 0 Then Vars("ddr") = Tables("员工资料").current.DataRow If Vars("ddr") IsNot Nothing Then Tables("员工资料").Position = Tables("员工资料").FindRow(Vars("ddr")) End If End If |
-- 作者:bashanren -- 发布时间:2019/1/4 22:47:00 -- 谢谢大家关注,我已经找到方法了!我的代码如下,供刚学狐表的朋友参考! Dim str As String = e.Sender.Value Dim i As Integer = Tables("员工资料").FindRow("姓名 = \'" & str & "\'") If i >= 0 Then Tables("员工资料").Position = i Else msgbox("没找到") End If [此贴子已经被作者于2019/1/4 22:47:46编辑过]
|