以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]怎样返回我点击的窗口中按钮的名称?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=148146)

--  作者:hitzfeld
--  发布时间:2020/4/1 0:24:00
--  [求助]怎样返回我点击的窗口中按钮的名称?
 之前学习了返回控件中的子项的名称,比如返回页面集合中页签的值

Dim tab As WinForm.TabControl = e.Form.Controls("TabControl1")
msgbox(tab.SelectedPage.text)

但是在学习返回按钮的值的时候,我发现如果要返回按钮的值,必须定义按钮的名称,代码如下
Dim btn As WinForm.Button = e.Form.Controls("button1")
msgbox(btn.text)

问题是:我想做一个通用代码,希望返回的是我当前点击的这个按钮的标题,而不需要事先定义名称,能写吗?

--  作者:有点蓝
--  发布时间:2020/4/1 8:56:00
--  
按钮点击click事件

msgbox(e.sender.text)