（ 28 ）下面程序在调试时出现了死循环Private Sub Command1_Click （）n=InputBox （ “ 请输入一个整数 ” ）DoIf n Mod 2=0 Thenn=n+1Elsen=n+2Else IfLoop Until n=1000End Sub下面关于死循环的叙述中正确的是（ ）A ）只有输入的 n 是偶数时才会出现死循环，否则不会B ）只有输入的 n 是奇数时才会出现死循环，否则不会C ）只有输入的 n 是大于 1000 的整数时才会出现死循环，否则不会D ）输入任何整数都会出现死循环
（ 28 ）下面程序在调试时出现了死循环
Private Sub Command1_Click （）
n=InputBox （ “ 请输入一个整数 ” ）
Do
If n Mod 2=0 Then
n=n+1
Else
n=n+2
Else If
Loop Until n=1000
End Sub
下面关于死循环的叙述中正确的是（ ）
A ）只有输入的 n 是偶数时才会出现死循环，否则不会
B ）只有输入的 n 是奇数时才会出现死循环，否则不会
C ）只有输入的 n 是大于 1000 的整数时才会出现死循环，否则不会
D ）输入任何整数都会出现死循环
相关考题：
下面程序在调试时出现了死循环Private Sub Command1_Click（）n=InputBox（“请输入一个整数”）DoIf n Mod 2=0 Thenn=n+1Elsen=n+2Else IfLoop Until n=1000End Sub下面关于死循环的叙述中正确的是（ ）。A．只有输入的n是偶数时才会出现死循环，否则不会B．只有输入的n是奇数时才会出现死循环，否则不会C．只有输入的n是大于1000的整数时才会出现死循环，否则不会D．输入任何整数都会出现死循环
假定在工程文件中有一个标准模块，其中定义了如下记录类型：Type BooksName As String*10TelNuin As String*20End Type要求在执行事件过程Command1_Click时，在顺序文件Person.txt中写入一条记录。将以下程序补充完整。Private Sub Command1_Clickk()DimB As Booksopen"c:\person.txt"For output As 1B.Name=InputBox("请输入姓名")B.TelNum=InputBox("请输入电话号码")write 1，______close 1End Sub
下面程序在调试时出现了死循环 Private Sub Command1_Click() n=InputBox("请输入—个整数") Do Ifn Mod 2=0 Then n=n+1 Else n=n+2 End If Loop Until n=1000 End Sub 下面关于死循环的叙述中正确的是______。A．只有输入的n是偶数时才会出现死循环，否则不会B．只有输入的n是奇数时才会出现死循环，否则不会C．只有输入的n是大于1000的整数时才会出现死循环，否则不会D．输入任伺整数都会出现死循环
下面程序运行结果是( )。 Private Sub Form_Click() Dim x As Single,y As Single x=InputBox("请输入数据25"):y=InputBox("请输入数据10") Print x+y;InputBox("请输入数据25")+InputBox("请输入数据10") End SubA．_35_2510B．25102510C．_35_35_D．2510_35_
运行下面的程序，单击命令按钮后，当输入分别为123和456时，输出结果为 ______。 Private Sub Command1_Click() a=InputBox("请输入一个数字:") b=Val(InputBox("请再输入一个数字：")) PrInt a+b End SubA．123B．456C．123123D．579
阅读下面的程序： n1=InputBox(“请输入第一个数：”) n2=InputBox(“请输入第二个数：”) Print n1+n2 当输入的数分别为111和222时，程序输出______。A．111222B．222C．333D．程序出错
阅读下面的程序，当输入分别为111和222时，程序输出为 ______。 n1=InputBox(”请输入第一个数：”) n2=Val(1nputBox("请输入第二个数：")) Print n1+n2A．111222B．222C．333D．程序出错
执行以下程序段，如果在对话框中输入8，输出结果是"Hello"的是______。A．n = InputBox("请输入一个数") Select Case n Case 7 To 1 Print "Hello" End SelectB．n = InputBox("请输入一个数") Select Case n Case Is＞1, Is ＜ 6 Print "Hello" End SelectC．n = InputBox("请输入一个数") Select Case n Case Is ＞ 5, 1, 3 To 10 Print "Hello" End SelectD．n=InputBox("请输入一个数") Select Case n Case 1, 5, Is ＞ 9 Print "Hello" End Select