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
- Dim x%,y%x=Inputbox("请输入第一个数")y=Inputbox("请输入第二个数")print x+y当输入分别为12和34时，程序输出为（）。 A: 1234 B: 46 C: 34 D: 程序出错
- 下面正确的赋值语句是 。 A: y=x+30 B: z=val(InputBox("请输入人数")) C: x+y=30 D: 3y=x E: 3=xy F: y=π*r*r
- 程序执行时输入12和34，结果如下所示，那么print（）函数正确的调用形式是（ ）请输入x:12请输入y:34x= 12 y= 34 A: print("x=",x ; "y=",y) B: print("x=",x,"y=",y) C: print(x,y) D: print(x=,x,y=,y)
- 有如下代码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
内容
- 0
以下叙述中，错误的是________。 A: 可以用MsgBox函数输出一条信息 B: MsgBox函数的返回值为一整数 C: 有语句：x = InputBox("输入：", "输入整数")，则该语句打开的对话框的标题是"输入整数" D: InputBox函数的返回值类型由用户在输入对话框中输入数据的类型决定
- 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))
- 2
执行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))
- 3
x=input("x=")x=2*float(x)print(x)输入x=23b输出结果是 A: 46 B: 0 C: 错误 D: 4
- 4
假设 x = 1, y = -1, and z = 1. 下面哪项是对的? if (x > 0) if (y > 0) System.out.println("x > 0 and y > 0");else if (z > 0) System.out.println("x < 0 and z > 0"); A: x < 0 and z > 0; B: 没有输出. C: x < 0 and z < 0; D: x > 0 and y > 0;