问题:
[单选] 在窗体上有一个文本框,其名称为Text1,编写下列事件过程:
Private Sub Text1_KeyPress(KeyAscii As Integer)
Di mstr As Stri ng
str =Chr(KeyAscii)
KeyAscii =Asc(UCase(str))
Text1.Text =Stri ng(2,KeyAscii)
End Sub
程序运行后,如果在键盘上输入字母"a",则在文本框Text3中显示的内容为( )。
A . aaa
B . AAA
C . AA
D . aa