题目内容
（请给出正确答案）
在窗体下画两个文本框Text1和Text2，一个命令按钮Command1，请阅读下列程序段：
Private Sub Command1_Click()
x=0
Do Until x＞=50
x=(x+4)*(x+3)
n=n+1
Loop
Text1.Text=Str(n)
Text2.Text=Str(x)
End Sub
运行程序后，单击命令按钮，在两个文本框中显示的值分别为()。
A．1和0
B．2和240
C．3和50
D．4和168
如果结果不匹配，请 联系老师 获取答案
更多“在窗体下画两个文本框Text1和Text2，一个命令按钮Co…”相关的问题
在窗体(Name属性为form1)上画两个文本框(Name属性分别为Text1和Text2)和一个命令按钮 (Name属性为Command1)，然后编写如下两个事件过程，该过程的运行结果为______。Private Sub Command1_Click() a = Text1, Taxt + Text2, Text Print aEnd SubPrivate Sub form_ Load() Text1.Text = "123" Text2.Text = "321"End Sub
A．444
B．321123
C．123321
D．132231
注意：程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为sj1．vbp，窗体文件名为sj1．frm。
（2）在名为Form1的窗体上绘制一个标签（名称为Label1，标题为“输入”）、一个文本框（名称为Text1，Text属性为空白）和一个命令按钮（名称为Command1，标题为“显示”）。请编写命令按钮的Click事件过程，使程序运行后，在文本框中输入内容，然后单击命令按钮，则标签和文本框消失，并在窗体上显示文本框中的内容。运行后的窗体如图21-2和图21-3所示。
注意：要求程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为Sj2．vbp，窗体文件名为sj2．frm。
在名为Form1的窗体上绘制两个标签(名称分别为Lab1和Lab2，标题分别为“身高”和“体重”)、两个文本框(名称分别为Text1和Text2，Text属性均为空白)和一个命令按钮(名称为Cmd1，标题为“输入”)。编写命令按钮的Click事件过程，使程序运行后，若单击命令按钮，则先后显示两个输入对话框，在两个输入对话框中分别输入身高和体重，并分别在两个文本框中显示出来，运行后的窗体如下图所示。
.jpg)
注意：
程序中不得使用任何变量：文件必须存放在考生文件夹中，工程文件名为 execise21.vbp，窗体文件名为execise21.frm。
A．空
B．abcdef
C．abc
D．def
.jpg)
A．Optionl. Value=True Checkl. Value=False
B．Optionl. Value=True Checkl. Value=True
C．Option2. Value=False Checkl. Value=True
D．Optionl. Value=True Checkl. Value=1
在宏的参数中，要引用窗体F1上的Text1文本框的值，应该使用的表达式是______。
A．[Forms]![F1]![Text1]
B．Text1
C．[F1].[Text1]
D．[Forms]_[F1]_[Text1]
在窗体中有一个命令按钮Command1和一个文本框Text1，编写事件代码如下：
Private Sub Command1_Click()
For I=1 To 4
X=3
For j=i To 3
For k=1 To 2
X=x+3
Next k
Next j
Next I
Text]．value=Str(x)
End Sub
打开窗体运行后，单击命令按钮，文本框Text1输出的结果是
A．6
B．12
C．18
D．21
A) Option1. value = False
Check1. value = True
B) Option1. value = True
Check1. value = 0
C) Option1. value = True
Check1. value = 2
D) Option1. value = True
Check1. value = 1
在窗体上画—个文本框(名称为Text1)和—个标签(名称为Label1)，程序运行后，在文本框中每输入—个字符，都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是______。
A．Private Sub Text1_ Change() Label1.Caption =Str (Len(Text1.Text))End Sub
B．Private Sub Text1_ Click() Label1.Caption=Str(Len(Text1.Text))End Sub
C．Private Sub Text1_ Change() Labell.Caption =Text1.TextEnd Sub
D．Private Sub Label1_ Change() Labell.Caption=Str(Len(Text 1. Text))End Sub
在窗体上画一个名为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim arrayl(10, 10)As Integer Dim i As Integer, j As Integer For i=1 To 3 For j=2 To 4 arrayl(i, j)=i+j Next j Next i Text1. Text=arrayl(2, 3)+arrayl(3, 4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是______。
A．12
B．13
C．14
D．15
