把窗体的KeyPreview属性设置为True,然后编写如下事件过程 Privat
问题:
把窗体的KeyPreview属性设置为True,然后编写如下事件过程 Private Sub Form_KeyPress(KeyAscii As Integer) Dim ch As Stringch=Chr(KeyAscii)KeyAscii=Asc(UCase(ch))PrintChr(KeyAscii+2) End Sub 程序运行后,按键盘上的“A”键,则在窗体上显示的内容是
A.A
B.B
C.C
D.D