设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 2763|回复: 6
打印 上一主题 下一主题

为什么会没法实现树形控件与子窗体查询的功能

[复制链接]
跳转到指定楼层
1#
发表于 2009-8-4 16:04:27 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
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

我就想让单击节点时根据节点的名字在子窗体中实现查询
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2009-8-11 11:52:14 | 只看该作者
tong wen
3#
发表于 2009-8-11 11:53:22 | 只看该作者
tong wen
4#
发表于 2009-10-25 19:45:48 | 只看该作者
我也在找
5#
发表于 2009-10-25 19:46:08 | 只看该作者
哪位高人指点一下
6#
发表于 2015-9-23 08:42:25 | 只看该作者
没有完整的代码

点击这里给我发消息

7#
发表于 2015-12-13 09:19:14 | 只看该作者
把代码改成这样试试看(我也是在学习,共同探索吧)
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
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-5-23 21:14 , Processed in 0.096215 second(s), 30 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表