在窗体上画一个文本框，然后编写如下事件过程：程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为（ ）。A. aB. AC. aaaaaaD. AAAAAA
在窗体上画一个文本框，然后编写如下事件过程：
程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为（ ）。
A. a
B. A
C. aaaaaa
D. AAAAAA
相关考题：
在窗体上画一个文本框，然后编写如下事件过程：Private Sub Form_Click（）x = InputBox（"请输入一个整数"）Print x + Text1.TextEnd Sub程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容为（ ）。A．123B．456C．479D．123456
在窗体上画一个文本框，然后编写如下事件过程： Private Sub Form_Click( ) x=InputBox(“请输入一个整数”) Print x+Text1.Text End Sub 程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容为A．123B．456C．579D．123456
在窗体上画一个文本框，然后编写如下事件过程： Private Sub Text1_KeyPress(Key Ascii As Integer) Dim char As String char=Chr(Key Ascii) KeyAscii=Asc(UCase(char)) Text1．Text=Sting(6，KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为______。A．aB．AC．aaaaaaaD．AAAAAAA
在窗体上面有一个文本框，其名称为Text1，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String str=Chr(KeyAscii) KeyAscii=Asc(UCase(str)) TextText=String(2,KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“a”，则在文本框Text1中显示的内容为( )。A．aaaB．AAAC．AAD．aa
在窗体上画一个文本框，然后编写如下事件过程。当该程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为 ______。 Private Sub Text1_KeyPress＜KeyAscii As Integer) Dim char as String char=Chr(KeyAscii) Text1.Text=String(5，KeyAscii) End SubA．aaaaaB．AAAAAC．aaaaaaD．AAAAAA
在窗体上画一个文本框，然后编写如下事件过程：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”，则文本框中显示的内容为______。A．aB．AC．aaaaaaaD．AAAAAAA
在窗体上画一个文本框，其名称为Text1，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim sb As String Str=Chr(KcyAscii) KeyAscii=Asc(UCase(str)) Text1.Text=String(2，KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“b”，则在文本框Text1中显示的内容是A．bbbB．BBBC．BBD．bb
在窗体上画一个文本框，然后编写如下事件过程。当该程序运行后，如果在键盘上输入字母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 SubA．eeeeeB．EEEEEC．eeeeeeD．EEEEEE
在窗体上画一个文本框,其名称为Text1,然后编写如下事件过程:Private Sub Text1_KeyPress(KeyAscii As Integer)Dim str As StringStr=Chr(KeyAscii)KeyAscii=Asc(UCase (str))Textl.Text=String(2, KeyAscii)End Sub程序运行后,如果在键盘上输入字母"b",则在文本框Text1中显示的内容是A．bbbB．BBBC．BBD．bb