更多"在窗体上画一个文本框(其Name属性为Text1)，然后编写如下事件过"的相关试题:
[单项选择]在窗体上画一个文本框(其Name属性为Text1)，然后编写如下事件过程： Private Sub Form_Load（ ） Text1.Text="" Text1.SetFocus For i=1 To 9 Sum=Sum+i Next i Text1.Text=Sum End Sub 上述程序的运行结果是
A. 在文本框Text1中输出45
B. 在文本框Text1中输出0
C. 出错
D. 在文本框Text1中输出不定值
[单项选择]在窗体上画一个文本框，然后编写如下事件过程： 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. a
B. A
C. aaaaaaa
D. 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. bbb
B. BBB
C. BB
D. bb
[单项选择]在窗体上画一个文本框(Textl)，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(Ucase(char)) Print String(4，KeyAscii) End Sub 程序运行后，在文本框Text1中输入A，则程序在窗体上的输出结果为
A. a
B. A
C. aaaa
D. AAAA
[单项选择]
窗体上有名称为Command1的命令按钮和名称为Text1的文本框
Private Sub Command1_Click（ ）
Text1.Text=”程序设计”
Text1.SetFocus
End Sub
Private Sub Text1_GotFocus（ ）
Text1.Text=”等级考试”
End Sub
运行以上程序，单击命令按钮后
A. 文本框中显示的是“程序设计”，且焦点在文本框中
B. 文本框中显示的是“等级考试”，且焦点在文本框中
C. 文本框中显示的是“程序设计”，且焦点在命令按钮上
D. 文本框中显示的是“等级考试”，且焦点在命令按钮上
[单项选择]窗体上添加一个文本框Text1，编写如下代码： Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer) Print Chr(KeyCode+5)&KeyCode End sub 程序运行时，在文本框中输入“ab”，则在窗体上输出为( )。
A. F65 G66
B. F65 F66
C. G66 F65
D. G65 G66
[单项选择]窗体上添加一个文本框Text1，编写下列代码： Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode+5)& KeyCode End Sub 程序运行时，在文本框中输入“ab”，则在窗体上输出为( )。
A. F65 G66
B. F65 F66
C. G66 F65
D. G65 G66
[单项选择]在窗体上放一个文本框Text1，在文本框中输入456，并有如下事件过程： Private Sub Form_Click（ ） x=InputBox("请输入一个整数") Print x+Text1.Text End Sub 单击该窗体，在输入对话框中输入123，单击“确定”按钮后，窗体上显示是( )。
A. 123
B. 456
C. 579
D. 123456
[单项选择]在窗体上放一个文本框Text1，在文本框中输入456，并有下列事件过程：
Private Sub Form_Click（ ）
x=InputBox("请输入一个整数")
Print x+Text1.Text
End Sub
单击该窗体，在输入对话框中输入123，单击“确定”按钮后，窗体上显示的是( )。
A. 123
B. 456
C. 579
D. 123456
[单项选择]在窗体上面有一个文本框，其名称为Text1，编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String str=Chr(KeyAscii) KeyAscii=Asc(UCase(str)) Text1.Text=String(2，KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“a”，则在文本框Text3中显示的内容为( )。
A. aaa
B. AAA
C. AA
D. aa
