vb点虐 中，如何通过键盘上的按键触发button _click事件

1、将窗口的KeyPreview属性设置为True

公司主营业务：网站制作、成都网站建设、移动网站开发等业务。帮助企业客户真正实现互联网宣传，提高企业的竞争能力。创新互联建站是一支青春激扬、勤奋敬业、活力青春激扬、勤奋敬业、活力澎湃、和谐高效的团队。公司秉承以“开放、自由、严谨、自律”为核心的企业文化，感谢他们对我们的高要求，感谢他们从不同领域给我们带来的挑战，让我们激情的团队有机会用头脑与智慧不断的给客户带来惊喜。创新互联建站推出肥西免费做网站回馈大家。

Me.KeyPreview = True

2、处理窗口的KeyDown事件

Sub MainFormKeyDown(sender As Object, e As KeyEventArgs)

Select Case e.KeyCode

Case Keys.Escape

Me.button1.PerformClick

Case Keys.Enter

Me.button2.PerformClick

End Select

End Sub

怎样自动点击一个按钮（VB.NET）

vb我不是很会，我给你说个思路吧。timer控件设定计时开始和速度，假设为一秒一下。在timer事件中调用button的单击事件，当然timer中还需要定义一个变量，用来做自增运算，一遍计算运行的时间。当变量到100后，弹出窗口提示完成，timer控件停止就行了。如果还是不明白我可以给你编个c#的代码，只要是vb的语法不是很会。

vb点虐 如何触发excel内的一个按钮的单击事件

一定要先在VB中添加excel引用。

在工程中引用Microsoft Excel类型库： 从"工程"菜单中选择"引用"栏；选择Microsoft Excel 11.0 Object Library（EXCEL2003），然后选择"确定"。表示在工程中要引用EXCEL类型库。

调用excel的工作表中的命令按钮，代码如下：

Private Sub Command1_Click()

Dim xlApp As Excel.Application

Dim xlBook As Excel.WorkBook

Dim xlSheet As Excel.Worksheet

Dim FileName, SheetName As String

FileName = "e:\data.xls" '打开的工作簿路径名称

SheetName = "sheet1" '命令按钮所在的工作表名

Set xlApp = CreateObject("Excel.Application") '创建EXCEL对象

Set xlBook = xlApp.Workbooks.Open(FileName) '打开已经存在的EXCEL工件簿文件

……

xlBook.Close (True) '保存并关闭工作簿

xlApp.Quit '结束EXCEL对象

Set xlApp = Nothing '释放xlApp对象

end sub

vb点虐 timer控件触发按钮的click事件

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

m = m + 1

n = m.tostring

TextBox1.Text = n

End Sub

m=m+1

n = m.tostring

textbox1.text = n

把这几句原来在button2 click事件里面的代码，直接写在 timer事件里面，把timer的Enabled属性设置为True, Interval属性设置为1000，就可以了。

分享文章：vb点虐 自动触发按钮 vbs脚本自动点击窗口内按钮
转载注明：http://cdweb.net/article/ddcjcjh.html