综合办公系统

excessstone · 发表于 2011-9-1 16:33:12

来看看了,是什么内容

ggtang · 发表于 2011-9-1 17:10:08

感谢分享

908071010@qq.co · 发表于 2011-9-2 13:39:08

第三小时
<>第三小时：将树控件与窗体结合 我们做树控件，当然不可能单单为了显示层级数据，我们希望跟窗体结合，当我们单击树控件中的某个客户时，窗体上能相应的转到这个客户的资料。
<>目的：将树控件与窗体结合 1、我们还是沿用第二个小时里的例子，但在建立窗体时，将窗体的数据来源设为“客户表”，并在窗体中放置好客户表的字段。 2、写入如下代码：
<>

rivate Sub Treeview_NodeClick(ByVal Node As Object) '* ----------------------------------------------------------------- '*树控件的鼠标点击事件为NodeClick '* ----------------------------------------------------------------- Dim str As String '* ----------------------------------------------------------------- '*定义一个筛选 '* ----------------------------------------------------------------- If Node.Text = "销售客户" Or Node.Key Like "父*" Or Node.Key Like "子*" Then str = "" '* ----------------------------------------------------------------- '*在第一小时里,我们说了Node有三个东西,图标,文本,索引值 '*文本就是text,索引值就是Key '这里将就是说当我们点击"爷","父"或"子"层的时候,不筛选窗体 '*这个条件也可写成:If Node.key = "爷" Or Node.Key Like "父*" Or Node.Key Like "子*" Then '* ----------------------------------------------------------------- Else str = "[客户名称]='" & Node.Text & "'" End If Me.Form.FilterOn = True Me.Form.Filter = str '*按指定的条件进行窗体筛选 End Sub
明白了吧，所谓结合窗体，实际不过是进行窗体筛选而已。第三小时结束（5分钟也够了，哈哈）
学习很有乐趣，但写文章却很无聊，如果你通过这篇文章学会了树控件的基本使用，跟个贴吧，也好让我有点成就感。
附上附件

求贤若渴 · 发表于 2011-9-2 18:24:46

等好久哦，终于可以看了，谢谢

kingasd · 发表于 2011-9-3 11:52:17

瞧瞧，学习下

liulubing · 发表于 2011-9-4 08:32:24

真的要学习啊。

liulubing · 发表于 2011-9-4 08:40:16

用户名和密码在那个表里啊。

huangli0356 · 发表于 2011-9-4 09:49:33

努力努力..努力让自己成为高手!

luoye2h · 发表于 2011-9-4 12:12:53

看看

byy3322 · 发表于 2011-9-5 10:17:39

学习一下

帐号		自动登录	找回密码
密码			注册

主题相关群

地区相关群[您还没设置居住地]

综合办公系统

浏览过的版块

群介绍
Access培训群 (792054000)
Access免费培训群2 (792054000)

群介绍
主题无相 (随机显示版	同地区群块其他地区)