【浙江】07759《Visual Basic程序设计》 自学考试大纲

[07759]
《Visual Basic程序设计》 自学考试大纲
浙江省教育考试院
二零一六年十二月

自学用书：Visual Basic 程序设计，郭红 李芙玲 主编，清华大学出版社，2016年3月第一版

一、课程性质与设置目的要求
《Visual Basic 程序设计》课程是全国高等教育自学考试信息类专业的考试课程。Visual Basic是微软公司推出的一种可视化、面向对象和事件驱动方式的结构化高级程序设计语言，能用于Windows环境下的各种应用软件的开发，具有简单易学、应用广泛等特点。教材《Visual Basic 程序设计》以Visual Basic 6.0为集成开发环境，
设置本课程的目的是：使自学应考者掌握结构化程序设计方法，具备可视化程序开发能力；具有利用计算机解决实际问题能力，培养分析和归纳问题的能力，以满足专业课应用以及继续学习的需要。
学习本课程的要求是：以过程设计为主线掌握结构化程序设计的方法；熟悉VB的常用控件以及他们的常用方法、属性和事件；掌握面向对象程序设计的方法和编程技巧，能够灵活使用VB编制解题程序。
《Visual Basic 程序设计》也是一门操作性和应用性很强的课程，在自学过程中，需要安排一定的时间上机操作实践，以提高学习效率。

二、考核内容及目标
第1章 Visual Basic 程序设计概述
1、学习目的和要求
通过本章的学习，了解Visual Basic的发展和特点，熟悉Visual Basic 6.0的开发环境，掌握创建简单的Visual Basic应用程序基本步骤，了解Visual Basic应用程序的基本组成。
2、考核知识点
（1）Visual Basic发展和特点
（2）Visual Basic集成开发环境
（3）创建简单Visual Basic应用程序基本步骤
（4）Visual Basic应用程序基本组成
3、考核要求
（1）识记： Visual Basic发展和特点
（2）理解： Visual Basic集成开发环境、创建简单Visual Basic应用程序基本步骤、Visual Basic应用程序基本组成
第2章 简单Visual Basic 程序设计
1、学习目的和要求
通过本章的学习，理解面向对象程序设计的基本概念，了解对象的公共属性，掌握窗体、标签、文本框、命令按钮、图片框和图像框等控件的使用，熟悉Visual Basic程序结构和编码规则。
2、考核知识点
（1）面向对象程序设计的基本概念
（2）对象的公共属性
（3）窗体、标签、文本框、命令按钮、图片框和图像框控件
（4）Visual Basic程序结构
（5）Visual Basic编码规则
3、考核要求
（1）识记：对象的公共属性、Visual Basic程序结构、Visual Basic编码规则
（2）理解：面向对象程序设计的基本概念
（3）简单应用：能用窗体、标签、文本框、命令按钮、图片框和图像框控件编制界面美观、交互性好的应用程序
第3章 Visual Basic 语言基础
1、学习目的和要求
通过本章的学习，了解Visual Basic的数据类型、常量和变量，掌握运算符、表达式和常用内部函数的使用。
2、考核知识点
（1）数据类型
（2）常量和变量
（3）运算符和表达式
（4）常用内部函数
3、考核要求
（1）识记：数据类型、常量和变量
（2）理解：运算符
（3）简单应用：能利用常用内部函数，能将实际问题用恰当的表达式进行表示
第4章 顺序结构程序设计
1、学习目的和要求
通过本章的学习，熟悉程序算法和三种控制结构，理解程序的赋值语句、结束和暂停语句，掌握Print方法、Format函数、InputBox函数、MsgBox函数与过程的数据输入输出，掌握程序调试方法。
2、考核知识点
（1）程序算法、三种程序控制结构
（2）赋值语句、结束和暂停语句
（3）数据输入输出
（4）程序调试
3、考核要求
（1）识记：程序算法、三种程序控制结构
（2）理解：赋值语句、结束和暂停语句，数据输入输出，程序调试方法
（3）简单应用：编写顺序结构程序
第5章 选择结构程序设计
1、学习目的和要求
通过本章（课程的重点章节之一）的学习，熟练掌握选择结构程序设计方面的知识，包括If语句、Select Case语句、条件语句的嵌套和条件函数的使用。掌握单选按钮、复选框和框架三种基本控件的使用。
2、考核知识点
（1）If语句
（2）Select Case语句
（3）条件语句的嵌套
（4）条件函数
（5）单选按钮、复选框和框架
3、考核要求
（1）识记：选择结构程序流程
（2）理解：If语句、Select Case语句、条件函数
（3）简单应用：单选按钮、复选框和框架的使用
（4）综合应用：编写选择结构程序
第6章 循环结构程序设计
1、学习目的和要求
通过本章（课程的重点章节之一）的学习，熟练掌握循环结构程序设计，包括For…Next语句、Do…Loop语句和While…Wend语句。掌握滚动条、进度条和定时器三种基本控件的使用。
2、考核知识点
（1）For…Next语句
（2）Do…Loop语句
（3）While…Wend语句
（4）三种循环的比较
（5）循环的嵌套
（6）滚动条、进度条和定时器
3、考核要求
（1）识记：循环结构程序流程
（2）理解：For…Next语句、Do…Loop语句、While…Wend语句、循环的嵌套
（3）简单应用：滚动条、进度条和定时器三种基本控件的使用
（4）综合应用：编写循环结构程序
第7章 数组与自定义类型
1、学习目的和要求
通过本章（课程的重点章节之一）的学习，理解数组的概念，熟练掌握一维数组、二维数组和动态数组的使用。掌握列表框和组合框控件的使用。
2、考核知识点
（1） 一维数组
（2） 二维数组及多维数组
（3）动态数组
（4）控件数组
（5）自定义数据类型及其数值
（6）列表框和组合框
3、考核要求
（1）识记：控件数组
（2）理解：一维数组、二维数组及多维数组、动态数组、自定义数据类型及其数值
（3）简单应用：列表框和组合框
（4）综合应用：分类统计、排序问题、查找问题、二维数组的求和和最大值（最小值）问题、求平均数、矩阵问题等
第8章 过程
1、学习目的和要求
通过本章（课程的重点章节之一）的学习，熟练掌握函数过程与子过程的定义和调用，调用过程时的参数传送、过程的嵌套调用和递归调用，变量和过程的作用域。
2、考核知识点
（1） 函数过程
（2） 子过程
（3） 参数传递
（4） 过程的嵌套及递归调用
（5） 变量、过程的作用域
3、考核要求
（1）识记：函数过程和子过程的定义和调用
（2）理解：参数传递、过程的嵌套及递归调用、变量和过程的作用域
（3）综合应用：将5、6、7、8章中的示例或习题编制为函数过程或子过程
第9章 菜单与对话框的设计
1、学习目的和要求
通过本章的学习，熟练掌握菜单设计、对话框和多重文档界面设计。
2、考核知识点
（1）菜单设计
（2）对话框
（3）多重文档界面
3、考核要求
（1）简单应用：使用通用对话框控件设计“打开”对话框、“另存为”对话框、“颜色”对话框和“字体”对话框
（2）综合应用：用菜单编辑器设计下拉式菜单设计，多重文档界面设计
第10章 文件
1、学习目的和要求
通过本章的学习，了解文件的概念，熟悉顺序文件、随机文件和二进制文件的读写操作，熟悉文件控件的使用。
2、考核知识点
（1）文件的概念
（2） 顺序文件
（3） 随机文件
（4） 二进制文件的操作
（5） 文件管理控件
3、考核要求
（1）识记：文件的概念、文本文件的打开与关闭
（2）理解：文件管理控件
（3）综合应用：从文件输入数据，经处理后输出到磁盘文件。
第11章 键盘事件与鼠标事件
1、学习目的和要求
通过本章的学习，掌握键盘KeyPress、KeyDown、KeyUp事件，鼠标MouseDown、MouseUp和MouseMove事件及其编程方法。了解设置鼠标指针和拖放操作。
2、考核知识点
（1）键盘事件
（2）鼠标事件
（3）设置鼠标指针
（4）拖放操作
3、考核要求
（1）识记：设置鼠标指针、拖放操作
（2）理解：键盘KeyPress、KeyDown、KeyUp事件，鼠标MouseDown、MouseUp和MouseMove事件
第12章 图形操作
1、学习目的和要求
通过本章的学习，掌握Visual Basic的图形控件和图形方法。熟练掌握直线Line控件和形状Shape控件，Line、Circle、PSet、Point等图形方法。熟悉VB坐标系、自定义坐标系。
2、考核知识点
（1）图形控件
（2）Visual Basic坐标系
（3）绘图属性
（4）图形方法
3、考核要求
（1）识记：VB坐标系、直线Line控件、形状Shape控件、绘图属性
（2）理解：自定义坐标系的Scale方法
（3）综合应用：Pset、Point、Line、Circle方法处理图象。
三、题型举例（题型仅作参考，实际命题时不受此限）
一、判断题 在每小题后的括号内填入“√”或“×”表示其正确与否（共10分，每题1分）

1. 1. Visual Basic是以结构化的Basic语言为基础、以事件驱动作为运行机制的可视化程序设计语言。 【 】

1. 1. VB的Double类型数据可以精确表示其数值范围内的任何实数【 】

1. 1. For循环语句中的“STEP 1”可以缺省【 】

1. 1. 要在文本框中输入6位密码，并按回车键确认，则文本框的MaxLength属性可设置为6 【 】

1. 1. 用Public声明的数组是全局量【 】

1. 1. 单选按钮控件数组的各控件响应同一个Click事件，由Index值来区分不同的按钮【 】

1. 1. 用DIM定义数值变量时，该数值变量自动赋初值为0【 】

1. 1. “方法”是用来完成特定操作的特殊子程序【 】

1. 1. 在VB6.0中利用菜单编辑器，还可以设计弹出式菜单【 】

1. 1. VB忽略用INPUT方式打开一个不存在的磁盘文件【 】
      二、单项选择题 在每小题中的括号内以字母A、B、C或D表示选择结果（共20分，每题2分）

1. 1. 由“For i=1 To 16 Step 3”决定的循环结构被执行【 】次
      A、4 B、5 C、6 D、7

1. 1. Int( Rnd * 100 ) 表示的是【 】范围内的整数
      A、[0，100] B、[1，99] C、[0，99] D、[1，100]

1. 1. 下列【 】属性用来表示标签或窗体的标题
      A、Text B、Caption C、Left D、Name

1. 1. 列表框控件List1中，所有的表项的总数可以表示为【 】。
      A、List1.ListCount B、List1.ListCount-1 C、List1.AddItem D. List1.DataField

1. 1. 设置图形的填充样式，应使用的属性是【 】
      A、BackStyle B、FillColor C、FillStyle D、BorderStyle

1. 1. 在图片框控件pic1上坐标（x,y)处画一个红点，写作【 】
      A、Pset(x,y),Rgb(255,0,0) B、Pic1.Pset(x,y),Red
      C、Pset(x,y),Red D、Pic1.Pset(x,y),vbRed

1. 1. RGB函数中的3个数字分别表示【 】
      A、红绿白 B、红绿蓝 C、色调、饱和度、亮度 D、当前色、背景色、前景色

1. 1. 用DIM(1,3 TO 7,10)声明的是一个【 】维数组
      A、1 B、2 C、3 D、4

1. 1. 执行Sub过程中的语句【 】可结束调用该Sub过程。
      A、Exit Sub B、Break Sub C、 Break D、 Exit

1. 1. 同层次菜单项的【 】属性设置为相同，才可以设置索引值、组成控件数组。
      A、Caption B、Name C、Index D、ShortCut
      三、程序填空题（共22分，每小题2分）
      阅读下列各程序，根据程序说明在每小题提供的若干可选答案中挑选一个正确答案，用字母A、B、C或D填写在程序中划线处。
      1.【程序说明】单击窗体后输入n，计算并显示表达式的值。

【程序】
Private Sub Form_Click()
Dim s As Single, n As Integer, i As Integer, f As Integer
n = InputBox(“n=”)
s = 0.5 : ⑴
For i = ⑵
f = -f: ⑶
Next i
Print s
End Sub
【供选择的答案】
⑴ A、f = 0 B、f = 1 C、f = -1 f = 2
⑵ A、1 To n B、2 To n C、3 To n D、0 To n
⑶ A、s=s+fi B、s=s+f/i C、s= fi D、s= f/i
2.【程序说明】自定义Sub过程s2，将一维数组中n个元素按值从小到大重新排序。
【程序】
Private Sub s2( x() As Single, n As Integer)
Dim i As Integer, j As Integer, k As Integer, t As Single
For i = ⑴
⑵
For j = i + 1 To n
If ⑶ Then k =j
Next j
t = x(i): ⑷ : x(k) = t
Next i
End Sub
【供选择的答案】
⑴ A、1 To n B、1 To n – 1 C、1 To n + 1 D、0 To n – 1
⑵ A、k = i B、k = j C、k = 1 D、i = k
⑶ A、x(i) < x(j) B、x(i) = x(k) C、x(i) > x(k) D、x(i) < x(k)
⑷ A、t = x(k) B、x(i) = x(k) C、x(k) = x(i) D、x(k) = t

3. 3. 【程序说明】文本文件e:\score.txt中，每行学生信息格式如下（姓名、成绩1、成绩2）。编制事件过程Command1_Click，为每个学生的信息中增加数据项总分。
      “张三”,77,66
      “李四”,78,87
      …….
      【程序】
      Private Sub Command1_Click()
      Dim xm As String, cj1 As Integer, cj2 As Integer
      Open “e:\score.txt” For Input As #1
      Open “xxx.tmp” For ⑴ As #2
      Do While ⑵
      Input #1, xm, cj1, cj2
      ⑶
      Loop
      Kill “e:\score.txt”
      ⑷
      End Sub
      【供选择的答案】
      ⑴ A、Output B、Write C、Output Locked D、Write Locked
      ⑵ A、Not Eof(1) B、Not Eof(2) C、Eof(1) D、Eof(2)
      ⑶ A、Write #1,xm,cj1,cj2,cj1+cj2 B、Print #1,xm,cj1,cj2,cj1+cj2
      C、Write #2,xm,cj1,cj2,cj1+cj2 D、Line Print #1,xm,cj1,cj2,cj1+cj2
      ⑷ A、Name “xxx.tmp”,”e:\score.txt” B、Name “xxx.tmp” As “e:\score.txt”
      C、Name xxx.tmp As e:\score.txt D、Name xxx.tmp ,e:\score.txt
      四、程序阅读题（共22分，每小题2分）
      阅读下列各程序并回答问题，在每小题提供的若干可选答案中挑选一个正确答案，用字母A、B、C或D填写在每小题后的括号内。
      1.【程序】
      Dim k As Integer
      Private Sub f(n As Integer)
      If n Mod k = 0 Then Print k;: n = n \ k Else k = k + 1
      End Sub
      Private Sub Command1_Click()
      Dim m As Integer
      k = 2: m = Val(InputBox(“m=”))
      Do While m > 1
      Call f(m)
      Loop
      End Sub
      【问题与供选择的答案】
      ⑴ 单击Command1后输入6，窗体上显示结果为【 】
      A、3 2 B、2 3 C、5 4 D、4 5
      ⑵ 单击Command1后输入8，窗体上第2行显示结果为【 】
      A、2 4 B、4 2 C、2 2 D、2 2 2
      ⑶ 单击Command1后输入30，窗体上第3行显示结果为【 】
      A、5 6 B、2 3 5 C、2 5 D、2 5 3
      ⑷ 单击Command1后输入60，窗体上第4行显示结果为【 】
      A、2 3 5 B、2 2 3 5 C、2 5 6 D、2 6 5
      2.【程序】
      Private Sub Command1_Click()
      Do
      If List1.List(0) < List2.List(0) Then
      List3.AddItem List1.List(0): List1.RemoveItem 0
      Else
      List3.AddItem List2.List(0): List2.RemoveItem 0
      End If
      Loop Until List1.ListCount = 0 Or List2.ListCount = 0
      End Sub
      【问题与供选择的答案】
      ⑴ 如List1中各表项为2、6、9，List1中各表项为1、5、8，List3原为空表，单击Command1后List3中各表项依次为【 】
      A、1 6 9 B、1 2 5 6 8 C、1 2 5 6 8 9 D、2 5 8
      ⑵ 如List1中各表项为1、5、8，List1中各表项为2、6、9，List3原为空表，单击Command1后List3中各表项依次为【 】
      A、1 6 9 B、1 2 5 6 8 C、1 2 5 6 9 D、2 5 8
      ⑶ 如题⑵，单击Command1后List1或List2中非空表以及表中剩余表项为【 】
      A、无 无 B、List1 8 C、List2 9 D、List1 8
      3.【程序】
      Dim k As Integer
      Private Sub Form_Load()
      P1.Scale (-100, 100)-(100, -100): k = 0: P1.DrawWidth = 5
      Timer1.Interval = 10: Timer1.Enabled = True
      End Sub
      Private Sub Timer1_Timer()
      P1.Circle(0,0),80,vbRed,k3.141593/180,(k+1)3.141593/180
      k = k + 1
      If k = 360 Then Timer1.Enabled = False
      End Sub
      【问题与供选择的答案】
      ⑴ 运行终止时，图片框控件P1中的显示为：
      A、扇形 B、红色实心圆 C、红色边线的一段圆弧 D、红色边线的圆
      ⑵ 运行时P1中的圆或圆弧或扇形的绘制方式是：
      A、顺时针 B、逆时针 C、起点在12点方向 D、起点在9点方向
      ⑶ 运行时P1中的圆或圆弧或扇形的半径为：
      A、5 B、10 C、80 D、100
      4 将Timer过程中Circle语句内的“k3.141593/180,(k+1)3.141593/180”改为“-k3.141593/180,-(k+1)3.141593/180”，绘图终止时p1中显示：
      A、红色实心圆 B、 黑色实心圆 C、半圆形 D、半个圆弧

五、程序设计题（每题13分，共26分）

1. 1. 编制事件过程Command1_Click，输入n（n为1位正整数），输出n+1层的杨辉三角形。如n为6时，输出结果如图所示。

1. 1. 编制通用Sub过程，在一个m行n列二维数组中查找绝对值最大的元素，以及该元素的行号、列号（提示：Sub过程的形参列表如x() As Single, m As byte, n As Byte, xmax As Single,ki As Byte,kj As Byte）。