窗体上有文本框Text1，执行下列程序后在文本框输入123abc，单击按钮后输出结果为
Private Sub From_Load()
Text1.Text=""
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
Char=Chr(KeyAscii)
KeyAscii=Asc(UCase(Char))
Eud Sub
Private Sub Command1_Click()
Print Text1.Text
End Sub

A．123ABC

B．ABC

C．!@#ABC

D．123abc