Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
请问:
如果树和table二个控件在一个界面上,点击树中一个节点(如“华东\上海\西藏中路”),要让table控件上表的光标移到相应位置, 这个代码怎么写?
(注意,我的表是单字段树,如“华东\上海\西藏中路”是在一个字段上的。)
树是为了找到表中相应数据.我想修改树节点的名称,然后存到表中相应的行.
这个软件的树跟表是脱离的,你插入了树节点并保存到表后,你会发现插入的节点把表中的树往下挤了一位,后面的树不在原来的位置了.
树的nodemouseclike事件写如下代码,但出错,请帮忙看一下:
Dim Value() As String
Value = e.Node.FullPath.Split("\")
With CurrentTable
Dim r As Integer
r = .FindRow("[树] Like " & Value(0) & "\" & Value(1) & "\" & Value(2) , .Position + 1, True ) '从当前行开始查找
If r >= 0 Then '如果找到的话
.Position = r '定位到找到的行.
End If
End With
With CurrentTable
Dim r As Integer
r = .FindRow("[树] = '" & e.Node.FullPath & "'", 0,True ) '从当前行开始查找
If r >= 0 Then '如果找到的话
.Position = r '定位到找到的行.
End If
End With