以文本方式查看主题

-  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=12366)

--  作者:飞
--  发布时间:2011/8/31 12:23:00
--  [求助]如何调用控件的事件

使用独立窗口的时候发现窗口没有默认按钮的属性,也不像VB6的按钮有defalute属性,所以想在窗口全局事件中按下回车键就调用按钮事件,不用去点按钮,现在问题是如何能调用按钮事件,类似于VB的 Call CommandButton1_Click

[此贴子已经被作者于2011-8-31 12:26:20编辑过]

--  作者:hhbb
--  发布时间:2011/8/31 12:35:00
--  

PerformClick

模拟单击此按钮。

示例

假定窗口有两个按钮,单击按钮1执行A操作,单击按钮2执行A、B两项操作,我们可以将按钮2的Click事件代码设置为:

Dim btn As WinForm.Button = Forms("窗口1").Controls("Button1")
btn.PerformClick()
\'B操作代码

这样就无需重复在两个按钮中编写A操作的代码,只需在按钮1中编写一次即可。