单选题：在窗体上画一个文本框和一个标签，其名称分别为Text1和Labell，然后编写如下事件过程：Private Sub Te

在窗体上画一个文本框和一个标签，其名称分别为Text1和Labell，然后编写如下事件过程：
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim char As String
char=Chr(KeyAscii)
KeyAscii=Asc(UCase(char))
Label 1.Caption=String(4，KeyAscii)
End Sub
程序运行后，使文本框拥有焦点，此时如果在键盘上输入字母“a”，则标签中显示的内容为（　　） A．aaa
B．AAA
C．aaaa
D．AAAA