单选题 在窗体上画一个文本框，其名称为Text1，然后编写以下程序： Prirate Sub Form—Load() Show Textl．Text=“” Textl．SetFocus End Sub Private Sub Textl—KeyPress(KeyAscii As Integer) Char=Chr(KeyAscii) KeyAscii=Ase(UCase(Char)) End Sub 以上程序的功能是( )。