关于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

相关问答

Q1: vb.net中，如何通过键盘上的按键触发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

Q2: vb.net中如何执行键盘事件？

执行键盘事件方法如下：

第一步，点击VS工具。

第二步，打开后，新建一个Windows窗体应用程序。

第三步，请看右下方Form的属性栏。

第四步，双击KeyDown。

第五步，输入提示按键代码，如图所示。

第六步，再次输入代码，设置属性KeyPreview为true。

第七步，运行程序，按下举例F5，则会弹出提示，表明已经成功获。