在窗体上画一个文本框，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(Ucase(char)) Print String(6，KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“a”，则在窗体上显示的内容为

A．Dim A(9)As Integer
B．Dim A(3，3)As Integer
C．Dwn A(-1 to 1，-3 to -1)As Single
D．Dim A(-3 to -1，1 to 3)As Integer