A．只有输入的n是偶数时才会出现死循环，否则不会
B．只有输入的n是奇数时才会出现死循环，否则不会
C．只有输入的n是大于1000的整数时才会出现死循环，否则不会
D．输入任伺整数都会出现死循环
[单选题]（ 28 ）下面程序在调试时出现了死循环Private Sub Command1_Click （）n=InputBox （ “ 请输入一个整数 ” ）D．oIf n Mod 2=0 Thenn=n+1E．lsen=n+2E．lse IfLoop Until n=1000E．nd Sub下面关于死循环的叙述中正确的是（ ）A． ）只有输入的 n 是偶数时才会出现死循环，否则不会B． ）只有输入的 n 是奇数时才会出现死循环，否则不会C． ）只有输入的 n 是大于 1000 的整数时才会出现死循环，
[单选题]阅读下面的程序： Private Sub Command1_Click() For i=1 To 3 For j=1 To i For k=j To 3 x=x+1 Next k Next j Next i Print x End Sub 程序运行后，单击命令按钮，窗体上输出的结果是A．3B．9C．14D．21
[单选题]下面程序：Private Sub Command1_Click（）m$="ABC"n$="abc"k$=Lcase$（m$）j$=Ucase$（n$）Print Asc（k$）End Sub运行后输出结果为（）A . 96B . 97C . 65D . 64
[单选题]给出下面程序： Private Sub Command1_Click() Dim x，y，z X=False For Each y In 2 If y．Text="Hello" Then x=True Exit For End If Next y End Sub 下面描述正确的是A．退出For Each…Next循环的条件是x=TrueB．退出For Each…Next循环的条件是x=FalseC．程序检查y对象的Text属性，等于“”时退出For Each…Next循环D．程序逐一查找在z
[单选题]运行下列程序：Private Sub Command1_Click( )a = Val(InputBox("a = "))Print fun1(a)E．nd SubPrivate Function fun1(b)If b > 0 Thenfun1 = 10E．lseIf b = 0 Thenfun1 = 9E．lsefun1 = 8E．nd IfE．nd Function单击按钮后从键盘为变量a输入数据3，输出的结果是( )。A．3B．8C．9D．10
[单选题]下列程序： Private Sub Command1_Click() a=InputBox("请输入") b=InputBox("请输入") Print=a+b End Sub 运行时输入3和4，输出的结果是A．7B．34C．3+4D．出错
[单选题]运行下列程序：Private Sub Command1_Click()a = 100b = 24a = a Mod bb = b / aa = b - aD．ebug.Print aE．nd Sub单击Command1命令按钮后，则在立即窗口上输出结果是()。A．2B．24C．50D．100
[单选题]下面程序计算并输出的是Private Sub Command1_Click()a=10s=0D．os=S+a*a*aa=a-lLoop until a<=0Print SE．nd subA．13+23+33+…lO3的值B．10!+…+3!+2!+1!的值C．(1+2+3+…+lO)3的值D．10个103的和
[单选题]运行下列程序:Private Sub Command1_Click( )x = 3If x < 3 Then Print x £« 3;If x < 4运行下列程序：Private Sub Command1_Click( )x = 3If x < 3 Then Print x + 3;If x < 4 Then Print x + 4;If x < 5 Then Print x + 5;If x < 6 Then Print x + 6;PrintE．nd Sub单击Co
[单选题]运行下列程序：Private Sub Command1_Click( )x = "祝你成功"y = "1234"F．or i = 1 To 4z = z + Mid(x, i, 1) + Left(y, 1)Next iPrint zE．nd Sub单击Command1命令按钮后，则在窗体上显示的结果是( )。A．祝你成功1234B．祝1你2成3功4C．1234祝你成功D．祝1你1成1功1