VB程序设计期末复习资料.docx
《VB程序设计期末复习资料.docx》由会员分享，可在线阅读，更多相关《VB程序设计期末复习资料.docx（27页珍藏版）》请在冰点文库上搜索。
VB程序设计期末复习资料
VisualBasic程序设计期末综合练习
20XX年11月
一、单项选择题
1．一个VB应用程序可以包含几个vbp文件（A．1个）。
2．启动VB后，就意味着要建立一个新（C．工程）。
3．后缀为.bas的文件表示（D．标准类模块文件 ）。
4．当一个工程中含有多个窗体时，其中的启动窗体是（D．在“工程属性”对话框中指定的窗体）。
5．在文本框控件中将Text的内容全部显示为所定义的字符的属性是（B．PasswordChar）。
A．PasswordB．PasswordChar
C．需要编程来实现D．以上都不是
6．VisualBasic是一种面向对象的程序设计语言，所采用的编程机制是（C．事件驱动）。
A．从主程序开始执行B．按过程顺序执行
C．事件驱动D．按模块顺序执行
7．下列四项中合法的变量名是（B．a_bc）。
A．a-bcB．a_bc
C．4abcD．integer
8．将调试通过的工程经“文件”菜单的“生成.exe文件”编译成.exe后，将该可执行文件拿到其它机器上不能运行的主要原因是（C．运行的机器上无VB系统）。
A．缺少.frm窗体文件B．该可执行文件有病毒
C．运行的机器上无VB系统D．以上原因都不对
9．无论何种控件，共同具有的属性是（B．Name ）
A．TextB．Name
C．CaptionD．ForeColor
10．有程序代码如下：
Text1.Text="VisualBasic程序设计"
则Text1，Text，和"VisualBasic程序设计"分别代表（C．对象，属性，值）。
A．对象，值，属性B．对象，方法，属性
C．对象，属性，值D．属性，对象，值
11．如果仅需要得到当前系统时间，使用的函数是（B．Time）
A．NowB．Time
C．YearD．Date
12．表达式16/4-2^5*8/4MOD5\2（D．4）。
A．20B．14C．2D．4
13.以下叙述中错误的是（D、在一个窗体文件中用Private定义的通用过程能被其它窗体调用）。
A、一个工程中可以包含多个窗体文件
B、全局变量必须在标准模块中定义
C、在设计VisualBasic程序时，窗体、标准模块、类模块等需要分别保存为不同类型的文件
D、在一个窗体文件中用Private定义的通用过程能被其它窗体调用
14．下列赋值语句正确的是（B．c=a+b）。
A．a+b=cB．c=a+b
C．-a=bD．5=a+b
15．要在窗体Form1内显示“myfrm”，使用的语句是（C．Form1.print"myfrm"）
A．Form.caption="myfrm"B．Form1.caption="myfrm"
C．Form1.print"myfrm"D．Form.print"myfrm"
16．确定一个控件在窗体上位置的属性是（D．Top和Left）
A．Width或HeightB．Width和Height
C．Top或LeftD．Top和Left
17．将数据项“China”添加到列表框（List1中成为第一项，应使用的语句是（B．List1.AddItem"China",0）
A．List1.AddItem"China",B．List1.AddItem"China",0
C．List1.AddItem"China",1D．List1.AddItem"1,China"
18．如果创建了命令按钮数组控件，那么Click事件的参数是（A．Index）
A．IndexB．Caption
C．Tag D．没有参数
19．在设计动画时，用时钟控件来控制动画速度的属性是（B．Interval）
A．EnabledB．Interval
C．TimerD．Move
20．以下叙述中错误的是（C．窗体的Hide方法和Unload方法的作用完全相同）。
A．一个工程中只能有一个SubMain过程
B．窗体的Show方法的作用是将指定的窗体载入内存并显示该窗体
C．窗体的Hide方法和Unload方法的作用完全相同
D．若工程文件中有多个窗体，可以根据需要指定一个窗体为启动窗体
21．使图像框Image控件中的图像自动适应控件的大小应（C．将控件的Stretche属性设为True ）。
A．将控件的AutoSize属性设为TrueB．将控件的AutoSize属性设为False
C．将控件的Stretche属性设为TrueD．将控件的Stretche属性设为False
22．若使图像框Image控件自动适应其中的图形大小，应（B．将控件的Stretche属性设为False ）。
A．将控件的Stretche属性设为TrueB．将控件的Stretche属性设为False
C．将控件的AutoSize属性设为TrueD．将控件的AutoSize属性设为False
23．在VisualBasic中，变量的默认类型是（D．Variant）
A．IntegerB．Double
C．CurrencyD．Variant
24．使用ADO数据模型时，使Recordset和Connection对象建立连接的属性是（C．ActiveConnection ）。
A．CommandTypeB．Open
C．ActiveConnectionD．Execute
25．下列控件中不能响应Click事件的是（C．Timer）。
A．FrameB．LabelC．TimerD．Form
26．如果准备读文件，打开顺序文件”text.dat”的正确语句是（C．open"text.dat"ForInputAs#1）
A．open"text.dat"ForwrireAs#1
B．open"text.dat"ForBinaryAs#1
C．open"text.dat"ForInputAs#1
D．open"text.dat"ForRandomAs#1
27．用Line方法画直线后,当前坐标在（C、直线终点）。
A、（0，0）B、直线起点
C、直线终点 D、容器的中心
28．不属于VB数据库引擎的是（C．BDE ）
A．ODBC B．Jet引擎
C．BDE D．OLEDB
29．MsgBox函数的返回值的数据类型是（D．整型 ）
A．字符串B．日期型
C．逻辑型D．整型
30．VB程序中通常不会产生错误提示的是（D．逻辑错误 ）。
A．编译错误 B．实时错误
C．运行时错误 D．逻辑错误
31．如果希望以模态方式显示窗体Form1，下列正确的语句是（C．Form1.Show1）
A．Form1.Show0B．Form1.Show
C．Form1.Show1D．以下都不正确
32．下列关于变量的说法不正确的是（D．局部变量在声明它的过程执行完毕后就被释放了）。
A．局部变量是指那些在过程中用Dim语句或Static语句声明的变量
B．局部变量的作用域仅限于声明它的过程
C．静态局部变量是在过程中用Static语句声明的
D．局部变量在声明它的过程执行完毕后就被释放了
33．改变驱动器列表框的Drive属性值，将激活（C．Change ）事件。
A．KeyDownB．KeyUp
C．ChangeD．Scoll
34.在下列选项中，不能将图像装入图片框和图像框的是（B．在界面设计时，手工在图像框和图片框中绘制图形）
A．在界面设计时，通过Picture属性装入
B．在界面设计时，手工在图像框和图片框中绘制图形
C．在界面设计时，利用剪贴板把图像粘贴上
D．在程序运行期间，用LoadPicture函数把图形文件装入
35．要发送数据，通常使用Winsock控件的（A．SendData方法 ）。
A．SendData方法 B．Listen方法
C．Accept方法 D．GetDate方法
36．VB程序中设置断点的按键是（C、F9键 ）。
A、F5键 B、F6键
C、F9键 D、F10键
37．下列数组声明语句，正确的是（B．Dima（3,4）AsInteger ）
A．Dima[3,4]AsIntegerB．Dima（3,4）AsInteger
C．Dima（n,n）AsIntegerD．Dima（34）AsInteger
38．当Winsock控件处于打开状态时，其State属性的值是（B．1 ）
A．0 B．1
C．2 D．6
二、填空题
1.TextBox和Label控件用来显示和输入文本，如果仅需要让应用程序在窗体中显示文本信息，可使用控件；若允许用户输入文本，则应使用控件。
2.在VB中，要想获得某个相关控件或语句的帮助信息，一般可首先选中该控件或语句，然后按键。
3．欲设置定时器的时间间隔为2秒，则属性Interval的值为。
4．应用程序打包后，其包文件的后缀为。
5．VisualBasic程序开发有三种模式，即设计模式、模式和模式。
6．是应用程序的对外接口，是其它控件的载体和容器。
7．表达式14/2-2^3*7MOD6的值是。
8．每个应用程序都有开始执行的入口，在VB中将这种窗体称为。
9．控件数组的名字由属性指定，而数组中的每个元素由属性决定。
10.执行赋值语句a="Visual"+"Basic"后，变量a的值是。
11．在VisualBasic语言中有三种形式的循环结构。
其中，若循环的次数可以适先确定，可使用循环；若要求先判断循环进行的条件，可使用循环。
12．数学关系8≤x<30表示成正确的VB表达式为。
13．在VB中，将Access称为，SQLServer称为。
14．以窗体Form1的中心为圆心，画一个半径为500的圆的语句是
。
15．为了在运行时把当前路径下的图形文件picturefile.jpg装入图片框Picture1，所使用的语句为。
16．变量的声明方法有隐式和两种，如果采用隐式声明方法，那么VB会自动将变量声明为。
17．过程级变量是指在过程内部声明的变量，只有在该过程中的代码才能访问这个变量。
模块级或窗体级变量的作用域是，全局变量在整个应用程序中有效，其作用域是。
18．VB提供了结构化程序设计的三种基本结构，这三种基本结构是选择结构、
、。
19.将图片框的AutoSize属性设置成时，可使图片框根据图片调整大小。
20．VB中的程序错误类型主要有编译错误、等三种。
21．在VB中想获得帮助，需要按的键是；要设置断点需要按键。
22．Winsock控件主要用来编制基于或协议的网络应用程序。
23．定时器（Timer）控件可识别的事件是，发生该事件的时间间隔由定时器的属性设置。
24．在控件数组中，所有元素的属性均相同，数组中的每个元素由
属性指定。
25．假设ADOcn为一个Connection对象，那么在VB程序中声明并创建ADOcn的语句是。
26．设某个程序中要用到一个二维数组，要求数组名为A，类型为整型，第一维下标从-1到2，第二维下标从0到3，则相应数组声明语句为。
27．在VB中，除了可以指定某个窗体作为启动对象之外，还可以指定
作为启动对象。
28．闰年的条件是：
年号（Y）能被4整除，但不能被100整除；或者年号能被400整除。
表示该条件的逻辑表达式是。
29．常用的VB网络编程控件主要有、InternetTransfer和
三种。
30．若窗体的左上角坐标为（-200，250），右下角坐标为（300，-150），则X轴的正向向，Y轴的正向向。
三、阅读程序题
阅读下列程序并写出程序运行结果
1．
PrivateSubForm_Click（）
DimxAsInteger
StaticyAsInteger
x=x+2
y=x+3
Form1.Print"x=";x,"y=";y
EndSub
写出程序运行时连续单击三次窗体后，Form1上的输出结果。
2．
PrivateSubForm_Click（）
DimcAsInteger,jAsInteger,kAsInteger
k=0
c=1
Forj=1To6
Ifj>4Then
c=c+4
ExitFor
Else
k=k+1
EndIf
Nextj
Printc,k
EndSub
写出程序运行时单击窗体后，c,k的值分别是：
3．
PrivateSubCommand1_Click（）
DimsAsDouble
DimiAsInteger
s=7
i=1
DoWhilei<10
i=i+2
s=s+i
Loop
Text1.Text=s
EndSub
文件框Text1的输出结果是：
4．
PrivateSubForm_Click（）
DimcAsInteger,jAsInteger,kAsInteger
k=2
c=3
Forj=1To5
Ifj>3Then
c=c+5
ExitFor
Else
k=k+1
EndIf
Nextj
Printc,k
EndSub
写出程序运行时单击窗体后，c,k的值分别是：
5.
PrivateSubForm_Click（）
DimA（1To3）AsString
DimcAsInteger
DimjAsInteger
A
（1）="4"
A
（2）="8"
A（3）="12"
c=1
Forj=1To3
c=c+Val（A（j））
Nextj
Printc
EndSub
写出程序运行时单击窗体后，窗体Form1上的结果：
6．
PrivateSubForm_Click（）
DimiAsInteger,kAsInteger
k=0
Fori=1To4
Ifi>2Then
k=k+5
ExitFor
Else
k=k+2
EndIf
Nexti
Printk
EndSub
写出程序运行时单击窗体后，Form1上的输出结果。
7.
FunctionF（aAsInteger）
DimbAsInteger
StaticcAsInteger
b=b+2
c=c+2
F=a+b+c
EndFunction
PrivateSubCommand1_Click（）
DimaAsInteger
a=4
Fori=1To3
PrintF（a）
Nexti
EndSub
写出程序运行时，单击命令按钮在窗体上的输出结果。
8.
PrivateSubForm_Click（）
DimIAsInteger,jAsInteger
DimcAsInteger
c=0
ForI=1To4
Forj=1To2
c=c+4
Nextj
NextI
Printc
EndSub
文件框Text1的输出结果是：
9.
SubChange（xAsInteger,yAsInteger）
DimtAsInteger
t=x
x=y
y=t
Printx,y
EndSub
PrivateSubForm_Click（）
DimaAsInteger,bAsInteger
a=50:
b=40
Changea,b
Printa,b
EndSub
写出程序运行时单击窗体后，Form1上的输出结果。
10.
PrivateSubForm_Click（）
DimiAsInteger,kAsInteger,cAsInteger
Fori=1To5
IfiMod2=0Then
k=k+2
Else
c=c+2
EndIf
Nexti
Printk,c
EndSub
写出程序运行时单击窗体后，Form1上的输出结果。
四、完善程序题
1．程序运行界面如图1所示。
要求从文本框中输入课程名称，然后按“添加”按钮，将其添加到列表框中；当选择列表框中某一项后，按“删除”按钮，则从列表框中删除该项；当选择列表框中某一项后，按“修改”按钮，把列表框中选取的项送往文本框且“修改”按钮变为“修改确认”。
在文本框的内容修改好后，按“修改确认”按钮，再把文本框中修改后的信息送到列表框且“修改确认”按钮变为“修改”。
List1
Command3
Text1
Command1
Command2
图1
程序如下，请补充完整。
PrivateSubForm_Load（）
List1.AddItem"计算机应用基础"
List1.AddItem"程序设计基础"
List1.AddItem"VB程序设计"
List1.AddItem"SQLServer数据库应用"
List1.AddItem"网站设计技术"
List1.AddItem"系统开发规范与文档编写"
List1.AddItem"信息系统测试"
EndSub
PrivateSubCommand1_Click（）
IfText1.Text<>""Then
List1.[1]Text1.Text'将文本框中的内容添加到列表框中
Text1.Text=""
Else
MsgBox"请在文本框中输入信息！
"
EndIf
EndSub
PrivateSubCommand2_Click（）
List1.RemoveItem[2]'删除选定的项目
EndSub
PrivateSubCommand3_Click（）
IfCommand3.Caption="修改"Then
Text1.Text=[3]
Text1.SetFocus
Command1.Enabled=False
Command2.Enabled=False
Command3.Caption="[4]"
Else
[5]=Text1.Text
Command1.Enabled=True
Command2.Enabled=True
Text1.Text=[56
Command3.Caption="[7]"
EndIf
EndSub
2．
已知存在一名为“学生”的SQLServer数据库，其中的“students”数据表用来存储学生的基本情况信息，包括学号、姓名、籍贯、性别。
请编写一个简单的应用程序，向students表中添加学生记录。
程序的基本逻辑是：
当窗体被加载时，程序联接SQLServer数据库；当点击“增加”按钮时，首先查询学号是否重复，如果不重复则向students表中添加学生记录。
其运行界面如图2所示。
图2
程序如下，请补充完整。
'声明对象变量ADOcn，用于创建与数据库的连接
PrivateADOcnAsConnection
PrivateSubForm_Load（）
'连接SQLServer数据库
DimstrDBAsString
strDB="Provider=SQLOLEDB;LSF;UserID=sa;Password=;Database=[1]"
IfADOcnIsNothingThen
SetADOcn=[2]
ADOcn.OpenstrDB
EndIf
EndSub
PrivateSubCommand1_Click（）
'增加学生记录
DimstrSQLAsString
DimADOrs[3]
ADOrs.[4]=ADOcn
ADOrs.Open“Select学号FromStudentsWhere学号=”+”‘“+Text1+”‘“
IfNot[5]Then
MsgBox“你输入的学号已存在，不能新增加！
”
Else
StrSQL=”InsertIntostudents（学号,姓名,,籍贯,性别）
StrSQL=strSQL+Values（”+”‘“+text1+”‘,‘“+text2+”‘,’“+text3+”‘,’“+text4+”‘）”
ADOcn.Execute[6]
MsgBox“添加成功，请继续！
”
EndIf
PrivateSubCommand2_Click（）
[7]
EndSub
3．在窗体上建立一个驱动器列表框、目录列表框、文件列表框、图片框、文本框。
要求程序运行后，驱动器列表框Drive1的默认驱动器设置为D盘，选择File1中所列的图片文件（*.bmp,*.gif和*.jpg）,则相应的图片显示在图片框Picture1中，文件的路径显示在文本框中。
程序运行结果如图3所示。
图3
程序代码如下，请补充完整
PrivateSubForm_Load（）
Drive1.Drive=[1]
File1.Pattern="*.bmp;*.gif;*.jpg"
EndSub
PrivateSubDrive1_change（）
Dir1.Path=[2]
Text1.Text=Drive1.Drive
EndSub
PrivateSubDir1_Change（）
[3]
[4]
EndSub
PrivateSubFile1_click（）
Picture1.[5]=LoadPicture（File1.Path+"\"+File1.FileName）
FileName=File1.Path+"\"+File1.FileName
Text1.Text=FileName
EndSub
五、编写程序题
1．编写一工资调整程序。
若基本工资大于
升级会员 