10．下列哪个程序段不能正确显示1！、2！、3！、4！的值________。

　　A）for i = 1 to 4

　　n = 1

　　for j = 1 to i

　　n = n*j

　　next j

　　print n

　　next i

　　B）for i = 1 to 4

　　for j = 1 to i

　　n = 1

　　n = n*j

　　next j

　　print n

　　next i

　　C）n = 1

　　for j = 1 to 4

　　n = n*j

　　print n

　　next j

　　D）n = 1

　　j = 1

　　do while j <= 4

　　n = n*j

　　print n

　　&nb, sp; j = j+1

　　loop

　　11．有如下程序：

　　For i=1 to 3

　　For j=5 to 1 Step –1

　　Print i*j

　　Next j

　　Next i

　　则语句Print i*j的执行次数是________。

　　A）15

　　B） 16

　　C）17

　　D）18

　　12．在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：

　　Private Sub Command1_Click()

　　Dim i As Integer, x As Integer

　　For i = 1 To 6

　　If i = 1 Then x = i

　　If i <= 4 Then

　　x = x + 1

　　Else

　　x = x + 2

　　End If

　　Next i

　　Print x

　　End Sub

　　程序运行后，单击命令按钮，其输出结果为________。

　　A）9

　　B） 6

　　C）12

　　D）15

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

　　Private Sub Command1_Click()

　　c = "ABCD"

　　For n = 1 To 4

　　Print _________

　　Next n

　　End Sub

　　程序运行后，单击命令按钮，要求在窗体上显示如下内容：

　　D

　　CD

　　BCD

　　ABCD

　　则在程序段的“Print ________”处应填入的内容为________。

　　A）Left(c,n)

　　B）Right(c,n)

　　C）Mid(c,n,1)

　　D）Mid(c,n,n)

　　14．执行以下程序段

　　Dim x As Integer, i As Integer

　　x=0

　　For i = 20 To 1 Step -2

　　x = x + i / 5

　　Next i

　　后，x的值为________。

　　A）16

　　B） 17

　　C）18

　　D）19

　　15．在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序：

　　Private Sub Command1_Click()

　　a = InputBox("请输入日期(1~31)")

　　t = "旅游景点：" _

　　& IIf(a > 0 And a <= 10, "长城", ""）_

　　& IIf(a > 10 And a <= 20, "故宫", ""）_

　　& IIf(a > 20 And a <= 30, "颐和园", "")

　　Text1.Text = t

　　End Sub

　　程序运行后，如果从键盘输入16，则在文本框中显示的内容是________。

　　A）旅游景点：长城故宫

　　B）旅游景点：长城颐和园

　　C）旅游景点：颐和园

　　D）旅游景点：故宫

参考答案