vb循环结构选择题

一、选择题

1、无条件转移GoTo语句后面是（A）

A、标号或行号

B、输出语句

C、输入语句

D、子过程

2、无条件转移GoTo语句后面的行号或标号以字母开头，后跟（A）

A、冒号

B、分号

C、逗号

D、空格

3、无条件转移GoTo语句后面的行号或标号在同一过程中（A）

A、必须唯一

B、可以重复

C、以数字开头

D、以汉字开头

4、while循环结构中的条件表达式取值为（A）

A、True

B、False

C、True或False

D、0

5、while循环结构中的条件表达式取值为（A）时执行语句组

A、True

B、False

C、True或False

D、0

6、while循环结构中与（A）匹配使用，不能单独出现

A、Wend

B、end

C、loop

D、next

7、Do…、、loop循环结构中的循环体执行的最少次数为（A）

A、0

B、1

C、2

D、3

8、前测型Do…、、loop循环结构中的循环体执行的最少次数为（A）

A、0

B、1

C、2

D、3

9、后测型Do…、、loop循环结构中的循环体执行的最少次数为（B）

A、0

B、1

C、2

D、3

10、Do…loop循环结构中的Exit Do语句的功能是（B）

A、退出整个程序

B、退出当层循环

C、退出最外层循环

D、退出所在子程序

11、Do…loop中使用while关键字时，条件为（B）执行循环体

A、False

B、True

C、0

D、假或真

12、Do…loop中使用until关键字时，条件为（A）执行循环体

A、False

B、True

C、0

D、假或真

13、Do…loop中使用while关键字时，条件为（A）终止循环

A、False

B、True

C、0

D、假或真

14、Do…loop中使用until关键字时，条件为（B）终止循环

A、False

B、True

C、0

D、假或真

15、For…Next循环结构中（C）用来控制循环变量

A、for

B、step

C、next

D、to

16、For…Next循环结构中step用来控制（D）

A、循环变量

B、循环变量初值

C、循环变量终值

D、循环变量增量

17、For…Next循环结构中循环变量初值大于终值时,步长为（A）

A、负数

B、非负数

C、正整数

D、正数

18、For…Next循环结构中循环变量初值小于终值时,步长为（A）

A、负数

C、正整数

D、正数

19、For…Next循环结构中next后的循环变量（A）

A、可以省略

B、不可以省略

C、与for后的变量名可以不同

D、与for后的变量不是同一变量

20、For…Next中循环变量初值与终值间使用的关键字是（A）

A、To

B、In

C、goto

D、private

21、For…Next中循环变量初值与终值间使用的关键字是（A）

A、To

B、In

C、goto

D、private

22、执行下面的程序段后，s的值为（C）

Private Sub Form_Click()

Static s As Integer

s = 5

For i = 1.4 To 2.1 Step 0.6

s = s + 1

Next i

Print s

End Sub

A、5

B、6

C、7

D、1

23、下面程序的作用是利用随机函数产生10个100~200之间（包含100、200）的随机数，打印其中为5的倍数的数将程序补充完整（Ａ）

Private Sub Command1_Click()

For m = 1 To 10

x = Int(Rnd * 101+100)

If（）Then

Print x;

End If

Next m

End Sub

A、x mod 5=0

B、x mod 5==0

C、x/5=0

24、设有如下程序：

Option Base 1

Private Sub Form_Click()

Dim a(10), P(3) As Integer

k = 5

For i = 1 To 10

a(i) = i

Next i

For i = 1 To 3

P(i) = a(i * i)

Next i

For i = 1 To 3

k = k + P(i) * 2

Next i

Print k

End Sub

程序运行后，单击窗体，则在窗体上显示的是（A）

A、33

B、35

C、37

D、38

25、在窗体上画一个命令按纽Command1，然后编写如下事件过程：Private Sub Command1__Click()

X=0

N=val(inputbox(“n=?”))

For i=1 to n

For j=1 to i

X=x+1

Next j

Next i

Print x

End sub

程序运行后、单击命令按钮,输入3,在窗体上显示的内容是(D)

A、9

B、44

C、5

D、6

26、以下能够正确计算n！的程序是（C）

A、private sub command1__click()

N=5 : x=1

Do

X=x*1

I=i+1

Loop while i

Print x

End sub