《Visual Basic程序设计》形成性考核作业册

开放教育形成性考核作业VisualBasic程序设计（专科）学校名称：学生学号：学生姓名：考核成绩：姓

名：

学

号：

得

分：

教师签名：

作业1一、选择题1、在设计应用程序时，可以查看到应用程序工程所有组成部分的窗口是（）。

A、窗体设计

B、代码

C、属性

D、工程资源管理器窗口2、窗体的load事件的触发时机是（）。

A、用户单击窗体时

B、窗体被加载时

C、窗体显示之后

D、窗体卸载时3、与传统的程序设计语言相比，VisualBasic最突出的特点是（）。

A、结构化程序设计

B、程序开发环境

C、事件驱动编程机制

D、程序调试技术4、VB6.0集成开发环境的主窗口中不包括（）。

A、标题栏

B、菜单栏

C、状态栏

D、工具栏5、如果对象的名称为Mytext,而且对象有一个属性Text，那么在代码中引用该属性的正确格式是（）。

A、text.Mytext

B、Mytext.Text

C、Mytext.(Text)

D、Mytext*Text6、下列可以激活属性窗口的操作是（）。

A、用鼠标双击窗体的任何部位

B、执行“工程“菜单中的”属性窗口“命令

C、按Ctrl+F4

D、按F47、假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先应执行的操作是（）。

A、单击窗体上没有控件的地方

B、单击任一个控件

C、不执行任何操作

D、双击窗体的标题栏8、如果要在文本框键入字符时，只显示某个字符，如果（*），应设置文本框的（）属性。

A、Caption

B、PasswordChar

C、Text

D、Char9、如果想要在文本框中的内容在运行时不能编辑，需要文本框的（）属性设置为True.ALocked

B、MultiLine

C、TabStop

DVisible10对于定时器（Tiner）控制，设置其定时是否开启的属性是（）A、Index

B、Tag

C、Enabled

D、Left11、要在窗口体Fornl内显示“myfrm”使用的语句是（）A、Form.caption=“myfrm”B、Fornl.caption=“myfrm”C、forml.print“myfrm”D、form.print“myfrm”12、对象的性质和状态特征称为（）A、事件

B、方法

C、属性

D、类13、下列正确的赋值语句是（）A、x+y=20

B、y=x+20

C、3x=y

D、s=14、当使用上下文相关的帮助时，选择要帮助的内容，然后按（）键，就可出现MSDN窗口直接显示所需的帮助信息。

A、Help

B、F10

C、Ese

D、F115、将调试通过的工程经“文件”菜单的“生成.exe文件“编绎成名.exe后，将该可执行文件放到其它机器上不能运行的主要原因是（）。A、运行的机器上无VB系统

B、缺少.frm窗体文件

C、该执行文件有病毒

D、以上原因都不对二、填空题1、当进入VB集成开发环境后，发现没有显示“工具箱”窗口。应选择菜单的

选项，使“工具箱”窗口显示。2、在VB中，事件过程名由和

构成。3、工程文件的扩展名是

，窗体文件扩展名是

。4、对象时代码和数据的集合，例如，VisualBasic中的

、

、

等都是对象。5、对象的方法用于

。当方法不需要任何参数并且也没有返回值，调用对象的方法的格式为

。例如对窗体Forml使用Show方法，应写成

。6、要使文本框显示滚动条，需要将其

属性设置为

。7、欲设置定时的时间间隔为4秒，则属性Interval的值为

。8、要使标签框的大小随Caption属性做自动调整，应将

属性设置为

。9、通过

可以在设计时直观地调整窗体在屏幕的位置。10、要想在代码中给名为txtshow的文框赋予文本：GOODWORK！时，应当编写的语句是

。11、若命令按钮的名称为Cmdopen，程序要求单击以上命令按钮，打开一个窗口frml,请对以下事件过程填空。PrivateSubCmdopen

EndSud12、事件就是对象上所发生的事情，VisualBasic中的事件如

、

、

等。一个对象响应的事件可以有

个，用户不能建立新的事件。事件过程是指

。假设某一事件过程如下：PrivateSubcmd1_Click()

Form1.Caption=”VB示例”EndSub则响应过程的对象名是

，事件名是

。

13、对象的方法用于

。当方法不需要任何参数并且也没有返回值，调用对象的方法格式为

，例如，对窗体Form1使用Show方法，应写成

。14、为了在编写代码时能自动语法检查，必须执行

菜单中的

命令，打开

对话框，然后选择“编辑器”选项卡中的。15、定时器（Timer）控件可识别的事件是，了生该事件的时间间隔定时由定时器的

属性设置，其单位为。

三、问答题1、什么是可视化编程和事件驱动？

2、对象、属性、事件和文件之间的关系如何？3、简述事件驱动机制与传统编程方式的不同。4、简述事件驱动的工作过程。四、程序设计题1、在窗体上添加一个文本框和两个命令按钮，并把两个命令按钮的标题分别设置为“隐藏文本框”和“显示文本框”。当单击第一个命令按钮时，文本框消失；而当单击第二个命令按钮时，文本框重新出现，并在文本框中显示“VB程序设计”（字体大小为16）。程序运行界面如图所示。图12、设计一个计算程序。该程序用户界面如图2所示，由四个文本框：文本框1（text1）、文本框2（text2）、文本框3（text3）、文本框4（text4），和三个按钮：命令按钮1（command1）、命令按钮2（command2）、命令按钮3（command3）组成。程序运行后，用户按清除按钮，则清除文本框中显示的内容，按计算按钮，则计算三科平均成绩。单击退出按钮则退出。3、编写一收款计算程序。要求用户输入商品的“单价”、“数量”和“折扣”后，单击“计算”按钮显示“应付款”，单击“清除”按钮，清除文本框中所有的数据。程序运行界面如图3所示。姓

名：

学

号：

得

分：

教师签名：

作业2一、选择题1．按照变量的作用域可将变量划分为（）。A、公有、私有、系统

B、全局变量、模块级变量、过程变量C、动态、常数、静态

D、Public、Private、Protected2.可获得字符的ASCII码的函数是（）。Ａ、ValＢ、FixＣ、Asc

Ｄ、Chr3、要退出Do….Loop循环，可使用的语句的（）语句。A、Exit

B、Exit

For

C、EndDo

D、ExitDo4.把数值型转换为字符串型需要使用的函数是（）。A、Val

B、Str

C、Asc

D、Chr5.关于语句行，下列说法正确的是（）。Ａ．一行只能写一条语句Ｂ．一条语句可以分多行书写Ｃ．每行的首字符必须大写Ｄ．长度不能超过255个字符６．表达式6+10Mod4*2+1的值是（）．Ａ．９Ｂ．11C．１D.37.以下可以作为ＶisualBasic变量名的是（）．Ａ．SIN

B.CO1

C.COS(X)

D.X(-1)8.表达式Ａbs(-5)+Len(“ABCDE”)的值为（）．Ａ．5ABCDEＢ.－5ABCDE

C.10

D.09.在代码编辑器中，如果一条语句太长，无法在一行内写下（不包括注释），要折行书写，可以在行末使用续行字符（），表示下一行是当前行的继续．Ａ．一个空格加一个下划字符（＿）Ｂ．一个下划字符（＿）Ｃ．直接回车

Ｄ．一个空格加一个字符（－）10.Sub过程与Function过程最根本的区别是（）．Ａ．Sub过程可以使用Ｃall语句或直接使用过程名调用，而Function过程不可以．Ｂ．Function过程可以有参数，Sub过程不可以．Ｃ．两种过程参数的传递方式不同．Ｄ．Sub过程的过程名不能返回值，而Function过程能够通过过程名返回值．11.＂Ｘ是小于80的非负数＂，用VB表达式表示正确的是（）.

A..0≤X<80

B.0<=X<80

C.0<=xandx<80

D.0<=xOrx<8012.在设计菜单时,如果要在菜单中加入一个菜单分隔条,则菜单分隔条的标题必须设置为()A.加号(+)

B.减号(-)

C.星号(*)

D.感叹号(!)13.如果要在程序中显示一个弹出式菜单,那么要调用VisualBasic中提供的方法是().

A.Print

B.Move

C.Refresh

D.PopupMenu14.下列可以用来存储图像供其他对象使用的控件是().

A.ToolBar

B.StatursBar

C.ImageList

D.TreeView15.当单击工具拦上的按扭时,会触发的事件是().

A.ButtonClick

B.Change

C.Load

D.KeyPress16.要利用公用对话框控件来显示”打开文件”对话框,需要调用控件的()方法.

A.ShowPrinter

B.ShowOpen

C.ShowSave

D.ShowColor17.对于窗体级变量,下列说法中错误的是().A.所在窗体的各子程序都可以访问B.其他窗体的子程序不能访问C.所在窗体发子程序不能访问用Private定义的窗体级变量D.一定要在所在窗体的通用区内定义18.从一个字符串中的第3个字符开始,获取5个字符,应使用()

A.Len函数

B.Mid函数

C.Left函数

D.Right函数19.用下面的语句所定义的数组的元素的个数是().

DimA(-3To5)As

Integer

A.6

B.7

C.8

D.920.有如下程序段:DimstrlAsString*5Strl=”VisualBasic”当该段程序被执行完时,变量strl的值为().

A.”Visual”

B.”Visua”

C.”V”

D.”Visual

Basic”二、填空题1．菜单一般有__和___两种基本类型。2．通用对话框控件可显示的常用对话框有___、__、___、___、___。3．组合框具有___和___两种控件的基本功能。4．要使数组的默认下标从“1开始，则应在窗体或标准模块代码的声明部分使用语句___。5．调用Sub过程时，使用____语句,语句用于把程序控制传送到一个VisualBasic的Sub过程。6．若已建立了Form1和Form2两个窗体，默认启动窗体为Form1。通过__菜单_命令的__选项卡，可将启动窗体设置为Form2。在程序中若要显示Form1窗体，则执行__语句。7．列表框中项目的序号是从__开始的。8．Sub过程与Function过程最根本的区别是_。9．VB的代码存储在模块中。在VB中提供了三种类型的模块：__、___和_。10．使用Hide方法会隐藏被调用的窗体，但是在调用Hide方法之后不会把窗体___，被调用的窗体中的属性等已处于__。12.将下列数学式子各条件写成VisualBasic逻辑表达式。

⑴1≤x<12

⑵A+B≥C或a-c≤c

⑶a和b都为正整数或同为负数13．设A=2，B=3，C=4，D=5。表达式NotA<=COr4*B^2AndB<>A+C的值为__。14．在VisualBasic语言中有三种形式的循环结构。其中，若循环的次数可以事先确定，可使用___循环；若要求先判断循环进行的条件，可使用__循环或__循环。15．以下语句的输出结果是__。a%=3.14159Printa%三、阅读下列程序，写出程序运行结果。1、PrivateSubForm_Click()

StaticSumAsInteger

ForI=1to100

Sum=Sum+I

NextIPrintSumEndSub2、privateSubForm_Click()

A=10:b=15:c=20:d=25

PrintA;Spc(5);b;Spc(7);c

PrintA;Spc(8);b;Space$(5);c

Printc;Spc(3);”+”;Spc(3);c+d

EndSub3、PrivateSubForm_click()

Fori%=1to3

Forj%=1toi

PrintLTrim(Str(i%))+“*”+LTrim(Str(j%))+“=”;i%*j%;

Nextj%

PrintNexti%EndSub4、PrivateSubCommand1_Click()

Dima,bAsInteger

A=3.4B=3.4Text1.Text=aText2.Text=bEndSub5、PrivateSubForm_Click()

ForI=1to5

PrintTab(11–I)

ForJ=1ToI*2–1

Print“*”;

Next

NextiEndSub

四、程序设计题1、购物优惠程序。某商场为了加速促成商品流通，采用购物打折的优惠办法，每位顾客一次购物（1）在100元以上者，按九五折优惠；（2）在200元以上者，按九折优惠；（3）300元以上者，按八折优惠；（4）500元以上者按七折优惠。在窗体上添加两个文本框和一个命令按钮，要求在Text1中输入购物商品总金额，单击命令按钮，在Text2中输入优惠后的价格。程序运行结果如图解所示。2、输出100~200之间不能被3整除的的数，要求用Do语句的一种形式来实现，程序运行结果如图5所示。3、编写程序，打印如下的乘积表：

4、设计一个计算程序。该程序用户界面如图7所示。要求程序运行后，用户选中单击选按钮，则程序作10和2的相应计算，并把计算结果在文本框中显示出来。如用户选中加法单选按钮，则程序作10和2的相加，计算结果12在文本框中显示出来。按结束，则退出。5、编写输入一个0~6数字，显示汉字对照输出星期的Function过程。程序运行结果如图8所示。

6、编写一个程序，当鼠标移到Picturel控件时，鼠标指针改变形状；当在Picturel控件上单击鼠标右键时，通过消息框显示“Youpressedrightbutton”，并再次改变鼠标指针的形状。7、列表框应用程序。要求从文本框中输入姓名，然后按“添加”按钮，把姓名添加到列表框中；当选择列表框中某一项时，按“删除”按钮，从列表框中删除；当列表框中某一项时，按“修改”按钮，把列表框中选取的项送往文本框且“修改”按钮变为“修改确认”。在文本框的内容修改好后，按“修改确认”按钮，再把文本框中修改后的信息送到列表框且“修改确认”按钮变为“修改”。程序运行结果如图9所示。姓

名：

学

号：

得

分：

教师签名：

作业3一、选择题1、VisibleBasic根据计算机访问文件的方式将文件分成三类，其中不包括（）A．顺序文件

B.Unix文件

C.二进制文件

D.随机文件2、随机文件进行文件读取的单位是（）A．字节

B。记录

C。整个文件

D。字符3、为了使目录路径列表框Dir1的内容符合驱动器列表框Drive1的选择，应当（）。A．在Dir1_Click事件中加入Dir1.Path=Drive1.DriveB．在Drive1_Click事件中加入Dir1.Path=Drive1.DriveC．在Dir1_Click事件中加入Drive1.Path=Dir1.DriveD．在Dir1_Click事件中加入Drive1.Path=Dir1.Drive4、为了使drive1驱动器列表框、dir1目录路径列表框和file1文件列表框能同步协调工作，需要在（）A．drive1的Change事件过程中加入drive1.Drive=dir1.Path，在dir1的Change事件过程中加入dir1.Path=file1.Path代码。B．drive1的Change事件过程中加入dir1.Path=drive1.Drive，在dir1的Change事件过程中加入file1.Path=dir1.Path代码。C．dir1的Change事件过程中加入dir1.Path=drive1.Drive，在file1的Click事件过程中加入file1.Path=file1.fileName代码。D．dir1的Change事件过程中加入dir1.Path=drive1.Drive，在file1的Click事件过程中加入file1.Path=dir1.Path代码。5、下面关于顺序文件的描述正确的是（）A．每条记录的长度必须相同B．可通过编程对文件中的某条记录方便地修改C．数据只能以ASCII码形式存放在文件中，所以可通过文本编辑软件显示D．文件的组织结构复杂6、KILL语句在VB语言中的功能是（）。A．清内存

B。清病毒

C。删除磁盘上的文件

D。清屏幕7、可用来改变坐标度量单位的是（）A.Drawstyle属性

B.DrawWidth属性

C.Scale方法

D.ScaleMode属性8、以下的属性和方法中，可重定义坐标系的是（）A．Drawstyle属性

B.DrawWidth属性

C.Scale

D.

ScaleMode属性9、当用Line方法画直线后，当前坐标在（）A.(0,0)

B.直线起点

C.直线终点

D.容器的中心10、Line(200,200)-Step(500,500)将在窗体（）画一直线。A．（200,200）到(500,500)

B.（200,200）到(300,300)C.（200,200）到(700,700)

D.（300,300）到(500,500)11、设置对象的边框类型的属性是（）。A.Drawstyle

B.Borderstyle

C.DrawWidth

D.ScaleMode12、为了清除图片框Picture1中的图形，应采取的正确方法是（）A．选择图片框，然后按Del键B．执行语句Picture1.picture=LoadPicture(“”)C．执行语句Picture1.picture=“”D．选择图片框，在属性窗口中选择Picture属性条，然后按回车键13、绘制多种形状的图形，需要设置Shape控件的（）属性。

A．Shape

B.Borderstyle

C.FillStyle

D.Style14、绘制多种形状的直线，需要设置Line控件的（）属性。

A．Shape

B.Borderstyle

C.FillStyle

D.Style15、如果准备读文件，打开顺序文件“text.dat”的正确语句是（）A.

open“text.dat”forwriteAs#1B.

open“text.dat”forBinary

As#1C.

open“text.dat”forInput

As#1D.

open“text.dat”forRandom

As#116、如果准备向随机文件中写入数据，正确的语句是（）A.Print#1,rec

B.Write

#1,rec

C.Put#1,rec

D.

Get#1,rec17、下列“CommandDialog1”A．文件另存为

B.打开文件

C.色彩

D.打印18、FileFilter.Pattern=”*.bat”程序代码执行后，会显示（）。A只包含扩展文件名为”*.bat”的文件

B。第一个bat文件C．包含所有的文件

D。会显示磁盘的路径19、下列数据对象模型中采用OLEDB访问数据库的是（）。A．DAO

B.RDO

C.ADO

D.RDO和ADO20.设ADOrs为Recordset对象，从“学生基本情况表”中获取所有记录的语句是（）A．ADOrs.New“Select*From学生基本情况表”B．ADOrs.Open“Select*From学生基本情况表”C．ADOrs.Execute“Select*From学生基本情况表”D．ADOrs.Select“Select*From学生基本情况表”21、VB中将变量xl声明为Excel应用程序对象的方法是（）A．DimxlAsExcel.Application

B.DimxlAsExcel.WorkbookC.

DimxlAsExcel.Worksheet

D.DimxlAsExcel.Worksheets二、填空题1、如果要新建一个顺序文件，用Open语句时，操作方式关键词是。2．在VisualBasic程序中实现复制文件“C：\”到D:盘根目录下的语句为。3.在VisualBasic程序中实现删除文件”D:\tem.tmp”的语句为__。4.按文件号为1打开顺序文件SEQNEW.DAT,用于写入数据,语句为___。5.按文件号为2打开顺序文件SEQOLD.DAT,用于从该文件读出数据,语句为__。6.若窗体的左上角坐标为(-200,250),右下角坐标为(300,-150),则X轴的正向向，Y轴的正向向_。7.Stretch属性设置为__时,图像框可自动改变大小以适应其中的图形.8.在图片框Picture1中画一个左上角在(500,500),边长为500的红色实心正方形的语句为。9.设

CurrentX=50,CurrentY=100,执行指令”line(100,20)-Step(300,500)”后,Current=__.10.使用ADO模型时,可通过_属性建立Recordset和Connection对象的连接.11.VB中将数据库分为本地数据库、和___三种类型.12.采用ADO模型时,当使用Open方法打开一个记录集后,与ADOrs.Fields(“学号”)等效的语句是_13.ADO模型中一般可通过Connection对象的Execute方法执行___、___、____等三类不返回结果集的SQL语句.14.设StrSQL、Str1为字符串变量,其中Str1的值为”001”,那么执行赋值语句StrSQL=”Select*fromTabel1Where学号=’”+Str1+”’”后,StrSQL的值等于__15.在VB中,将Foxpro称为外部数据库,Access称为___，SQLServer称为____.三、程序设计题1、在窗体上建立一个驱动器列表框、目录列表框、文件列表框、图片框。要求程序运行后，驱动器列表框Drive1的默认驱动器设置为C盘，选择File1中所列的确图片文件（*.Bmp和*.jpg），则相应的图片显示在图片框Picture1中。程序运行结果如图10所示。2．余弦曲线的方程为y=cosx，画出x从-2到2的确余弦曲线，并在坐标轴上标出刻度，如图11所示。3,使用Line控件显示直线,并且可以显示直线的线宽和线型.程序运行界面如图12所示.4.使用Shape控件显示几种图形,并可以设置图形的边框和填充效果等.程序运行界面如图13所示.

5.使用SQLServer或Access建立名称为”学生的数据库,并在其中创建”students”的数据库表,其结构及初始记录如表1所示.使用ADO对象和MSFlexGrid控件设计数据库列表显示程序.程序的设计界面和运行结果如图14、图15所示。

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

名：

学

号：

得

分：

教师签名：

作业4一、选择题1、WinsockServer.LocalPort=10001语句的含义是（

）。

A、设置侦听端口

B、设置计算机IP地址

C、设置中断地址

D、设置通讯协议2、当Winsock控件处于关闭状态时，其State属性的值是（

）。A、1

B、0

C、2

D、63、相对于UDP协议而言，TCP协议是一种（

）。A、面向连接的协议B、无连接协议

C、计算机间不建立连接

D、适用于传送少量数据4、VB程序中通常不会产生错误提示的（

）。A、编译错误

B、实时错误

C、运行时错误

D、逻辑错误5、VB程序的编译错误一般可通过VB集成环境的何种设置，自动检测（

）。A、要求变量声明

B、自动语法检测

C、自动显示快速信息量

D、根本无法自动检测6、VB程序中设置断点的按键是（

）。A、F5键