以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何要点击窗口中的设计好的button, 命令窗口中的代码如何写?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=7131)

--  作者:tsi2007
--  发布时间:2010/5/18 21:46:00
--  如何要点击窗口中的设计好的button, 命令窗口中的代码如何写?
如何要点击窗口中设计好的button, 命令窗口中的代码如何写? winform.controls("button1").click ?

--  作者:lxl
--  发布时间:2010/5/18 21:50:00
--  
Forms("窗口1").Controls("Button1").Performclick
--  作者:tsi2007
--  发布时间:2010/5/19 8:49:00
--  
以下是引用lxl在2010-5-18 21:50:00的发言:
Forms("窗口1").Controls("Button1").Performclick

果然成功,谢谢!


--  作者:ybmjy
--  发布时间:2010/5/19 10:18:00
--  
以下是引用lxl在2010-5-18 21:50:00的发言:
Forms("窗口1").Controls("Button1").Performclick

版主,你们是不是吃的小灶哟,Performclick 这些命令朗个帮助中就没有安


--  作者:狐狸爸爸
--  发布时间:2010/5/19 10:20:00
--  
以下是引用ybmjy在2010-5-19 10:18:00的发言:

版主,你们是不是吃的小灶哟,Performclick 这些命令朗个帮助中就没有安

 

呵呵,版主可没有小灶吃的,你搜索帮助,绝对有Performclick的说明


--  作者:yangming
--  发布时间:2010/5/19 11:57:00
--  

方法

标准按钮的方法:

  • PerformClick
    模拟单击该按钮。

示例

Dim btn As RibbonMenu.Button
btn = RibbonTabs(
"Common").Groups("Data").Items("DeleteRow")
btn.PerformClick()

如果你用的是系统菜单,执行上面的代码会删除选定行,因为这段代码模拟单击删除行按钮。


--  作者:lxl
--  发布时间:2010/5/19 17:13:00
--  
以下是引用ybmjy在2010-5-19 10:18:00的发言:

版主,你们是不是吃的小灶哟,Performclick 这些命令朗个帮助中就没有安

呵呵,你应该是四川的吧,我也是。