VisualBasic程序设计课程考核说明

1、Visual Basic程序设计课程考核说明一、课程考核有关说明Visual Basic程序设计课程是中央广播电视大学软件开发与应用专业和计算机应用专业的统设必修课。课程教学总学时数为90学时，5学分。其中授课学时为54学时，实验课学时为36学时。（一）考核对象：中央电大软件开发与应用专业和计算机应用专业专科学生。（二）考核方式：本课程采用形成性考试与终结性考试相结合的考试方式。（三）命题依据：本课程依据课程的教学大纲要求命题，实行全国统一考试，所使用的文字教材是中央电大出版社出版的Visual Basic程序设计（刘世峰主编）。本课程考核说明是形成性考核与终结性考试命题的基本依据。（四）课程

2、总成绩的记分方法：形成性考核成绩占总成绩的20%，终结性考试成绩占总成绩的80%。课程总成绩按百分制记分，60分为合格。（五）形成性考核的形式及要求：形成性考核主要考核学生平时作业成绩及实验的完成状况，依作业及实验的平时成绩由各地方电大的课程主管教师给分。中央电大将不定期随机抽检各地电大学生的作业及实验报告。(六)终结性考核的要求及形式1考核要求本课程考核学生以下知识和能力（1）了解：Visual Basic集成开发环境。ActiveX的简单应用。（2）理解：对象的概念、可视化编程和事件驱动的基本特性。（3）掌握：常用控件及其属性、事件和方法；基本数据类型、常量、变量、常用函数、表达式运算；V

3、isual Basic6.0基本语句和基本结构，数组和子程序的调用；文件系统控件和Winsock控件的基本用法；VB坐标系统的原理，简单图形图像的基本处理方法；VB数据库应用程序的基本框架、SQL操纵数据的方法。具备阅读、编写和调试简单Visual Basic应用程序的能力。2组卷原则依“Visual Basic程序设计”教学大纲规定的要求，按掌握、理解、了解三个层次命题。以大纲中所要求的“掌握内容”为主，约占60%，“理解内容”为辅，约占30%，了解的内容较少，约占10%。试题覆盖面广，并突出重点。在教学内容范围内，按照理论联系实际的原则，考察学生对所学知识应用能力的试题，不属于超纲。3试题

4、类型及试卷结构试题题型有选择、填空、阅读程序、完善程序和编程序等题型。其中较容易和较难试题各占15%。4考试形式终结性考试采用闭卷笔试，答题时限120分钟。二、课程考核内容和要求第一章 可视化编程理论概述（3学时）考核知识点1可视化编程的概念和特点2VB集成开发环境3Visual Basic 与其它可视化程序的区别考核要求：1掌握VB工程的概念及管理方法2理解可视化编程的概念和特点3了解目前流行的可视化编程工具的种类和主要特色第二章 VB可视化编程初步（6学时）考核知识点1创建VB应用程序的一般步骤，建立用户界面对象；2赋值语句、MsgBox语句或函数的使用、变量与常量；3窗体、标签、命令按钮

5、和文本框的常用属性、方法和事件；4对象及对象的属性、方法和事件的概念，事件过程和事件驱动；5时钟控件基本应用考核要求：1掌握VB应用程序开发的一般步骤。2掌握MsgBox的用法，能够使用该语句或函数进行程序设计。3掌握窗体、命令按钮、文本框、标签、Timer控件的用法，能够运用Name、Caption、Text、Enabled、Disable、ReadOnly等基本属性，以及Load、Unload、Click、DBClick、Chang等基本事件和Load、Unload语句进行程序设计。4理解赋值语句、变量和常量的概念。5理解对象的概念、事件驱动的原理。第三章 应用程序接口设计及代码编写（8学

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

7、计算器”程序设计过程，能够读懂并完善这类程序的部分语句。第四章 VB高级语言技巧（7学时）考核知识点：1API函数声明和调用方法2枚举及自定义数据类型3数组的使用 数组的基本概念、静态及动态数组的声明、控件数组的建立及使用4Sub过程和函数过程的定义和调用5参数传递机制基本概念 6键盘使用技巧KeyPress事件、KeyDown和KeyUp事件7鼠标使用技巧MouseMove、MouseDown、MouseUp事件考核要求 ：1掌握数组的使用方法，能够声明一维、二维静态和动态数组，并能够在程序中完成针对数组（包括控件数组）的赋值、表达式各种处理语句。2掌握键盘、鼠标的使用技巧，能够针对KeyP

8、ress、KeyDown、KeyUp和MouseMove、MouseDown、MouseUp等事件进行程序设计。3掌握过程和函数的定义和调用方法，能够编写自定义过程和函数。4掌握API函数的调用方法，能够在给出的程序代码中利用Public和Private关键字，补充完善API函数的声明。5了解枚举及自定义数据类型，能够在给出的程序代码中找出对这种数据类型的定义，并依此编写简单的变量声明和赋值语句。第五章 文件处理应用程序设计方法（4学时）考核知识点：1相关的语句和函数改变当前驱动器、改变当前目录、建立和删除目录、删除文件、设置文件的属性、得到当前可执行文件的路径2文件系统控件介绍驱动器列表框、

9、目录列表框、文件列表框3文件读写的基本方法顺序文件访问、随机文件访问、二进制文件访问考核要求：1掌握文件读写的基本方法2掌握与文件处理相关的语句和函数的用法，并能够完善程序。3理解文件系统控件的基本功能，能够通过对驱动器列表框、目录列表框、文件列表框三类控件的属性设置，编写简单的文件管理程序。4了解“文件管理器”应用程序的开发过程，能够读懂并完善这类程序的部分语句。第六章 图形图像和多媒体应用程序设计方法（6学时）考核知识点1VB坐标系统和颜色 坐标系、改变坐标系统的方法；RGB和QBColor函数2Shap控件和Line控件，Image和PictureBox控件，MMControl（Mult

10、imedia）控件3绘图方法 画点方法Pset，画直线、矩形方法，画圆方法4与绘图有关的常用属性和方法 线宽、线型、填充颜色和填充样式等；清除图像方法5播放多媒体信息的基本方法考核要求：1掌握图形图像的基本处理方法。2理解VB坐标系统的原理。3理解“指针式时钟”程序的设计方法，能够读懂并完善这类程序的部分语句。4理解“VCD播放器”程序设计的方法，能够读懂并完善这类程序的部分语句。5掌握图形控件和多媒体控件的使用和与绘图有关的常用属性和方法。6了解播放多媒体信息的基本方法第七章 数据库应用程序设计方法（8学时）考核知识点1数据库概念2VB数据对象及数据库访问机制3数据库控件和可视化数据管理器4

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

12、求：1掌握Winsock控件的基本属性和事件、方法，能够利用Winsock控件进行程序设计。2了解网络应用程序设计的基础知识。3了解“网络聊天”应用程序的开发过程，能够读懂并完善这类程序的部分语句。第九章 调试与错误处理（4学时）考核知识点：1程序错误分类2程序调试方法3错误捕获及处理方法考核要求：1掌握程序调试的基本方法2掌握错误捕获及处理的基本方法，能够使用On Error Goto、On Error Resume语句进行程序设计，能够使用Err对象和MsgBox语句或函数显示错误信息。3了解程序错误的分类第十章 Com和ActiveX应用（4学时）考核知识点：1ActiveX模型的基本概

13、念和内容2ActiveX控件（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、

14、程序开发环境 C、事件驱动编程机制 D、程序调试技术4无论何种控件，共同具有的属性是（ ）。AText属性 BCaption属性 CName属性 DAutosize属性5如果对象的名称为Mytext，而且对象有一个属性Text，那么在代码中引用该属性的正确格式是（ ）A、Text.Mytext B、Mytext.Text C、Mytext.(Text) D、 Mytext*Text6按照变量的作用域可将变量划分为（ ） A、公有、私有、系统 B、全局变量、模块级变量、过程级变量 C、动态、常数、静态 D、Public、 Private、 Protected7可获得字符的ASCII码的函数是（

15、）。 A、Val B、Fix C、Asc D、Chr8要退出DoLoop循环，可使用的语句是（ ）。 A、Exit B、Exit For C、End Do D、Exit Do 9把数值型转换为字符串型需要使用的函数是（ ）。A、Val B、Str C、Asc D、Chr10关于语句行，下列说法正确的是（ ）。 A、一行只能写一条语句 B、一条语句可以分多行书写 C、每行的首字符必须大写 D、长度不能超过255个字符11设置对象的边框类型的属性是（ ）A、Drawstyle B、BorderstyleC、DrawWidth D、ScaleMode12.为了清除图片框Picture1中的图形，应采

16、取的正确方法是（ ）A、选择图片框，然后按Del键B、执行语句Picture1.Picture = LoadPicture("")C、执行语句Picture1.Picture = ""D、选择图片框，在属性窗口中选择Picture属性条，然后按回车键13要绘制不同形状的图形，需要设置Shape控件的（ ）属性A、Shape B、BorderstyleC、FillStyle D、Style14要绘制多种式样的直线，需要设置Line控件的（ ）属性A、Shape B、BorderstyleC、FillStyle D、Style15如果准备读文件，打开顺序文件

17、”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 # 1D、open "text.dat" For Random As # 1二、填空题（每空1分，共15分）1Winsock控件主要用来编制 或UDP协议的通讯程序。2若窗体的左上角坐标为（-200，250），右下角坐标为（300，-150），则X轴的正向向右，Y轴的正向向 。

18、 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。表达式No

19、t A<=C Or 4*C = B2 And B<>A+C的值为 。 10在Visual Basic语言中有三种形式的循环结构。其中，若循环的次数可以事先确定，可使用For循环；若要求先判断循环进行的条件，可使用 循环或 循环。 11以下语句的输出结果是 。 Dim a As Integer a = 3.14159Print a12ActiveX EXE文件的后缀是 。13VB中的程序错误类型主要有编译错误 、 等三种。三、阅读程序题（每小题5分，共20分）阅读下列程序并写出程序运行结果1Private Sub Form_Click() Static Sum As Integ

20、er For I = 1 To 2 Sum = Sum + I Next I Print SumEnd Sub点击窗体两次后，变量Sum的值是：2Private Sub Form_Click() Dim a,c As IntegerFor a=1 To 5 c=a+1 Print cNext aEnd Sub变量C的结果依次为：3Private 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的结

21、果是：4Private 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

22、 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 SubPrivate Sub Command2_Click() '

23、;点击“清除”按钮Text1.Text = 5 End SubPrivate Sub Command3_Click()'点击“结束”按钮 EndEnd Sub2已知SQL Server数据库管理系统中存在名称为“学生”的数据库，其中的“students”数据表的结构及初始记录如表1所示。要求使用ADO对象和MSFlexGrid控件设计数据库列表显示程序。程序的设计界面和运行结果如图1、图2所示。表1学号姓名专业2004001张红软件专业2004003李强会计专业2004002王丽软件专业图1图2程序如下，请补充完整。'声明对象变量ADOcn，用于创建与数据库的连接Private

24、 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.AddIte

25、m 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

26、数据库，其中: '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 SubPrivate Sub Command1_Click() Unload MeEnd Sub五、编写程序题（共15分）请根据下列描述编写购物优惠程序。某商场为了加速促成商品流通，采用购物打折的优惠办法，每位顾客一次购物（1）在100元以上者，按九五折优惠；（2）在200元以上者，按九折优惠；（3）300元以上者，按八折优惠；（4）500元以上者按七折优惠。在窗体上添加两个文本框和一个命令按钮，要求在Text1中输入购物商品总金额，单击命令按钮，在Text2