第 1 次作业一、单项选择题（本大题共 60 分，共 20 小题，每小题 3 分）1. 下列程序段的执行结果为（ ）。 a=10:b=30 If aA. 10B. 30C. 10 30D. 30 102. 语句 X=X+1 的正确含义是（ ）。A. 变量 X 的值与 X+1 的值相等B. 将变量 X 的值存到 X+1 中去C. 将变量 X 的值加 1 后复制给变量 XD. 变量 X 的值为 13. 复选框控件其 Value 属性的可取值是（ ）。A. 20. 以下语句输出结果是（ ）。 Private Sub Form_Click() A="Beijing" b="ShangHai" Print a;b End Sub A. Beijing ShangHaiB. AbeijingShangHaiC. BeijingShangHaiD. Abeijing二、判断题（本大题共 40 分，共 20 小题，每小题 2 分）1. 使用 Call 语句调用事件过程时，实参数必须包含在括号内.2. 数组默认下标从 1 开始，若希望下标从 0 开始，可在数组声明之前或模块的通用部分使用 Option Base 语句将其设为 0。3. 折半查找必须在一个有序的数据序列中进行。4. 在 VB 程序中过程不能嵌套定义。5. 在 VB 中，定义数组时，其下标允许是变量、常量或者表达式。6. 过程的递归调用可以看成是一种特殊的过程嵌套调用。7. 静态局部变量也是局部变量，它的值也只能定义它的过程内使用。但是它的生存期是整个程序运行期间。8. 在选择结果嵌套语句中，既可以出现分之内嵌套，也可以出现交叉嵌套。9. 可以通过 Option Base 1 设定数组的下标从 1 开始。10. 调用函数 Function 过程的方法与调用 VB 内部函数的方法一样。11. 图像框除了可以显示图形之外，还可以作为其它控件的容器。12. 要想弹出菜单,可以用 PopupMenu 方法.。13. 在 VB 中，&是整型类型符，%是长整型类型符。14. Visual Basic 提供了列表框控件，当列表框中的项目较多、超过了列表框的长度时，系统会自动在列表框边上加一个滚动条。15. 使用 Call 调用 Function 过程时，不需要实参。16. 折半查找中，一般选取和待查表中所有记录的平均值相近的记录作为基准。17. 当滚动条位于最右端或顶端时，表示其值最大，反之为最小。 18. 有 n 个记录的冒泡排序最多进行 n 趟。19. Function 过程的定义语句中 Public 关键字表示过程是全局的、公有的，可以被程序中任何模块使用。20. 动态数组常用于存储数据类型不断变化的数据。答案：一、单项选择题（60 分，共 20 题，每小题 3 分）1. C 2. C 3. D 4. C 5. C 6. A 7. A 8. C 9. D 10. D 11. B 12. D 13.B 14. B 15. C 16. A 17. C 18. A 19. C 20. C 二、判断题（40 分，共 20 题，每小题 2 分）1. √ 2. × 3. √ 4. √ 5. × 6. √ 7. √ 8. × 9. √ 10. √ 11. × 12. √ 13. × 14. √ 15. × 16. × 17. × 18. × 19. √ 20. × True 和 False B. 0 和 1C. 1、2、3 D. 0、1、24. 语句 Picture.Cirle(500,800),800 能够在图片框 Picture 中画出的图形是（）。A. 圆弧 B. 椭圆 C. 圆 D. 扇形5. 假定 picture1 和 text1 分别为图片框和文本框的名称，下列选项中不正确的语句是（）。A. print 25 B. picture1.print 25C. text1.print 25D. debug.print 256. 窗体上有一个名称为 Frame1 的框架（如图），若要把框架上显示的"Frame1"改为汉字"框架"，下列选项中正确的是（ ）。A. Frame1.Caption="框架"   B. Frame1.Name="框架"C. Frame1.Text="框架"D. Frame1.Value="框架"7. 要将单选按钮以图形的方式显示，需要设置的属性是（ ）。A. StyleB. Value C. CaptionD. Enabled8. 不能触发滚动条 Change 事件的操作是（ ）。A. 拖动滚动块B. 单击两端箭头C. 单击滚动块D. 单击箭头与滚动块之间的滚动条9. Sub 过程与 Function 过程最根本的区别是__________。A. Sub 过程可以使用 Call 语句或直接使用过程名调用，而 Function 过程不可以B. Function 过程可以有参数，Sub 过程不可以C. 两种过程参数的传递方式不同 D. Sub 过程的过程名不能返回值，而 Function 过程能通过过程名返回值10. 假如列表框（List1）有 4 个数据项，要把最后一个数据项“china”删除的语句是（ ）。A. 移去第一项B. 移去最后一项 C. 程序无操作D. 程序出错11. 关于 VB 描述错误的是（　　）。A. VB 集成开发环境是一组软件工具，集应用程序的设计、编辑、运行调试等于一体B. VB 是面向过程的程序设计语言C. VB 具有事件驱动的编程机制 D. VB 的工具箱窗口由被绘制成按钮形式的图标构成。12. 以下选项中，不属于单选按扭属性的是（ ）。A. Enabled B. CaptionC. NameD. Min13. 运行以下程序后，输出结果为_____________。 Private Sub Command1_Click() a=1:b=2:c=3 Call test(a,b+3,(c)) Print "main:";a;b;c End Sub Private Function test(p,m,n) p=p+1:m=m+1:n=n+1 Print "sub:";p;m;n End Function A.    sub:2 6 4 main:1 2 3B.   sub:2 6 4 main:2 2 3C.   sub:2 6 4main:2 6 4D.     sub:2 6 4 main:1 6 414. 若定义一维数组为：Dim a(i To j)，则该数组的元素为______个。A. j-iB. j-i+1C. j*iD. i+j15. 窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Integer, s As Integer a = 8 s = 1 Do s = s + a a = a－1 Loop While a <= 0 Print s; a End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是（）。 A. 7 9B. 34 0 C. 9 7D. 死循环16. 下列程序段中在 Text1 中输入 202，则 Text2 中的结果为（ ）。 x = Val(Text1.Text) Select Case x Case Is < -100, Is > 200 y="x<-100 or x>200" Case Is < 0 y = 100 - x Case Is <= 100 y = 100+ x Case Is <= 200 y = 400 End Select Text2.Text = y A. x<-100 or x>200B. -102C. 302D. 40017. 如果要求该程序执行 3 次循环，则应在程序中的括号里输入（ ）。 X=1 do x=x+3 print x loop until(___) A. x>=7B. x<=7   C. x>=8    D. x<=818. 假定有一个菜单项，名为 MenuItem，为了在运行时使该菜单无效（变灰），应使用的语句为（ ）。A. MenuItem.Enabled=FalseB. MenuItem.Enabled=TrueC. MenuItem.Visible= TrueD. MenuItem.Visible= False19. 有如下语句，执行后该段语句的循环次数是（）。 Dim s,I,j as integer For I =1 to 3 For j=3 To 1 Step-1 S=I*j Next j Next I A. 3B. 4C. 9D. 10