以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]切换页面  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=105950)

--  作者:blsu33
--  发布时间:2017/8/29 18:44:00
--  [求助]切换页面
 老师,

Dim tab  As WinForm.TabControl = e.Form.Controls("TabControl1")
tab.Select
Dim pg As WinForm.TabPage = tab.TabPages(“page2”)
tab.SelectedPage = pg
上述代码想要用
TabPage名字切换到对应页面,但是发现页面没有跟着变化,如何能切换呢?

 


[此贴子已经被作者于2017/8/29 18:53:54编辑过]

--  作者:blsu33
--  发布时间:2017/8/29 18:53:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:复件 管理项目3.foxdb


--  作者:有点蓝
--  发布时间:2017/8/29 20:33:00
--  
Dim tab1 As WinForm.TabControl = e.Form.Controls("TabControl1")
Dim tab2  As WinForm.TabControl = e.Form.Controls("TabControl2")
tab1.SelectedPage = tab1.TabPages("page2")
tab2.SelectedPage = tab2.TabPages("page2")

--  作者:blsu33
--  发布时间:2017/8/30 13:54:00
--  
 老师,
    可以一键搞定吗,不用判断TabControl1 TabControl2,因为太多的 TabControl 叠加在一起,不是很好判断

--  作者:有点甜
--  发布时间:2017/8/30 14:22:00
--  
 循环每一个控件,或者根据tabcontrol的名字循环每一个,然后设置SelectedPage