中国石油大学华东VB练习题16周总选择题

1. Visual Basic 是一种面向 对象的程序设计语言，_不是面向对象系统所包含的三个要素之一A. 变量 B. 事件 C. 方法 D. 属性正确答案：A，你的答案：A ， 2. 决定控件在窗体中的位置的属性是_A. EnabledB. Left 和 TopC. VisibleD. Width 和 Height正确答案：B，你的答案：B ， 3. 要判断在文本框中是否按下 Enter 键，应在文本框的_事件中判断。A. ChangeB. DblClickC. KeyPressD. Click正确答案：C，你的答案： C， 4. 为了在文本框中显示多行文本，可设置其 ScrollBars属性为 2（垂直 滚动 条）,但同时还需要设置_属性的值为TrueA. MultiLineB. TextC. MaxLengthD. Enabled正确答案：A，你的答案：A ， 5. 下列属性中，标签没有的属性是_A. NameB. CaptionC. TextD. Width正确答案：C，你的答案： C， 6. 下面_ 是不合法的整型常量。A. 100B. &H100C. &100D. &E100正确答案：D，你的答案： C， 7. 表达式“123“+“100“ & 200 的值是_A. 123300B. 423C. 223200 D. 123100200正确答案：D，你的答案： D， 8. 可以用来调用 Windows 中 计算器程序的语句是_A. k=Shell(“Calc.exe“,1)B. k=Shell(Calc.exe,1)C. Calc.exeD. Shell(“Calc.exe“,1) 正确答案：A，你的答案：A ， 9. 以下关系表达式中，其值为 False 的是_。A. “AB“ “Ab“B. “123“ C. Case 2， 3， 4D. Case x20正确答案：D，你的答案： D， 15. 现有如下一段程序：执行程序，在输入框中输入字母“b“，则以下叙述中正确的是( )。 Private Sub Command1_Click() xUCase(InputBox(“输入：“) Select Case x Case “A“ To “C“ Print “考核通过！“ Case “D“ Print “考核不通过 ！“ Case Else Print “输入数据不合法！“ End Select End SubA. 程序运行错 B. 在窗体上显示“考核通过！“ C. 在窗体上显示“考核不通过 ！“D. 在窗体上显示“输入数据不合法！“正确答案：B，你的答案：A ， 16. 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As String aInputBox(“请输入一个二进制数“) nLen(a) For i1 To n DecDec * 2_(a， i， 1) Next i Print Dec End Sub 程序功能为：单击命令按钮，将产生一个输入对话框，此时如果在对话框中输入一个二进制数，并单击“确定“ 按钮，则把该二进制数转换为等值的十进制数。这个程序不完整，应在“_“处填入的内容是( )。A. RightB. MidC. LeftD. Val正确答案：B，你的答案：B ， 17. 在窗体上画一个名称为 Command1 的命令按钮，编写如下事件过程： Private Sub Command1_Click() n0 For i0 To 10 X2 * i1 If X Mod 30 Then nn1 Next i Print n End Sub 运行程序，单击命令按钮，则窗体上显示的是( )。A. 5B. 1C. 7D. 3正确答案：D，你的答案： B， 18. 在窗体上画一个名为 Command1 的命令按钮，然后编写以下程序： Private Sub Command1_Click() Dim M(10)As Integer For k1 To 10 M(k)12k Next k x8 Print M(2M(x) End Sub 运行程序， 单击命令按钮，在窗体上显示的是( )。A. 5B. 7C. 6D. 8正确答案：C，你的答案： B， 19. 窗体上有 1 个名称为 Command1 的命令按钮，事件过程如下： Private Sub Command1_Click() Dim x%， y%， z% xInputBox(“ 请输入第 1 个整数“) yInputBox(“请输入第 2 个整数 “) Do Until xy If xy Then xxy Else yyx Loop Print x End Sub 运行程序，单击命令按钮，并输入 2 个整数 169 和 39，则在窗体上 显示的内容为( )。A. 13B. 23C. 11D. 39正确答案：A，你的答案：A ， 20. 以下能够正常结束循环操作的程序段是A. i = 5 Do i = i + 2 Loop Until i = 1B. i = 0 Do While i 0 i = i - 2 Loop正确答案：D，你的答案： D， 21. 在窗体上画两个文本框(名称分别为 Text1 和 Text2)和一个命令按钮(名称为 Command1)，然后编写如下事件过程： Private Sub Co