标题: 为什么会没法实现树形控件与子窗体查询的功能 [打印本页] 作者: alice123!! 时间: 2009-8-4 16:04 标题: 为什么会没法实现树形控件与子窗体查询的功能 Private Sub Treeview_NodeClick(ByVal Node As Object)
Dim str As String
IF str = "[名称]='" & Node.Text & "'" Then
Me.Form.FilterOn = True
Me.Form.Filter = str
END if
我就想让单击节点时根据节点的名字在子窗体中实现查询作者: basiliskspread 时间: 2009-8-11 11:52
tong wen作者: basiliskspread 时间: 2009-8-11 11:53
tong wen作者: zcw728909 时间: 2009-10-25 19:45
我也在找作者: zcw728909 时间: 2009-10-25 19:46
哪位高人指点一下作者: 黍离 时间: 2015-9-23 08:42
没有完整的代码作者: WFH6898 时间: 2015-12-13 09:19
把代码改成这样试试看(我也是在学习,共同探索吧)
Private Sub Treeview_NodeClick(ByVal Node As Object)
Dim str As String
If Node.Text = "[名称]" Then
str = "[名称]='" & Node.Text & "'"
Else
str = ""
End If
Me.Form.FilterOn = True
Me.Form.Filter = str
End Sub