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

[主观题]

Dim x As Integer，y As Integer x=1：y=0 Do Until y ＜x 1 y=" & y End Sub X和Y的值

Dim x As Integer，y As Integer x=1：y=0 Do Until y ＜x 1 y=" & y End Sub X和Y的值分别是多少？ A、x=1,y=0 B、x=2,y=1 C、x=0,y=1 D、x=1,y=1 <p class=" + x="x" * loop msgbox "x=" & x & " ， answer"＞参考答案：＜span style="color:rgb(255, 0, 0)"＞A＜/span＞

3、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 　Textl.Value＝Str(x) 文本框Textl结果是多少？

A、21

B、20

C、22

D、23

查看答案

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

您可能会需要：

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

安装上学吧APP，拍照搜题省时又省心！

更多“Dim x As Integer，y As Integer …”相关的问题

第1题

Command1_Click()事件代码如下： Private Sub Command1_Click() Dim x As Integer, Y As Integer x = 6 : Y : 8 Call ABC(X, Y) Print X; Y End Sub Private Sub ABC(ByVal X As Integer，Y As Integer) X = X + 4 Y = Y = 2 End Sub 事件发生后，X和Y的值分别为 ______。

A．6, 8

B．10, 10

C．10, 8

D．6, 10

点击查看答案

第2题

下列程序的执行结果为 Private Sub Commandl_Click( ) Dim X As Integer，y As Integer x=12：y=20 Call Value(x，y) Print X；y End Sub Private Sub Value(ByVal m As Integer，ByVal n As Integer) m=m * 2：n=n-5 Print m；n End Sub

A．20 12 20 15

B．12 20 12 25

C．24 15 12 20

D．24 12 12 15

点击查看答案

第3题

设有如下通用过程： Public Function f(x As Integer) Dim y As Integer x=20 y=2 f=x*y End Function 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程； Private Sub Command1_Click() Static x As Integer x=10 y=5 y=f(x) Print x；y End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。

A．10 5

B．20 5

C．20 40

D．10 40

点击查看答案

第4题

设有如下通用过程： Public Function f(x As Integer) Dim y As Integer x = 20 y = 2 f = x * y End Function 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Commandl Click() Static x As Integer x = 10 y = 5 y = f(x) Print x；y End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是

A．10 5

B．20 5

C．20 40

D．10 40

点击查看答案

第5题

单击命令按钮时，下列程序的执行结果为 Private Sub Command1_Click Dim x As Integer, y As Integer x=12:y=32 Call Proc(x,y． Print x; y End Sub Public Sub Proc(n As Integer, ByVal m As Integer． n=n Mod 10 m=m Mod 10 End Sub

A.1232

B.232

C.23

D.123

点击查看答案

第6题

设有如下通用过程： Public Function f(x As Integer) Dim y As Integer x=20 y=2 f=x*y End Function 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Static x As Integer x=10 y=5 y=f(x) Print x；y End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。

A．10 5

B．20 5

C．20 40

D．10 40

点击查看答案

第7题

设有如下通用过程： Public Function f(x As Integer) Dim y As Integer x=20 y=2 f=x*y End Function 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Static x As Integer x=10 y=5 y=f(x) Print x; y End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是______。

A．10 5

B．20 5

C．20 40

D．10 40

点击查看答案

第8题

有如下事件程序，运行该程序后输出结果是

Private Sub Command33_Click()

Dim X As Integer，y As Integer

x=1：Y=0

Do Until y<=25

y=y+X*X

X=X+1 ‘

Loop ’ 。

MsgBox“x一”＆X＆,“y=”＆y

End Sub

A．x=1，y=0

B．x=4，y=25

C．x=5，y=30

D．输出其他结果

点击查看答案

第9题

有如下事件程序，运行该程序后输出结果是

Private Sub Command33_Click()

Dim X As Integer，y As Integer

x=1：Y=0

Do Until y<=25

y=y+X*X

X=X+1 ‘

Loop ’ 。

MsgBox“x一”＆X＆,“y=”＆y

End Sub

A．x=1，y=0

B．x=4，y=25

C．x=5，y=30

D．输出其他结果

点击查看答案

第10题

有如下事件程序，运行该程序后输出结果是（）。 PrivateSub Command33_click Dim x AsInteger，Y AsInteger x=1：y=0 Do Untily<=25y=y+x*xx=x+1 Loop MsgBox”x=＆x＆”，y="&Y End Sub

A.x=1，y=0

B.x=4，y=25

C.x=5，y=30

D.输出其他结果

点击查看答案

Dim x As Integer，y As Integer x=1：y=0 Do Until y ＜x 1 y=" &amp; y End Sub X和Y的值

Dim x As Integer，y As Integer x=1：y=0 Do Until y ＜x 1 y=" & y End Sub X和Y的值