21设有如下程序段：Dim a(10)…For Each x ln aPrint x;Next x在上面的程序段中，变量x必须是（ ）。
A.整型变量
B.变体型变量
C.动态数组
D.静态数组
开始考试练习点击查看答案22设有以下函数过程Private Function Fun(a() As Integer,b As String)As Integer…End Function若已有变量声明：Dim x(5)As Integer，n As Integer，ch As String则下面正确的过程调用语句是（ ）。
A.x(0) = Fun(x, "ch")
B.n = Fun(n, ch)
C.Call Fun x,"ch"
D.n = Fun(x(5), ch)
开始考试练习点击查看答案23假定用下面的语句打开文件：Open "Filel.Txt" For Input As #l则不能正确读文件的语句是（ ）。
A.Input #1, ch$
B.Line Input #1, ch$
C.ch$ = Input$(5, #1)
D.read #1,ch$
开始考试练习点击查看答案24下面程序的执行结果是（ ）。Private Sub Command1_Click()a = 10For k = 1 To 5 Step -1a = a - kNext kPrint a; kEnd Sub
A.-5 6
B.-5 -5
C.10 0
D.10 l
开始考试练习点击查看答案25设窗体上有一个名为Text1的文本框和一个名为Command1的命令按钮，并有以下事件过程：Private Sub Command1_Click()x! = Val(Text1.Text)Select Case xCase Is < -10, Is >= 20Print "输入错误"Case Is < 0Print 20 - xCase Is < 10Print 20Case Is <= 20Print x + 10End SelectEndSub程序运行时，如果在文本框中输入-5，则单击命令按钮后的输出结果是（ ）。
A.5
B.20
C.25
D.输入错误
开始考试练习点击查看答案26设有如下程序Private Sub Command1_Click()x = 10: y = 0For i = 1 To 5Dox = x - 2y = y + 2Loop Until y > 5 Or x < -1NextEnd Sub运行程序，其中Do循环执行的次数是（ ）。
A.15
B.10
C.7
D.3
开始考试练习点击查看答案27阅读程序：Private Sub Command1_Click()Dim arrDim i As Integerarr = Array(0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10)For i = 0 To 2Print arr(7 - i);NextEnd Sub程序运行后，窗体上显示的是（ ）。
A.8 7 6
B.7 6 5
C.6 5 4
D.5 4 3
开始考试练习点击查看答案28在窗体上画一个名为Command1的命令按钮，然后编写以下程序：Private Sub Command1_Click()Dim a(10) As IntegerFor k = 10 To 1 Step -1a(k) = 20 - 2 * kNext kk = k + 7Print a(k - a(k))End Sub运行程序，单击命令按钮，输出结果是（ ）。
A.18
B.12
C.8
D.6
开始考试练习点击查看答案29窗体上有一个名为Commandl的命令按钮，并有如下程序：Private Sub Command1_Click()Dim a(10), x%For k = 1 To 10a(k) = Int(Rnd * 90 + 10)x = x + a(k) Mod 2Next kPrint xEnd Sub程序运行后，单击命令按钮，输出结果是（ ）。
A.10个数中奇数的个数
B.10个数中偶数的个数
C.10个数中奇数的累加和
D.10个数中偶数的累加和
开始考试练习点击查看答案30窗体上有一个名为Commandl的命令按钮和一个名为Timerl的计时器，并有下面的事件过程：Private Sub Command1_Click()Timerl.Enabled=TrueEndSubPrivate Sub Form_Load()Timerl.Interval=10Timerl.Enabled=FalseEnd SubPrivate Sub Timerl_Timer()Commandl.Left=Commandl.Left+10End Sub程序运行时，单击命令按钮，则产生的结果是（ ）。
A.命令按钮每10秒向左移动一次
B.命令按钮每10秒向右移动一次
C.命令按钮每10毫秒向左移动一次
D.命令按钮每10毫秒向右移动一次
开始考试练习点击查看答案