A)如果“条件表达式”的值是0,则一次循环体也不执行 B)如果“条件表达式”的值不为0,则至少执行一次循环体 C)不论“条件表达式”的值是否为“真”,至少要执行一次循环体 D)如果“条件表达式”的值恒为0,则无限次执行循环体 (29)在窗体上画一个命令按钮,然后编写如下事件过程: Dim L ni Print num Select case num Exit For Exit do End sele op End Sub 上述事件过程执行后,下列描述中正确的是() A)Do循环执行的次数为1000次 B)在For循环中产生的随机数小于或等于100 C)当所产生的随机数为12时结束所有循环 D)当所产生的随机数为65、68或92时窗体关闭、程序结束 (30)在窗体上画一个名为 Command1的命令按钮,然后编写如下代码: Aray(1,2,3,4) s=sta(i)J 10 Print 运行上面的程序,其输出结果 A)1234 B)12 )4321 (31)设有如下通用过程 Public Function Fun(xStr As String)As String 二级Ⅴ isual basic语言程序设计试卷第5页(共10页)二级 Visual Basic 语言程序设计试卷 第 5 页（共 10 页） A）如果“条件表达式”的值是 0，则一次循环体也不执行 B）如果“条件表达式”的值不为 0，则至少执行一次循环体 C）不论“条件表达式”的值是否为“真”，至少要执行一次循环体 D）如果“条件表达式”的值恒为 0，则无限次执行循环体 （29）在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Dim I, Num Randomize Do For I=1 To 1000 Num=Int(Rnd*100) Print Num; Select Case Num Case 12 Exit For Case 58 Exit Do Case 65, 68, 92 End End Select Next I Loop End Sub 上述事件过程执行后，下列描述中正确的是（ ）。 A）Do 循环执行的次数为 1000 次 B）在 For 循环中产生的随机数小于或等于 100 C）当所产生的随机数为 12 时结束所有循环 D）当所产生的随机数为 65、68 或 92 时窗体关闭、程序结束 （30）在窗体上画一个名为 Command1 的命令按钮，然后编写如下代码： Option Base 1 Private Sub Command1_Click( ) Dim a a=Array(1, 2, 3, 4) j=1 For i=4 To 1 Step -1 s=s+a(i)*j j=j*10 Next i Print s End Sub 运行上面的程序，其输出结果是（ ）。 A）1234 B）12 C）34 D）4321 （31）设有如下通用过程： Public Function Fun(xStr As String)As String