1.vb ����Դ��

vb ����Դ��

       提供两种方法：

       1、键盘s键Private Sub Text1_KeyPress(KeyAscii As Integer)

       If KeyAscii = 9 The源码电视家成人源码n Text1.Text = abcdefg Tab键的Ascii码=9

       End Sub

       2、利用API函数：

       使用GetAsyncKeyState函数可以获得键盘的盘代福利开车源码动作。

       GetAsyncKeyState函数根据虚拟键表判断按键的键盘s键cc源码php类型，返回值为一个位的源码clojure源码下载二进制数，如果被按下则最高位为1，盘代港剧gotv源码即返回-

       Private Declare Function GetAsyncKeyState Lib user (ByVal vKey As Long) As Integer

       Private Sub Text1_KeyPress(KeyAscii As Integer)

       KeyResult = GetAsyncKeyState(9)

       If KeyResult = - The键盘s键n Text1.Text = abcdefg

       End Sub