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

[主观题]

运行下列程序，单击Command1命令按钮后，则在窗体上显示第一行和第二行的结果分别是【】和【】。

Private Sub Command1_Click() t=1:x=2:y=3:z=4 If t＞0 Or t=x And x ＜＞ y Or y＞z Then t=fun1(t，z) Print t Else t = fun1(x, y) Print t End If Print x Print y End Sub Function funl(ByVal x As Integer, ByVal y As Integer)As Integer Do While y ＜＞ 0 t=x\y x=y y = t Loop fun1 = x End Function

查看答案

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

您可能会需要：

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

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

更多“运行下列程序，单击Command1命令按钮后，则在窗体上显示…”相关的问题

第1题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubcommand1clickIfx＞0Theny=x^2ElseEndIfPrintyEndsub程序运行后，单击命令按钮，窗体上显示的是（)。

A.-5

B.25

C.-1

D.1

点击查看答案

第2题

在窗体中添加一个命令按钮，命名为Command1，然后编写如下程序：PrinvateSubCommand1_Click（)A=1234B=Str（A)C=Len（B)PrintCEndSub程序运行后，单击命令按钮，则在窗体上显示的内容是（)

A.0

B.5

C.6

D.7

点击查看答案

第3题

在窗体上画—个命令按钮，其名称为Command1，然后编写如下程序： Function M（x As Integer,y As

在窗体上画—个命令按钮，其名称为Command1，然后编写如下程序： Function M(x As Integer,y As Integer) M=IIf(x＞y,x，y) End FUNction Private Sub Command1 Click() Dim a As Integer,b As Integer a=100 b=200 Print M(a,B0 End Sub 程序运行后，单击命令按钮，输出结果为【】。

点击查看答案

第4题

在窗体上画一个命令按钮，其名称为Command1，然后编写如下程序： Function M（x As Integer, y As I

在窗体上画一个命令按钮，其名称为Command1，然后编写如下程序： Function M(x As Integer, y As Integer) M=IIf(x＞y, x, y) End Function Private Sub Command1_Click() Dim a As Integer, b As Integer a=100 b=200 Print M(a, B) End Sub 程序运行后，单击命令按钮，输出结果为【】。

点击查看答案

第5题

在窗体上画一个命令按钮Command1，然后编写如下程序： Private Sub Command1_Click（) Dim arr（)A

在窗体上画一个命令按钮Command1，然后编写如下程序： Private Sub Command1_Click() Dim arr()As Integer ReDim arr(3) For i=0 To 3 arr(i)=i Next i x=InputBox("请输入一个数字：") If Val(x)＞4 Then ReDim art(4) air(4)=x End If Me.Print(arr(4)-art(3)) End Sub 程序运行后，单击命令按钮，在输入对话框中输入12，输出结果为【】。

点击查看答案

第6题

假定建立了一个工程，该工程包括两个窗体，其名称分别为Form1和Fom2，启动窗体为Form1。在Form1上面

画一个命令按钮Command1，程序运行后，要求当单击该命令按钮时，Form1窗体消失，显示Form2，请在【】和【】处将程序补充完整。 Private Sub Command1_Click() 【】 form2【】 End Sub

点击查看答案

第7题

在窗体上画一个名称为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．死循环

点击查看答案

第8题

在窗体上画一个名称为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

点击查看答案

第9题

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

在窗体上画一个名称为Command1的命令按钮。编写如下事件过程： Private Sub Command1_Click() Dim a As String A=【】 For i=1 To 5 Print Space(6-i); Mid$(a, 6-i, 2*i-1) Next i End Sub 程序运行后，单击命令按钮，要求窗体上显示的输出结果为： 5 456 34567 2345678 123456789 请填空。

点击查看答案