问题详情

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