把窗体的KeyPreview属性设置为True,然后编写如下事件过程
Private Sub Form_KeyPress(KeyAscii As Integer)
Dim ch As String
ch = Chr(KeyAscii)
KeyAscii = Asc(UCase(ch))
Print Chr(KeyAscii + 2)
End Sub
程序运行后,按键盘上的“A”键,则在窗体上显示的内容是( )。
发布于 2022-05-11 10:19:38
登录后免费查看答案
关注者
0
被浏览
14