更多"在程序中添加一个命令按钮和两个文本框，并在命令按钮中编写如下代码： "的相关试题:
[单项选择]在窗体中添加一个命令按钮和一个文本框，并编写如下程序代码： Private Sub Command1_Click（ ） k=0 Do While k ＜ 70 k=k+2 k=k*k+k a=a+k Loop Text1．Text=a End Sub 程序运行后，文本框中显示的是
A. 20
B. 32
C. 44
D. 78
[单项选择]在窗体上画一个文本框，然后编写如下程序： Option Base 1 Private Sub Form_Click（ ） Dim Arr(10)As Integer For i=6 To 10 Arr(i)=i-3 Next i Text1．Text：Str(Arr(6)+Arr(Arr(6)+Arr(10))) End Sub 程序运行后，单击窗体，在文本框中显示的内容是
A. 1
B. 3
C. 6
D. 10
[单项选择]窗体上添加一个文本框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
[单项选择]
窗体上有名称为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，在文本框中输入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，在文本框中输入456，并有如下事件过程， Private Sub Form Click（ ） x=InputBox("请输入一个整数") Print x+Text1. Text End Sub 单击该窗体，在输入对话框中输入123，单击“确定”按钮后，窗体上显示是( )。
A. 123
B. 456
C. 579
D. 123456
[单项选择]在窗体上有文本框Text1和命令按钮Command1，并有如下事件过程： Private Sub Command1_Click（ ） Dim i As Integer, n As Integer For j=0 To 50 i=i+3 n=n+1 If i＞10 Then Exit For Next Text1.Text=Str(n) End Sub
A. 2
B. 3
C. 4
D. 5
[单项选择]窗体有命令按钮Command1和文本框Text1,对应的事件代码如下： Private Sub Command1_Click( ) For i=1 To 4 x=3 For j=1 To 3 For k=1 To 2 x=x+3 Next k Next j Next i Text1.Value=Str(x) End Sub 运行以上事件过程，文本框中的输出是
A. 6
B. 12
C. 18
D. 21
[单项选择]
在窗体中有一个文本框Test1，编写事件代码如下：
Private Sub Form_Click（ ）
X= val (Inputbox(“输入x的值”))
Y= 1
If X<>0 Then Y= 2
Text1.Value = Y
End Sub
打开窗体运行后，在输入框中输入整数12，文本框Text1中输出的结果是（）
A. 1
B. 2
C. 3
D. 4
[单项选择]在窗体上画一个文本框，然后编写如下事件过程： Private Sub Form_Click( ) x=InputBox(“请输入一个整数”) Print x+Text1.Text End Sub 程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容为
A. 123
B. 456
C. 579
D. 123456
[单项选择]在窗体上画一个文本框，然后编写如下事件过程： 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. a
B. A
C. aaaaaaa
D. AAAAAAA
