对用户输入的数值限制为正数,如果输入了负数,则要求重新输入。下面________可以实现。
A: Dim x As IntegerDo x = Val(InputBox("请输入数据"))Loop While x <; 0
B: Do x = Val(InputBox("请输入数据"))Loop While x >; 0
C: Do While x >; 0 x = Val(InputBox("请输入数据"))Loop
D: x = Val(InputBox("请输入数据"))If x <; 0 ThenEnd If
E: For x <; 0 x = Val(InputBox("请输入数据"))Next
A: Dim x As IntegerDo x = Val(InputBox("请输入数据"))Loop While x <; 0
B: Do x = Val(InputBox("请输入数据"))Loop While x >; 0
C: Do While x >; 0 x = Val(InputBox("请输入数据"))Loop
D: x = Val(InputBox("请输入数据"))If x <; 0 ThenEnd If
E: For x <; 0 x = Val(InputBox("请输入数据"))Next
举一反三
- 对用户输入的数值限制为正数,如果输入了负数,则要求重新输入。下面________可以实现。 A: Dim x As IntegerDo x = Val(InputBox("请输入数据"))Loop While x < 0 B: Do x = Val(InputBox("请输入数据"))Loop While x > 0 C: Do While x > 0 x = Val(InputBox("请输入数据"))Loop D: x = Val(InputBox("请输入数据"))If x < 0 ThenEnd If E: For x < 0 x = Val(InputBox("请输入数据"))Next
- 有如下代码x=0DoUntilx=-1a=InputBox("请输入A的值")a=Val(a)b=InputBox("请输入B的值")b=Val(b)x=InputBox("请输入x的值")x=Val(x)a=a+b+xLoop程序运行后,依次在输入对话框中输入5、4、3、2、1、-1,则变量a的值为______. A: 2 B: 3 C: 14 D: 15
- 执行x$=InputBox("请输入x的值")时,在弹出的对话框中输入123,在列表框 List1中选中一个列表项(数据为456),使结果为123456 的语句是( )。 A: y=x$+List1.List(0) B: y=x$+List1.List(1) C: y=Val(x$)+Val(List1.List(0)) D: y=Val(x$)&Val(List1.List(1))
- 执行x$=InputBox("请输入x的值")时,在弹出的对话框中输入123,在列表框List1选中一个列表项(数据为456),使结果为123456的语句是( )。 A: y=x$+List1.List(0) B: y=x$+List1.List(1) C: y=Val(x$)+Val(List1.List(0)) D: y=Val(x$)&Val(List1.List(1))
- Dim x%,y% x=Inputbox("请输入第一个数") y=Inputbox("请输入第二个数") print x+y 当输入分别为12和34时,程序输出为()