把窗体的KeyPreview属性设置为True 然后编写如下事件过程 Private Sub Form_KeyPress(KeyAseii A
把窗体的KeyPreview属性设置为True,然后编写如下事件过程
Private Sub Form_KeyPress(KeyAseii As Integer)
Dim ch As String
ch=Chr(KeyAscii)
KeyAscii=Ase(UCase(ch))
Print Chr(KcyAseii+2)
End Sub
程序运行后,按键盘上的“A”键,则在窗体上显示的内容是
A.A
B.B
C.C
D.D
请帮忙给出正确答案和分析,谢谢!