[单项选择题] 在窗体上画一个文本框(Textl)，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer)Dim char As St

[单项选择题] 在窗体上画一个文本框(Textl)，然后编写如下事件过程：

Private Sub Text1_KeyPress(KeyAscii As Integer)

Dim char As String

char=Chr(KeyAscii)

KeyAscii=Asc(Ucase(char))

Print String(4，KeyAscii)

End Sub

程序运行后，在文本框Text1中输入A，则程序在窗体上的输出结果为

A．a

B．A

C．aaaa

D．AAAA