以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]遍历页面集合TabControl中的每个tabpage中的控件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=194552)

--  作者:chnfo
--  发布时间:2024/12/20 14:33:00
--  [求助]遍历页面集合TabControl中的每个tabpage中的控件
TabControl中有多个tabpage,每个tabpage中又有各自不同的控件

如何获取其中任意一个tabpage(例如第2个tabpage)中有哪些控件?

--  作者:有点蓝
--  发布时间:2024/12/20 14:47:00
--  
http://www.foxtable.com/webhelp/topics/0835.htm


Dim pg As WinForm.TabPage
pg = Forms("窗口1").Controls("TabControl1").TabPages(1)

For Each c As Winform.Control In pg.Children
   msgbox(c.name)

Next