【单选题】

在窗体上面有一个文本框，其名称为Text1，编写如下事件过程：

Private Sub Text1_KeyPress(KeyAsciiAs Integer)
Dims strAs String
str=Chr(KeyAscii)
KeyAseii=Asc(UCase(str))
Text1.Text=String(2，KeyAscii)
End Sub
程序运行后，如果在键盘上输入字母“a”，则在文本框Text3中显示的内容为()。
A．aaa
B．AAA
C．AA
D．aa