以文本方式查看主题 -  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp) --  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2) ----  [求助]当前用户所在的行  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=128897)

--  作者：湛江智 --  发布时间：2018/12/17 19:12:00 --  [求助]当前用户所在的行  光标位置所在行，是当前用户，下面代码怎么修改呢？ 求助 With CurrentTable Dim r As Integer Dim dr As DataRow dr = DataTables("员工资料").Find("姓名 = \'" & _UserName & "\'") \'找出编号为03的产品 If dr IsNot Nothing Then         .Position = r \'则选择当前用户的行     e.Form.Controls("有空天数").text  = dr("有空天数") End If End With 下面这样好像可以了，有问题嘛？ Dim t As Table = Tables("员工资料") For i As Integer = 0 To t.Rows.Count -1     If t.Rows(i)("姓名") = _UserName Then         t.Position = i         Exit For     End If Next [此贴子已经被作者于2018/12/17 19:38:28编辑过]

--  作者：有点蓝 --  发布时间：2018/12/17 20:34:00 --   第二段代码可以，或者参考：http://www.foxtable.com/webhelp/scr/0553.htm