人力资源-VisualBasic程序设计课程考核说明.docx

Visual Basic程序设计课程考核说明

一、课程考核有关说明
Visual Basic程序设计课程是中央广播电视大学软件开发与应用专业和计算机应用专业的统设必修课。课程教学总学时数为90学时，5学分。其中授课学时为54学时，实验课学时为36学时。
（一）考核对象：中央电大软件开发与应用专业和计算机应用专业专科学生。
（二）考核方式：本课程采用形成性考试与终结性考试相结合的考试方式。
（三）命题依据：本课程依据课程的教学大纲要求命题，实行全国统一考试，所使用的文字教材是中央电大出版社出版的《Visual Basic程序设计》（刘世峰主编）。本课程考核说明是形成性考核与终结性考试命题的基本依据。
（四）课程总成绩的记分方法：形成性考核成绩占总成绩的20%，终结性考试成绩占总成绩的80%。课程总成绩按百分制记分，60分为合格。
（五）形成性考核的形式及要求：形成性考核主要考核学生平时作业成绩及实验的完成状况，依作业及实验的平时成绩由各地方电大的课程主管教师给分。中央电大将不定期随机抽检各地电大学生的作业及实验报告。
(六)终结性考核的要求及形式
1．考核要求
本课程考核学生以下知识和能力
（1）了解：Visual Basic集成开发环境。ActiveX的简单应用。
（2）理解：对象的概念、可视化编程和事件驱动的基本特性。
（3）掌握：常用控件及其属性、事件和方法；基本数据类型、常量、变量、常用函数、表达式运算；Visual Basic6.0基本语句和基本结构，数组和子程序的调用；文件系统控件和Winsock控件的基本用法；VB坐标系统的原理，简单图形图像的基本处理方法；VB数据库应用程序的基本框架、SQL操纵数据的方法。具备阅读、编写和调试简单Visual Basic应用程序的能力。
2．组卷原则
依“Visual Basic程序设计”教学大纲规定的要求，按掌握、理解、了解三个层次命题。以大纲中所要求的“掌握内容”为主，约占60%，“理解内容”为辅，约占30%，了解的内容较少，约占10%。
试题覆盖面广，并突出重点。
在教学内容范围内，按照理论联系实际的原则，考察学生对所学知识应用能力的试题，不属于超纲。
3．试题类型及试卷结构
试题题型有选择、填空、阅读程序、完善程序和编程序等题型。其中较容易和较难试题各占15%。
4．考试形式
终结性考试采用闭卷笔试，
答题时限120分钟。

二、课程考核内容和要求

第一章 可视化编程理论概述（3学时）
[考核知识点]
1．可视化编程的概念和特点
2．VB集成开发环境
3．Visual Basic 与其它可视化程序的区别
[考核要求]：
1．掌握VB工程的概念及管理方法
2．理解可视化编程的概念和特点
3．了解目前流行的可视化编程工具的种类和主要特色

第二章 VB可视化编程初步（6学时）
[考核知识点]
1．创建VB应用程序的一般步骤，建立用户界面对象；
2．赋值语句、MsgBox语句或函数的使用、变量与常量；
3．窗体、标签、命令按钮和文本框的常用属性、方法和事件；
4．对象及对象的属性、方法和事件的概念，事件过程和事件驱动；
5．时钟控件基本应用
[考核要求]：
1．掌握VB应用程序开发的一般步骤。
2．掌握MsgBox的用法，能够使用该语句或函数进行程序设计。
3．掌握窗体、命令按钮、文本框、标签、Timer控件的用法，能够运用Name、Caption、Text、Enabled、Disable、ReadOnly等基本属性，以及Load、Unload、Click、DBClick、Chang等基本事件和Load、Unload语句进行程序设计。
4．理解赋值语句、变量和常量的概念。
5．理解对象的概念、事件驱动的原理。

第三章 应用程序接口设计及代码编写（8学时）
[考核知识点]
1．可视化界面设计
菜单设计和应用、多窗体设计、MDI多文档窗体的设计
2．常用控件：单选钮、复选框、控件列表框控件、组合框控件、工具栏、状态栏和图标列表控件、通用对话框控件
3．常用内部函数
4．运算符和表达式
5．常用数据类型
6．工程化思想及编程风格
7．流程控制语句
[考核要求]：
1．掌握可视化界面设计的方法
2．掌握变量和常量的作用域、作用范围及用法。能够编写变量和常量的声明、赋值等语句，并通过阅读程序，分析变量取值的变化过程。
3．掌握运算符及流程控制语句的用法，能够编写各种运算表达式，以及具有分支、循环、顺序结构的简单程序。
4．理解工程化思想和编程风格
5．理解常用函数的使用方法
6．了解窗体设计的基本原则
7．了解“简单计算器”程序设计过程，能够读懂并完善这类程序的部分语句。

第四章 VB高级语言技巧（7学时）
[考核知识点]：
1．API函数声明和调用方法
2．枚举及自定义数据类型
3．数组的使用
数组的基本概念、静态及动态数组的声明、控件数组的建立及使用
4．Sub过程和函数过程的定义和调用
5．参数传递机制基本概念
6．键盘使用技巧
KeyPress事件、KeyDown和KeyUp事件
7．鼠标使用技巧
MouseMove、MouseDown、MouseUp事件
[考核要求 ]：
1．掌握数组的使用方法，能够声明一维、二维静态和动态数组，并能够在程序中完成针对数组（包括控件数组）的赋值、表达式各种处理语句。
2．掌握键盘、鼠标的使用技巧，能够针对KeyPress、KeyDown、KeyUp和MouseMove、MouseDown、MouseUp等事件进行程序设计。
3．掌握过程和函数的定义和调用方法，能够编写自定义过程和函数。
4．掌握API函数的调用方法，能够在给出的程序代码中利用Public和Private关键字，补充完善API函数的声明。
5．了解枚举及自定义数据类型，能够在给出的程序代码中找出对这种数据类型的定义，并依此编写简单的变量声明和赋值语句。

第五章 文件处理应用程序设计方法（4学时）
[考核知识点]：
1．相关的语句和函数
改变当前驱动器、改变当前目录、建立和删除目录、删除文件、设置文件的属性、得到当前可执行文件的路径
2．文件系统控件介绍
驱动器列表框、目录列表框、文件列表框
3．文件读写的基本方法
顺序文件访问、随机文件访问、二进制文件访问
[考核要求]：
1．掌握文件读写的基本方法
2．掌握与文件处理相关的语句和函数的用法，并能够完善程序。
3．理解文件系统控件的基本功能，能够通过对驱动器列表框、目录列表框、文件列表框三类控件的属性设置，编写简单的文件管理程序。
4．了解“文件管理器”应用程序的开发过程，能够读懂并完善这类程序的部分语句。

第六章 图形图像和多媒体应用程序设计方法（6学时）
[考核知识点]
1．VB坐标系统和颜色
坐标系、改变坐标系统的方法；RGB和QBColor函数
2．Shap控件和Line控件，Image和PictureBox控件，MMControl（Multimedia）控件
3．绘图方法
画点方法Pset，画直线、矩形方法，画圆方法
4．与绘图有关的常用属性和方法
线宽、线型、填充颜色和填充样式等；清除图像方法
5．播放多媒体信息的基本方法
[考核要求]：
1．掌握图形图像的基本处理方法。
2．理解VB坐标系统的原理。
3．理解“指针式时钟”程序的设计方法，能够读懂并完善这类程序的部分语句。
4．理解“VCD播放器”程序设计的方法，能够读懂并完善这类程序的部分语句。
5．掌握图形控件和多媒体控件的使用和与绘图有关的常用属性和方法。
6．了解播放多媒体信息的基本方法

第七章 数据库应用程序设计方法（8学时）
[考核知识点]
1．数据库概念
2．VB数据对象及数据库访问机制
3．数据库控件和可视化数据管理器
4．报表设计
[考核要求]：
1．掌握VB数据库应用程序的基本框架，以及SQL操纵数据的方法，能够编写Insert、Update、Delete和Select语句，并将这些语句嵌入到VB程序中。
2．理解使用VB数据库引擎操纵数据库的方法，以及VB数据对象及数据库访问机制，能够运用ADO对象进行程序设计
3．了解使用Excel输出报表的方法，能够在给出的程序代码中，完善对Excel对象的简单的操作语句。
4．了解“成绩查询”程序的设计过程，能够读懂并完善这类程序的部分语句。

第八章 网络应用程序设计方法（4学时）
[考核知识点]：
1．Winsock控件的主要属性、方法和事件
2．基于Winsock控件的开发模式
3．网络应用程序设计
[考核要求]：
1．掌握Winsock控件的基本属性和事件、方法，能够利用Winsock控件进行程序设计。
2．了解网络应用程序设计的基础知识。
3．了解“网络聊天”应用程序的开发过程，能够读懂并完善这类程序的部分语句。

第九章 调试与错误处理（4学时）
[考核知识点]：
1．程序错误分类
2．程序调试方法
3．错误捕获及处理方法
[考核要求]：
1．掌握程序调试的基本方法
2．掌握错误捕获及处理的基本方法，能够使用On Error Goto、On Error Resume语句进行程序设计，能够使用Err对象和MsgBox语句或函数显示错误信息。
3．了解程序错误的分类

第十章 Com和ActiveX应用（4学时）
[考核知识点]：
1．ActiveX模型的基本概念和内容
2．ActiveX控件（OCX控件）编程
[考核要求]：
1．了解ActiveX EXE组件开发应用方法。
2．了解ActiveX DLL组件开发应用方法。
3．了解ActiveX 控件开发应用方法。

三、试题类型及规范解答举例
一、单项选择题（每题2分，共30分）
1．在设计应用程序时，可以查看到应用程序工程中所有组成部分的窗口是（ ）。
A、窗体设计器 B、代码编辑器窗口
C、属性窗口 D、工程资源管理器窗口
2．窗体的Load事件的触发时机是（ ）
A、用户单击窗体时 B、窗体被加载时
C、窗体显示之后 D、窗体被卸载时
3．与传统的程序设计语言相比，Visual Basic最突出的特点是（ ）
A、结构化程序设计 B、程序开发环境
C、事件驱动编程机制 D、程序调试技术
4．无论何种控件，共同具有的属性是（ ）。
A．Text属性 B．Caption属性 C．Name属性 D．Autosize属性
5．如果对象的名称为Mytext，而且对象有一个属性Text，那么在代码中引用该属性的正确格式是（ ）
A、Text.Mytext B、Mytext.Text
C、Mytext.(Text) D、 Mytext*Text
6．按照变量的作用域可将变量划分为（ ）
A、公有、私有、系统 B、全局变量、模块级变量、过程级变量
C、动态、常数、静态 D、Public、 Private、 Protected
7．可获得字符的ASCII码的函数是（ ）。
A、Val B、Fix C、Asc D、Chr
8．要退出Do…Loop循环，可使用的语句是（ ）。
A、Exit B、Exit For C、End Do D、Exit Do
9．把数值型转换为字符串型需要使用的函数是（ ）。
A、Val B、Str C、Asc D、Chr
10．关于语句行，下列说法正确的是（ ）。
A、一行只能写一条语句 B、一条语句可以分多行书写
C、每行的首字符必须大写 D、长度不能超过255个字符
11．设置对象的边框类型的属性是（ ）
A、Drawstyle B、Borderstyle
C、DrawWidth D、ScaleMode
12.为了清除图片框Picture1中的图形，应采取的正确方法是（ ）
A、选择图片框，然后按Del键
B、执行语句Picture1.Picture = LoadPicture("")
C、执行语句Picture1.Picture = ""
D、选择图片框，在属性窗口中选择Picture属性条，然后按回车键
13．要绘制不同形状的图形，需要设置Shape控件的（ ）属性
A、Shape B、Borderstyle
C、FillStyle D、Style
14．要绘制多种式样的直线，需要设置Line控件的（ ）属性
A、Shape B、Borderstyle
C、FillStyle D、Style
15．如果准备读文件，打开顺序文件”text.dat”的正确语句是（ ）
A、open "text.dat" For wrire As # 1
B、open "text.dat" For Binary As # 1
C、open "text.dat" For Input As # 1
D、open "text.dat" For Random As # 1

二、填空题（每空1分，共15分）
1．Winsock控件主要用来编制 或UDP协议的通讯程序。
2．若窗体的左上角坐标为（-200，250），右下角坐标为（300，-150），则X轴的正向向右，Y轴的正向向 。
3．图像框对象的Stretch属性设置为 时，图像框可自动改变大小以适应其中的图形。
4．用Dim A(5,5)语句声明二维数组后，数组A的元素共有 个。
5．设CurrentX=50,CurrentY=100，执行指令“Line(100,20)-Step(300,500)”后，CurrentY = 。
6．使用Hide方法会隐藏被调用的窗体，但是在调用Hide方法之后不会把窗体移出内存，被调用的窗体中的属性等已处于 。
7．将下列数学式子写成Visual Basic运算表达式。
： 。
8．将1£ x <12写成Visual Basic逻辑表达式 。
9．设A=2，B=3，C=4，D=5。表达式Not A<=C Or 4*C = B^2 And B<>A+C的值为
。
10．在Visual Basic语言中有三种形式的循环结构。其中，若循环的次数可以事先确定，可使用For循环；若要求先判断循环进行的条件，可使用 循环或 循环。
11．以下语句的输出结果是 。
Dim a As Integer
a = 3.14159
Print a
12．ActiveX EXE文件的后缀是 。
13．VB中的程序错误类型主要有编译错误 、 等三种。

三、阅读程序题（每小题5分，共20分）
阅读下列程序并写出程序运行结果
1．Private Sub Form_Click()
Static Sum As Integer
For I = 1 To 2
Sum = Sum + I
Next I
Print Sum
End Sub
点击窗体两次后，变量Sum的值是：

2．Private Sub Form_Click()
Dim a,c As Integer
For a=1 To 5
c=a+1
Print c
Next a
End Sub
变量C的结果依次为：
3．Private Sub Command1_Click()
Dim A(1 To 5) As Integer
Dim b As Integer
For b = 1 To 5
A(b)=b
Next b
Text1.Text=A(b-2)
End Sub
文本框Text1的结果是：

4．Private Sub Command1_Click()
Text1.Text=2
Text2.Text=3
Text3.Text=Text1.Text+Text2.Text
Text4.Text=Val(Text1.Text)+Val(Text2.Text)
End Sub
文件框Text3和Text4的结果分别是：

四、完善程序题（每题10分，共20分）
1．程序运行界面如图1所示，要求在文本框Text1中任意输入一个整数，判定该整数的奇偶性,程序如下，请补充完整。

图1

提示：判断某整数的奇偶性，就是检查该数是否能被2整除，若能被2整除，该数为偶数，否则为奇数。
程序代码如下：
Private Sub Command1_Click()
'点击“判定”按钮
Dim x As Integer
x = [1]
Label2.FontName = "黑体"
Label2.FontSize = 20
If [2] Then
Label2.ForeColor = QBColor(12) ' 亮红色
Label2.Caption = "偶数"
Else
Label2.ForeColor = QBColor(9) '亮蓝色
Label2.Caption = [3]
[4]
End Sub

Private Sub Command2_Click()
'点击“清除”按钮
Text1.Text = [ 5]
End Sub

Private Sub Command3_Click()
'点击“结束”按钮
End
End Sub

2．已知SQL Server数据库管理系统中存在名称为“学生”的数据库，其中的“students”数据表的结构及初始记录如表1所示。要求使用ADO对象和MSFlexGrid控件设计数据库列表显示程序。程序的设计界面和运行结果如图1、图2所示。

表1
学号
姓名
专业
2004001
张红
软件专业
2004003
李强
会计专业
2004002
王丽
软件专业

图1

图2

程序如下，请补充完整。
'声明对象变量ADOcn，用于创建与数据库的连接
Private ADOcn As Connection

'ReadFromTable过程
Private Sub ReadFromTable()
Dim strtmp As String
Dim ADOrs As [1]
ADOrs.ActiveConnection = ADOcn
ADOrs.Open [2]

MSFlexGrid1.Clear
MSFlexGrid1.Rows = 0
MSFlexGrid1.Cols = 3
strtmp = "学号" + vbTab + "姓名" + vbTab + "专业"
MSFlexGrid1.AddItem strtmp

Do While Not ADOrs.EOF
strtmp = ADOrs("学号") + vbTab + ADOrs("姓名") + vbTab + ADOrs("专业")
MSFlexGrid1.AddItem strtmp
[ 3]
Loop
MSFlexGrid1.FixedCols = 0
MSFlexGrid1.FixedRows = 1
End Sub

Private Sub Form_Load()

'定义数据库连接字符串
Dim strDB As String

'用于连接SQL Server数据库，其中:
'Server为服务器名称
'User ID为登录账号
'Password为登录口令
'Database为具体的数据库名
strDB = "Provider=SQLOLEDB;LSF;User ID=sa;Password=;Database =学生"

'如果还没有建立与数据库的连接，则用以下代码创建。
If ADOcn Is Nothing Then
Set ADOcn = [4]
ADOcn.Open [ 5] '连接SQL Server数据库
End If
ReadFromTable '调用过程显示students表中的记录
End Sub

Private Sub Command1_Click()
Unload Me
End Sub

五、编写程序题（共15分）
请根据下列描述编写购物优惠程序。某商场为了加速促成商品流通，采用购物打折的优惠办法，每位顾客一次购物（1）在100元以上者，按九五折优惠；（2）在200元以上者，按九折优惠；（3）300元以上者，按八折优惠；（4）500元以上者按七折优惠。在窗体上添加两个文本框和一个命令按钮，要求在Text1中输入购物商品总金额，单击命令按钮，在Text2中输出优惠价。程序运行结果如图1所示。

图1

试题参考答案
一、单项选择题
1．D 2．B 3．C 4．C 5．B 6．B 7．C 8．D
9．B 10．B 11．B 12．B 13．A 14．B 15．C

二、填空题
1．TCP/IP（或者回答TCP协议）
2．上
3．False
4．36
5．520
6．无效状态
7．Sqr(s*(s-a)*(s-b)*(s-c))
8．x>=1 And x<12
9．False
10．While Do
11．3
12．EXE
13．实时错误 逻辑错误
三、阅读程序题
1．程序运行后，单击窗体两次后，Sum的值是：6。
2．程序运行后，单击窗体，输出结果为：2、3、4、5、6
3．程序运行后，单击Command1按钮，文件框对象Text1的结果为：4
4．程序运行后，单击Command1按钮，文件框对象Text3、Text4的结果分别为23、5

四、完善程序题
1．
[1] Val(Text1.Text)
[2] x Mod 2 = 0
[3] "奇数"
[4] End If
[5]""
或者
[1] Val(Text1.Text) Mod 2
[2] x = 0
[3] "奇数"
[4] End If
[5]""
2．
（1）New Recordset；
（2）"select * from students order by 学号"；
（3）ADOrs.MoveNext；
（4）New Connection；
（5）strDB；

五、编写程序题
Private Sub Command1_Click()
Dim x As Single, y As Single
x = Val(Text1.Text)
If x < 100 Then
y = x
Else
If x < 200 Then
y = 9.5 * x
Else
If x < 300 Then
y = 0.9 * x
Else
If x < 500 Then
y = 0.8 * x
Else
y = 0.7 * x
End If
End If
End If
End If
Text2.Text = y
End Sub