网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
7、执行以下程序，导致输出”输入有误“的输入选项是（）。 try: ls = eval（input（)) * 2 print（ls) else: print（"输入有误")
A．'12'
B．12
C．'xx'
D．X
参考答案和解析
CD
更多 “7、执行以下程序，导致输出”输入有误“的输入选项是（）。 try: ls = eval（input（)) * 2 print（ls) else: print（"输入有误")A．'12'B．12C．'xx'D．X” 相关考题
考题
执行下列程序，输入数字3，则输出结果为______。Private Sub Command1_Click()a=inputBox("Input a Number")If a＞5 ThenGoTo L5Else If a＞2 ThenGoTo L2ElseGoTo L3End IfExit SubL5:Print a Mod 5Exit SubL3:Print a Mod 3Exit SubL2：Print a Mod 2End Sub
考题
下列程序执行时，从键盘上依次输入123和234，则程序的输出结果是【 】。Dim a,b As Integera=InputBox("请输入第一个整数")b=InputBox("请输入第二整数")Print a+b
考题
（ 9 ） 下面的程序执行时 ， 可以从键盘输入一个正整数 ， 然后把该数的每位数字按逆序输出 。 例如 ： 输入 7685 ，则输出 5867 ，输入 1000 ，则输出 0001 。请填空。Private Sub Command1_Click()Dim x As Integerx=InputBox( “ 请输入一个正整数 ” )While x_ _[11] ___Print x Mod 10;x=x\10WendPrint__ [12] __End Sub
考题
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Commandl_Click() x=Input Box("Input") Select Case x Case 1,3 Print"分支1" Case Is＞4 Print"分支2" Case Else Print"Else分支" End Select End Sub 程序运行后，如果在输入对话A．分支1B．分支2C．Else分支D．程序出错
考题
下列程序要求用户输入一个年份，并能够判断用户输入的年份是否是闰年，横线处应填 Sub EnSure() Dim year As Integer Year=Val(InputBox("请输入年份：")) If(year Mod 4=0_____yaer Mod 1000)______(yaer Mod 400=0)Then Print"您输入的是闰年" Else Print"不是闰年，是普通年份" End If End SubA.And And B.And Or C.Or Or D.Or Or
考题
单击命令按钮，并在对话框内输入6，下列程序段的执行结果为______。 Private Sub Command1_Click() Dim n As Integer n=InputBox ("请输入日期") Select Case n Case Is ＜= 0 n=InputBox("错误!请重新输入日期!") Case Is＞7 n=InputBox("错误!请重新输入日期!") Case 1 To 3 Print "江苏" Case 4 To 5 Print "浙江" Case 6 To 7 Print "双休日" End Select End SubA．错误!请重新输入日期!B．江苏C．浙江D．双休日
考题
设有以下程序：Private Sub Form_ Click() x=50 For i=1 To 4 y=InputBox(“请输入—个整数”) y=Val(y) If y Mod 5=0 Then a=a+ y x=y Else a=a+ x End If Next i Print aEnd Sub 程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为 ______。A．100B．50C．120D．70
考题
设窗体上有一个名为Txtl的文本框和一个名为Commandl的命令按钮，并有以下事件过程：Private Sub Commandl一Click()x!==Val(Textl．Text)Select Case xCasc Is-10，Is=20Print“输入错误”Case Is0Print 20 xCase ls10Print 20Case Is=20Print x+10End SelectEnd Sub程序运行时，如果存文本框中输入一5，则单击命令按钮后的输出结果是A．5B．20C．25D．输入错误
考题
设程序中有如下语句：x-input box(“输入”,”数据”，100)print x运行程序，执行上述语句，输入5并单击输入对话框上的“取消”按钮，则窗体上输出A)0B)5C)100D)空白
考题
下列程序执行后，分别输入5，10，则输出的结果是______ 。 a= InputBox (“请输入数据”“a”“的值”) b= InputBox (“请输入数据”“b”＆“的值”) c= a + b +“5”Print cA．15 5B．5105C．20D．25
考题
下面的程序执行时，可以从键盘输入一个正整数，然后把该数的每位数字按逆序输出。例如：输入7685，则输出5 8 6 7；输人1000，则输出0 0 0 1。请填空。 Private Sub Command1_Click Dim x As Integer X=InputBox(“请输入一个正整数”) While x 【11】 Print x Mod 10； x=x＼10 Wend Print 【12】 End Sub
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) x=InputBox(“Input”) Select Case x Case 1，3 Print“分支1” Case Is4 Print“分支2” Case Else Print“Else分支” End SelectEnd Sub程序运行后，如果在输入对话框中输入2，则窗体上显示的是A．分支1B．分支2C．Else分支D．程序出错
考题
以下程序运行时，输入3和4后输出的结果是______。 Private Sub Command1_Click() a=InputBox(“请输入a的值”) b=InputBox(“请输入b的值”) Print a+b End SubA．3+4B．7C．34D．12
考题
在执行以下程序时，为了使输出结果为t＝4，则给a和b输入的值应当满足的条件是______。 a=InputBox(“a=”) b=InputBox(“b=”) s=1 t=1 If a＞0 Then s=s+1 End If If a＞b Then t=s+1 Else If a=b Then t=5 Else t=2*s End If End If Print tA．a＞bB．a＜b＜0C．0＜a＜bD．0＞a＞b
考题
下列程序： Private Sub Command1_Click() a=InputBox("请输入") b=InputBox("请输入") Print=a+b End Sub 运行时输入3和4，输出的结果是A．7B．34C．3+4D．出错
考题
运行下列程序： x=Input Box("input value Of x”) Select Case x Case IsO y=y＋1 Case Is=0 y=x＋2 Case Else y=x＋3 End Select Print x；y 运行时，从键盘输入-5，输出的结果是( )。A．-7B．-9C．-8D．-10
考题
如下事件过程： Function Feed(x) If x ＜10 Then Feed=X Else Feed=10+x End If End Function Private Sub Command1_Click( ) x=Val(Input Box(" "，0)) pay=Feed(x) Print pay End Sub 运行时在输入框内输入变量x的值为15，输出结果为A．0B．15C．25D．30
考题
有如下程序 x=InputBox("input value of x") Select Case x Case Is0 y=y＋l Case Is=0 y=x＋2 Case Else y=x＋3 End Select． Print x: y 运行时，从键盘输入—5，输出的结果是( )。A．-7B．-9C．-8D．-10
考题
执行以下程序段，如果在对话框中输入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
考题
以下语句执行时，从键盘上输入Zhang，执行结果是______。 Dim a As String a=InputBox("Input"，""，"Name") Print aA．InputB．NameC．ZhangD．空字符串
考题
运行下列程序： x=InputBox("input value of x") Select Case X Case Is＞0 y=y+1 Case Is=0 y=x+2 Case ELse y=x+3 End Select Print x;y 运行时，从键盘输入-5，输出的结果是( )。A．-7B．-9C．-8D．-10
考题
有如下程序： x = InputBox("Input value of x") Select Case x Case Is ＞ 0 y=y+1 Case Is = 0 y=x + 2 Case Else y=x + 3 End Select Print x, y运行时，从键盘输入-5，输出的结果是( )。A．-7B．-9C．-8D．-10
考题
在visualbasic中，输入PRINT语句时，不论输入“PRINT”还是“print”，visualbasic都会转换为Print。
热门标签
最新试卷
