正文
vb.net按钮触发事件的简单介绍
小程序:扫一扫查出行
【扫一扫了解最新限行尾号】
复制小程序
【扫一扫了解最新限行尾号】
复制小程序
vb.net的,按键连续触发事件,比如,按着键不放,音量增大。
1.定义变量记录键是否被按下,按下的累计时间
Dim 按下A键 As Boolean
Dim 按下A键时间 As Integer
2.添加一个TextBox1用于接收键盘事件,或者直接用窗体的键盘事件(确保KeyPreview为True)
在KeyDown事件中添加如下代码:
If e.Keycode = keys.A Then 按下A键 = True
在KeyUp事件中添加如下代码:
If e.Keycode = keys.A Then 按下A键 = False
3.添加一个Timer1控件,调整Timer1的Interval来决定按键频率,记得要把Timer1.Enable开启
在Tick事件中添加如下代码:
If 按下A键 = True
按下A键时间+=1
Call 音量设置(按下A键时间 * 10)
End If
PS: 按下的秒数 = 按下A键时间*Timer1.Interval / 1000
vb.net 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.net RadioButton控件设置cheked时会触发单击事件的问题。。。
表示刚才亲自测试vb.net按钮触发事件,建立以个Formvb.net按钮触发事件,拖vb.net按钮触发事件了一个Panel,在Panel里面放了3个RadioButton(默认Checked就是False),然后启动,发现第一个被选中了,
然后双击了一下它,跳到代码页面,在启动,第二个被选中,双击第二个和第三个,此时再代码一面出现了3个按钮vb.net按钮触发事件的事件,在三个事件都设好断点,启动程序,发现3个都没有被选中了,而且也没执行任何一个事件。
VB.NET中按下ENTER键如何激发事件
Private Sub Form1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
If e.KeyCode = Keys.Enter Then....................... End If End Sub
vb.net如何触发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.net按钮触发事件的介绍就聊到这里吧,感谢你花时间阅读本站内容,更多关于、vb.net按钮触发事件的信息别忘了在本站进行查找喔。