以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  如何设置TabControl下某一页面的按钮图标?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=114276)

--  作者:liufucan
--  发布时间:2018/2/2 10:22:00
--  如何设置TabControl下某一页面的按钮图标?
Dim btn As WinForm.Button
btn = e.Form.Controls("TabControl1").TabPages(2).Controls("Button1")
btn.Image = GetImage("Accept.Ico")

这样写报错

--  作者:有点甜
--  发布时间:2018/2/2 10:29:00
--  

没必要这样写吧?直接写

 

e.form.controls("Button1").Image = GetImage("Accept.ico")


--  作者:有点甜
--  发布时间:2018/2/2 10:30:00
--  

最好具体一点你的问题,你的页面、按钮,是如何添加进来的,尽量用实例说明。


--  作者:liufucan
--  发布时间:2018/2/2 10:37:00
--  
如果不同页面有相同的按钮名会怎么样呢
--  作者:有点甜
--  发布时间:2018/2/2 10:57:00
--  
以下是引用liufucan在2018/2/2 10:37:00的发言:
如果不同页面有相同的按钮名会怎么样呢

 

正常使用foxtable添加按钮,是不允许你重名的。

 

如果确实存在那样的问题,就这样写代码,如

 

Dim tab = e.form.controls("tabcontrol1").basecontrol
Dim o = tab.tabpages(1).controls("label2")
msgbox(o.name)