以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  修改并列窗口主窗口的标题？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=104298)
--  作者：ywlin521
--  发布时间：2017/7/27 7:44:00
--  修改并列窗口主窗口的标题？
修改并列窗口主窗口的标题？ 谢谢
--  作者：有点甜
--  发布时间：2017/7/27 8:44:00
--  

窗口的AfterLoad事件

 

dim tab = e.form.panel.parent.parent
tab.tabpages(0).text = "123"

 

或者做个按钮修改

 

dim tab = forms("窗口1").panel.parent.parent
tab.tabpages(0).text = "123"
--  作者：ywlin521
--  发布时间：2017/7/27 14:32:00
--  
错误提示：panel不是win form的成员？
--  作者：有点甜
--  发布时间：2017/7/27 15:24:00
--  
以下是引用ywlin521在2017/7/27 14:32:00的发言：
错误提示：panel不是win form的成员？

 

你用的是什么版本的foxtable？升级到最新版。
--  作者：ywlin521
--  发布时间：2017/7/27 15:35:00
--  
升级不了了，那该怎么办
--  作者：有点甜
--  发布时间：2017/7/27 15:58:00
--  

试试这样写

 

Dim tab = forms("窗口1").controls("button1").basecontrol.parent.parent
tab.tabpages(0).text = "123"


 

或者这样

 

Dim tab = forms("窗口1").controls("button1").basecontrol.parent.parent.parent
tab.tabpages(0).text = "123"

[此贴子已经被作者于2017/7/27 15:58:01编辑过]
--  作者：ywlin521
--  发布时间：2017/7/31 8:57:00
--  
直接隐藏，怎么写代码
--  作者：有点甜
--  发布时间：2017/7/31 9:33:00
--  
Dim tab = forms("窗口1").panel.parent.parent
tab.tabpages(0).text = ""
tab.tabpages(0).enabled = False
--  作者：ywlin521
--  发布时间：2017/7/31 20:55:00
--  
Dim tab as 什么类型
--  作者：有点蓝
--  发布时间：2017/7/31 21:41:00
--  
不需要设置类型，按8楼用即可