以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]按钮  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=106095)

--  作者:苏州老街
--  发布时间:2017/9/1 20:20:00
--  [求助]按钮
老师,窗口有好多按钮是用来隐藏或显示面板的,我想知道当前使用的是哪一个按钮,用样式或按钮的属性来突出正在使用的按钮。
--  作者:有点蓝
--  发布时间:2017/9/1 20:47:00
--  
http://www.foxtable.com/webhelp/scr/0732.htm

msgbox(e.Sender.name)

--  作者:苏州老街
--  发布时间:2017/9/2 9:28:00
--  
老师,我希望按下按钮后样式发生变化然后按下另一个按钮后样式恢复原状。
--  作者:有点蓝
--  发布时间:2017/9/2 10:10:00
--  
使用全局变量记录最后一次按下的按钮的名称
--  作者:苏州老街
--  发布时间:2017/9/2 10:41:00
--  
老师,给我设置吧
--  作者:有点蓝
--  发布时间:2017/9/2 11:08:00
--  
按钮1事件

\'按钮1其它代码
vars("anniu") = "按钮1"

按钮2事件

if vars("anniu") > "" then
  Dim btn As WinForm.Button = e.Form.Controls(vars("anniu") )
按钮1的样式设置
end if
\'按钮2其它代码
vars("anniu") = "按钮2"