把窗体的KeyPreview属性设置为True,然后编写如下事件过程（KeyAscii As Integer)Dim ch As St

把窗体的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