单项选择题

在窗体上画一个文本框,然后编写如下事件过程。当该程序运行后,如果在键盘上输入字母e,则文本框中显示的内容为 ______。
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim char as String
char=Chr(KeyAscii)
KeyAscii=Asc(UCase(char))
Text1.Text=String(5,KeyAscii)
End Sub

A.eeeee
B.EEEEE
C.eeeeee
D.EEEEEE