在窗体上画一个文本框，然后编写如下事件过程：Private Sub Text1_ KeyPress(KeyAscii As Integer) Dim char As String char = Chr(KeyAscii) KeyAscii = Asc(Ucase(char)) Print String(6, KeyAscii)End Sub 程序运行后，如果在键盘上输入字母a，则窗体上显示的内容为______。

A．a

B．A

C．aaaaaa

D．AAA

放炮崩倒支架的原因有哪些？