以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教:窗口插入筛选树后,如何实现Expandall功能?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=193723)

--  作者:y2287958
--  发布时间:2024/10/8 11:28:00
--  请教:窗口插入筛选树后,如何实现Expandall功能?
如题,谢谢


--  作者:有点蓝
--  发布时间:2024/10/8 11:35:00
--  
使用basecontrol获取底层的.net目录树控件,然后Expandall
--  作者:y2287958
--  发布时间:2024/10/8 11:38:00
--  
Dim 内置筛选树 As WinForm.FilterTree = Forms("分组").Controls("FilterTree1")
内置筛选树.BaseControl.Expandall

提示:
错误
---------------------------
编译错误:“Expandall”不是“System.Windows.Forms.Control”的成员。

错误代码:内置筛选树.BaseControl.Expandall
---------------------------
确定   
---------------------------



--  作者:y2287958
--  发布时间:2024/10/8 11:47:00
--  
搞定了,要直接用。
Forms("分组").Controls("FilterTree1").BaseControl.Expandall

或者声明为Object类型也可
[此贴子已经被作者于2024/10/8 11:48:43编辑过]