以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  帮忙在这个例子中解决:点击目录节点定位到行  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=64256)

--  作者:able
--  发布时间:2015/2/9 0:22:00
--  帮忙在这个例子中解决:点击目录节点定位到行
帮忙在这个例子中解决:点击目录节点定位到行
这是我狐表帮助里面的例子,我需要点击目录树的节点,返回该节点所在的行;
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:递归函数.foxdb



--  作者:Bin
--  发布时间:2015/2/9 8:38:00
--  
利用FIND   
dim dr as datarow = datatables("表A").find("标题=\'" & e.node.text  & "\'")

--  作者:有点甜
--  发布时间:2015/2/9 9:06:00
--  

已经告诉过你了啦。

 

1、给tag赋值;

 

2、用find函数查找行啊


--  作者:e-png
--  发布时间:2015/2/9 16:03:00
--  
新手好可怜啊:

Dim tr As WinForm.TreeView = Forms("窗口1").Controls("TreeView1")
Dim nd As WinForm.TreeNode = tr.SelectedNode
With Tables("表A")
    Dim r As Integer
    r = .FindRow("[标题] = \'" & nd.text & "\'") 
    If r >= 0 Then 
        .Position = r 
    End If
End With