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

[主观题]

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Option Base 1Private Sub Comma

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Option Base 1 Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) For i=1 To UBound(a) a(i)=a(i)+i-1 Next Print a(3) End Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是()。

A．4

B．5

C．6

D．7

查看答案

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

您可能会需要：

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

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

更多“在窗体上画一个名称为Command1的命令按钮，然后编写如下…”相关的问题

第1题

在窗体上画一个命令按钮，名称为Command1。然后编写如下程序：Private Sub Command1_Click（)For i = 1 To 4For j = 0 To iPrint Chr（65 + i);Next jPrintNext iEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是（）

A.BBCCCDDDDEEEEE

B.ABBCCCDDDD

C.BCCDDDEEEE

D.AABBBCCCCDDDDD

点击查看答案

第2题

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

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim num As Integer num=1 Do Until num＞6 Print num; num=num+2.4 Loop End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是______。

A．13.45.8

B．135

C．1 4 7

D．无数据输出

点击查看答案

第3题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1＿Clic

k() Dim a As Integer，s As Integer a＝8 s＝1 Do S=s+a a=a-1 Loop While a＜=0 Prim s，a End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是

A．7 9

B．34 0

C．9 7

D．死循环

点击查看答案

第4题

在窗体上画一个命令按钮（名称为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

点击查看答案

第5题

在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程：Private

在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程： Private Sub Command1_Click() s=0 For i=1 To 15 x=2*i-1 if x Mod 3=0 Then s=s+1 Next i LabeCaption=s End Sub 程序运行后，单击命令按钮，则标签中显示的内容是______。

A．1

B．5

C．27

D．45

点击查看答案

第6题

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

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1 Click() Dim array1(10，10)As Integer Dim i，i AS Integer For i=1 TO 3 For j=2 TO 4 arrayl(i,i)=i+j Next j Next i Text1.Text=array1(2，3)+array1(3，4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是()：

A．12

B．13

C．14

D．15

点击查看答案

第7题

在窗体上画一个命令按钮，名称为Command然后编写如下事件过程： Private Sub Command1_Click（)Dim i As Integer, x As IntegerFor i = 1 To 6If i<= 4 Thenx = x + 1Elsex = x + 2End IfNext iPrint xEnd Sub程序运行后，单击

A.7

B.8

C.9

D.12

点击查看答案

第8题

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command

1_Click() Dim a As Variant a=Array(1，2，3，4，5) Sum=0 For i=1 TO 5 Sum=Sum+a(i) Next i x=Sum/5 For i=1 To 5 If a(i)＞xThen Print a(i) Next i End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是

A．1 2

B．1 2 3

C．3 4 5

D．4 5

点击查看答案

第9题

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

nd1_Click() Text1．Text="计算机" TextText=Text1．Text Text1．Text="等级考试" End Sub 程序运行后，单击命令按钮，两个文本框(Text1和Text2)中的内容分别为【】和【】。

点击查看答案