信息考试选择判断-vb语言.docVIP

题目描述 418 VB中，（B） 控件对象在运行时一定不显示。 A:Label B:Timer C:TextBox D:CommandButton 419 VB中，将Interval属性值设置为（D）时，计时器控件每隔5秒钟产生一个计时器事件。 A:5 B:500 C:300 D:5000 420 VB中，可以弹出一个对话框的函数是（D） A:Int() B:Rnd() C:Val() D:MsgBox() 421 VB中，Rnd（B）函数的值不可能是 （B） A:0 B:1 C:0.1234 D:0.00005 422 VB中，Int(5.9)的返回值是（C） A:3 B:4 C:5 D:6 423 下面程序的运行结果是（B） Private Sub Command1_Click（B） Text1.Text = 123 Text2.Text = 321 a = Text1.Text + Text2.Text Print a End Sub A:444 B:123321 C:321123 D:132231 424 VB中正确的循环语句是（B） A:For x=1 to step 10 B:For x=1 to 10 step 2 C:For x=1 to 10 step -1 D:For x=10 to 1 425 下面程序的运行结果是（B） Dim a As Integer, b As Integer a=6 b=15 S=1+(a*b)/2 Print S A:6 B:46 C:15 D:45 426 VB中,执行下面的程序段后，b的值为 （A） a = 100 b = 20 a = a + b b = a - b A:100 B:120 C:20 D:80 427 x=10 If x=12 then y=2*x+6 Else y=x/2 End If 上述程序段中y的值是（A） A:26 B:25 C:10 D:5 428 下列程序段的运行结果是（C） x=3 Select Case x Case 5 Print 优秀 Case 4 Print 良好 Case 3 Print 通过 Case Else Print 不通过 End Select A:优秀 B:良好 C:通过 D:不通过 429 执行Do……Loop Until语句时（B） A:先判断后循环 B:先循环后判断 C:顺序执行 D:其余说法都不对 430 VB中，定义a为整型变量的语句是（A） A:Dim a As Integer B:Dim a As Single C:Dim a As Date D:Dim a As Byte 431 对VB窗体中控件的操作错误的是（A） A:单击Delete键一次只能删除一个控件 B:单击Delete键一次可以同时删除多个控件 C:按住Shift键,依次单击每个要选择的控件,可以同时选中多个控件 D:按住Ctrl键,依次单击每个要选择的控件,可以同时选中多个控件 432 VB中，多个语句写在同一行时,每个语句之间用（B）符号分隔。 A:, B:: C:. D:； 433 VB中，一条语句要分行书写,用（C）符号作续行符。 A:“-” B:“+” C:“_” D:“…” 434 下列VB程序段执行后x的值为（B） a=8 If a9 Then x=9 End If Print x A:8 B:9 C:0 D:1 435 在VB中，表达式9\4的结果是（B） A:2.5 B:2 C:3 D:40 436 在VB中,Int（23.512）的值为（D） A:-23 B:-24 C:24 D:23 437 VB中，定义a为实型变量的语句是（B） A:Dim a As Integer B:Dim a As Single C:Dim a As Date D:Dim a As Byte 438 执行Do While……Loop语句时（A） A:先判断后循环 B:先循环后判断 C:顺序执行 D:以上说法都不对 439 下面程序段中s的结果是（D） s = 0 For i = 1 To 3 s = s + i Next i A:0 B:1 C:3 D:6 440 下面程序的运行结果是（A） Dim x As Integer, y As Integer x=4 y=8 s=x*y/8-2 Print s A:2 B:4 C:6 D:8 441 VB中,下列程序运行后，变量y的值为（C） x=20 if x=100 then y=5*x else y=4*x A:20 B:40 C:80 D:100 4