VB6中KeyPress事件以及用Excel获得ASCII码

时间:2026-02-14 14:16:05

1、先来看一下我们需要演示的效果,窗体会打印我们所按下的字母,并且当按下大写A的时候会弹出对话框。

VB6中KeyPress事件以及用Excel获得ASCII码

2、程序只有一个窗体比较简单,修改一下标题Caption属性即可。

VB6中KeyPress事件以及用Excel获得ASCII码

3、在代码窗口里找到窗体的KeyPress事件,它会自动给你生成代码块。

VB6中KeyPress事件以及用Excel获得ASCII码

4、在刚才生成的代码块里输入

  Form1.Cls

  S = S + Chr$(KeyAscii)

  Print S

即可显示你按下的键,但是它只会显示一个,如果要像打字一样记录还需要在代码块前面加入Dim S As String对S变量声明。

VB6中KeyPress事件以及用Excel获得ASCII码

5、如果在实践中需要判断按下的什么键再执行不同操作则需要用IF语句,比如:

  If KeyAscii = 65 Then

    MsgBox "你按下的是大写A!"

  End If

就是当按下的是大写A时弹出窗口。

VB6中KeyPress事件以及用Excel获得ASCII码

6、上面代码中的65代表的是大写A的ASCII值,如果需要其他键可以在网上搜索ASCII表,不能上网也没有关系,可以利用Excel查找各个字母对应的ASCII值。

VB6中KeyPress事件以及用Excel获得ASCII码

7、具体怎么做呢,比如我们知道65是A,就从65开始填一行数字,如果不知道也没关系,直接从0开始,因为ASCII表是从0-127。然后在旁边用char函数就可以得出该数字对应的字母。

VB6中KeyPress事件以及用Excel获得ASCII码

© 2026 长短途
信息来自网络 所有数据仅供参考
有疑问请联系站长 site.kefu@gmail.com