下列程序中，第一个Do语句共执行了（）次循环。Dim i As Intege...

单项选择题 下列程序中，第一个Do语句共执行了（）次循环。
Dim i As Integer, j As Integer
i = 1 Do
j = 1
Do
Sum = Sum + j
j = j + 2
Print j;
Loop Until j > 3
i = i + 2
Loop Until i > 10
Print Sum

A.10
B.20
C.5
D.7

点击查看答案

您可能感兴趣的试卷

你可能感兴趣的试题

1.单项选择题赋值语句：a=123&MID（"123456"，3，2）执行后，a变量中的值是（）。

A、"12334"
B、123
C、12334
D、157

点击查看答案

2.单项选择题与传统的程序设计语言相比，Visual Basic最突出的特点是（）。

A、结构化程序设计
B、程序开发环境
C、事件驱动编程机制
D、程序调试技术

点击查看答案

3.单项选择题 下列程序段的执行结果为（）。
n = 0 j = 1
Do Until n > 2
n = n + 1
j = j + n * (n + 1)
Loop
Print n; j

A.0；1
B.3；7
C.3；21
D.3；13

点击查看答案

4.单项选择题 执行完下面的程序段后，循环执行了（）次。
For i=1.7=To 5.9 Step 0.9
a=a+1
Print a
NextI

A.3
B.4
C.5
D.6

点击查看答案

5.单项选择题 下列程序段执行结果为（）
x = 5 y = -6
If Not x < 0
Then x = y - 3
Else y = x + 3
Print y - x; x - y

A.3；－3
B.－9；5
C.－3；3
D.5；－6

点击查看答案

6.单项选择题如果x的值大于或等于y的立方，则打印“OK”，表示这个条件的单行格式的If语句是（）

A.If x>=y^3 Print “OK”
B.If x>=y*y*y Then “OK”
C.If x>=y^3 Then Print “OK”
D.If x>=y*y*y Then Print “OK” End If

点击查看答案

7.单项选择题 在窗体上画一个名称为Command1的命令按钮，一个名称为Label1、Label2的标签，然后编写如下的事件过程：
Private x As Integer Private Sub Command1_Click()
x = 5: y = 3
Call Proc(x, y)
Label1.Caption = x
Label2.Caption = y
End Sub
Private Sub Proc(ByVal a As Integer, ByVal b As Integer)
x = a * a
y = b + b End Sub
运行程序后，则两个标签中显示的内容分别是（）

A.5和3
B.25和3
C.25和6
D.5和6

点击查看答案

8.单项选择题 在窗体上画一个名称为Command1的命令按钮，一个名称为Label1、Label2、Label3的标签，然后编写如下的事件过程：
Private x As Integer Private Sub Command1_Click()
Static y As Integer
Dim z As Integer
n = 10
z = n + z
y = y + z
x = x + z
Label1.Caption = x
Label2.Caption = y
Label3.Caption = z End Sub
运行程序后，连续三次单击命令按钮后，则三个标签中显示的内容分别是（）

A.10；10；10
B.30；30；30
C.30；30；10
D.10；30

点击查看答案

9.单项选择题 在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下的事件过程： Private Sub Command1_Click()
s = 0
For i = 0 To 15
X = 2 * i - 1
If X Mod 3 = 0 Then s = s + 1
Next i
Label1.Caption = s End Sub
程序运行后，单击命令按钮，则标签中显示的内容为（）

A.1
B.5
C.27
D.45

点击查看答案

10.单项选择题 下列程序执行的结果为（）
x=-6²
PrintSgn（x）+Abs（x）+Int（x）

A.－36
B.1
C.－1
D.－72

点击查看答案