题目内容（请给出正确答案）

[主观题]

在窗体上画两个名称分别为Text1、Text2的文本框和一个名称为Command1的命令按钮，然后编写如下事件

过程： Private Sub Command1 Click() Dim x As Integer， n As Integer x = 1 n = 0 Do While x ＜ 20 x = x * 3 n = n + 1 Loop Text1．Text = Str(x) TextText = Str(n) End Sub 程序运行后，单击命令按钮，在两个文本框中显示的值分别是

A．15和1

B．27和3

C．195和3

D．600和4

查看答案

如果结果不匹配，请联系老师获取答案

您可能会需要：

重置密码查看订单联系客服

安装优题宝APP，拍照搜题省时又省心！

更多“在窗体上画两个名称分别为Text1、Text2的文本框和一个…”相关的问题

第1题

在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后

编写如下两个事件过程：程序运行后，单击命令按钮，将显示一个输入对话框，如果在该对话框中输入一个具有大小写的字符串，则在标签中显示的内容全部为大写。请填空。

点击查看答案

第2题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Priva

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1 Click() Dim i As Integer,n As Integer For i=0 To 50 i=i+3 n＝n+1 If i＞10 Then Exit For Next Text1.Text=Str(n) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是______。

A．5

B．4

C．3

D．2

点击查看答案

第3题

在窗体上画两个文本框和一个命令按钮，然后在命令按钮的代码窗口中编写如下事件过程： Private Sub

在窗体上画两个文本框和一个命令按钮，然后在命令按钮的代码窗口中编写如下事件过程：

Private Sub Command1_Click()

Text 1="VB programming"

Text 2=Text 1

Text 1="ABCD"

End Sub

程序运行后，单击命令按钮，文本框Text 2中显示的内容为【】。

点击查看答案

第4题

在名为Form1的窗体上绘制两个标签（名称分别为Lab1和Lab2，标题分别为“姓名”和“年龄”)、两个文本框（

在名为Form1的窗体上绘制两个标签(名称分别为Lab1和Lab2，标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Text1和Text2，Text属性均为空白)和一个命令按钮(名称为Cmd1，标题为Display)。然后编写命令按钮的Click事件过程，使程序运行后，在两个文本框中分别输入姓名和年龄，然后单击命令按钮，则在窗体上显示两个文本框中的内容，如下图所示。

注意：

程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为 execise57.vbp，窗体文件名为execise57.frm。

点击查看答案

第5题

在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件

过程： Private Sub Command1_Click() n=Text1.Text Select Case n Case 1 To 20 x=10 Case 2, 4, 6 x=20 Case Is＜10 x=30 Case 10 x=40 End Select TextText=x End Sub 程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是______。

A．10

B．20

C．30

D．40

点击查看答案

第6题

在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的Text属性设

置为空白，然后编写如下事件过程：

Private Sub Command1_Click（）

a = InputBox（"Enter an integer"）

b = InputBox（"Enter an integer"）

Text1.Text = b + a

End Sub

程序运行后，单击命令按钮，如果在输入对话框中分别输入8和10，则文本框中显示的内容是（）。

A．108

B．18

C．810

D．出错

点击查看答案

第7题

P53.窗体上有一个名为text1的文本框和一个名为command1的命令按钮,事件过程如下程序运行时单击命令按钮,文本框中显示的值是（）

A.2

B.3

C.4

D.5

点击查看答案

第8题

在窗体上画一个命令按钮（名称为Command1)，然后编写如下事件过程：Private Sub Command_Click()Sta

在窗体上画一个命令按钮(名称为Command1)，然后编写如下事件过程： Private Sub Command_Click() Static b As Integer b=b+1 End Sub运行程序，第3次单击命令按钮后，变量b的值为______。

A．0

B．1

C．2

D．3

点击查看答案

第9题

设有如下通用过程：Public Sub Fun（a()As Integer，x As Integer)For i=1 TO 5 x=x+a（i)NextEnd S

设有如下通用过程： Public Sub Fun(a()As Integer，x As Integer) For i=1 TO 5 x=x+a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程： Private Sub Command1_Cliek() Dim arr(5) As Integer，n As Integer For i=1 To 5 arr(i)=i+i Next Fun arr，n Text1.Text=Str(n) End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是

A．30

B．25

C．20

D．15

点击查看答案

湘ICP备16018319号-4 营业执照

违法和不良信息举报电话：400-118-7898

举报/反馈/投诉邮箱：2861363944@qq.com