【单选题】在窗体上画一个文本框,然后编写如下事件过程: 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”,则在窗体上显示的内容为
【单选题】在窗体上画一个文本框,然后编写如下事件过程: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,则窗体上显示的内容为...
【单选题】在窗体上画一个文本框,然后编写如下事件过程:Private Sub Text1_ KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(UCase(char)) Text1. Text= String(6,KeyAscii)End Sub程序运行后,如果在键盘上输入字母“a”,则文本框中显示...