有关树型控件按条件定位到指定层的问题？（已解决）

wmok · 发表于 2006-10-6 19:41:00

我有个考勤系统，想在打开窗体的时候以当天日期为条件，定位到树型中的当天日期上。。。。,或是指定在打开窗体的时候默认打开到第三层也行。。。。附图。。。。

[此贴子已经被作者于2006-10-7 13:02:19编辑过]

wuaza · 发表于 2006-10-6 21:05:00

给你一段代码，仅供参考：

Dim q As Integer
For q = 1 To trvw.nodes.Count - 1
      '展开当前节点
      If trvw.nodes(q).text = date() Then
      trvw.nodes(q).Expanded = True
      End If
next q

wmok · 发表于 2006-10-6 21:14:00

谢谢，上面代码我在概可以看懂，我试过还是不行。。。。

wuaza · 发表于 2006-10-6 21:26:00

你再调试一下，日期前后要加“#”。

wmok · 发表于 2006-10-6 21:48:00

我加了“#”，而且也用了

format(Form_KQ考勤记录管理.TreeView.Nodes(q).Text,"yyyy-mm-dd")还是不行。。。。555

fan0217 · 发表于 2006-10-6 22:18:00

上传例子

wmok · 发表于 2006-10-6 22:47:00

好，马上做个例子传上来。。。。

wmok · 发表于 2006-10-6 23:01:00

fan0217 · 发表于 2006-10-7 03:27:00

看看是否是这样的，其实子需要一个表就可以了。

日期没有排序，这就要你自己动手了。

wmok · 发表于 2006-10-7 09:51:00

谢谢！！

只是能否做到这样的效果：如果今天是2006-10-5日，可否设计成在打开窗体将光标自动定位到树型上的2006-10-5上？

如图这样

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

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

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

[与其它组件] 有关树型控件按条件定位到指定层的问题？（已解决）

本帖子中包含更多资源

这是例子

本帖子中包含更多资源

本帖子中包含更多资源

本帖子中包含更多资源

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