Visual Basic程序设计期末综合练习题Word文档下载推荐.docx
《Visual Basic程序设计期末综合练习题Word文档下载推荐.docx》由会员分享，可在线阅读，更多相关《Visual Basic程序设计期末综合练习题Word文档下载推荐.docx（18页珍藏版）》请在冰点文库上搜索。
10．DimA（5,5）AsInteger定义的数组包含的元素个数是（）
A．25B．36
C．30D．动态变化
11．要清除List列表框控件中的所有项目，可采用的方法是（）
A．ClearB．Erase
C．ClickD．Delete
12．如果希望以模态方式显示窗体Form1，下列正确的语句是（）
A．Form1.Show0
B．Form1.Show
C．Form1.Show1
D．以下都不正确
13．如果准备向随机文件中写入数据，正确的语句是（）
A．Print#1,recB．Write#1,rec
C．Put#1,,recD．Get#1,rec
14．在过程中定义的变量，若希望在离开该过程后，还能保存过程中局部变量的值，则应使用（）关键字在过程中定义局部变量。
A．DimB．Public
C．PrivateD．Static
15．在过程定义中用（）表示形参的传值。
A．VarB．ByDef
C．ByValD．Value
16．将数据项“China”添加到列表框（List1）中成为地一项，应使用的语句是（）
A．List1.AddItem"
China"
0B．List1.AddItem"
1
C．List1.AddItem"
D．List1.AddItem"
1,China"
17．引用列表框（List1）最后一个数据项应使用的语句是（）
A．List1.List（List1.ListCount）B．List1.List（List1.ListCount－1）
C．List1.List（ListCount）D．List1.List（ListCount－1）
18．可用来改变坐标度量单位的是（）
A．Drawstyle属性B．DrawWidth属性
C．Scale方法D．ScaleMode属性
19．要使窗体在运行时不可改变窗体的大小并没有最大化和最小化按钮，通过设置可达到此要求的属性是（ ）
A．MaxButtonB．MinButton
C．WidthD．BorderStyle
20．数学关系8≤y<
28表示成正确的VB表达式为（）
A、8<
=y<
28B、8<
=yAND<
28
C、8<
=yANDy<
28 D、8<
=yORy<
21．以下能判断是否到达文件尾的函数是（）
A、BOFB、DOC
C、LOF D、EOF
22．6．为了在运行时把d:
\pic文件夹下的图形文件a.jpg装入图片框Picture1中，所使用的语句为（）。
A．Picture1.Text=LoadPicture（"
d:
\pic\a.jpg"
）
B．Picture1.Picture=LoadPicture（"
C．Picture1.Picture=LoadPicture（d:
\pic\a.jpg）
D．Picture1.Picture=Load（"
23．MsgBox函数的返回值的类型是（ ）
A．整型B．字符串
C．逻辑型D．日期型
24．当Winsock控件处于关闭状态时，其State属性的值是（ ）
A．1 B．0
C．2D．-1
25.要以读方式打开D盘的一个顺序文件Stu.dat，应使用的语句是（）
A．Open"
Stu.dat"
ForOutputAs#1
B．Open"
D:
\Stu.dat"
ForInputAs#1
C．Open"
D．Open"
ForInputAs#1
26.Timer控件可用于后台进程中，可在Timer事件内编程，要停止触发Timer事件，需要设置的属性是（）
A．Visible=False或Enabled=FalseB．Interval=0或Visible=False
C．Interval=0或Enabled=FalseD．Interval=0且Enabled=False
27.图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，这个属性是（）。
A、AutosizeB、Stretch
C、AutoRedraw D、Appearance
28.以下叙述中正确的是（）。
A、窗体的Name属性指定窗体的名称，用来标识一个窗体
B、窗体的Name属性的值是显示在窗体标题栏中的文本
C、可以在运行期间改变对象的Name属性的值
D、对象的Name属性的值可以为空
29.以下叙述中错误的是（）。
A、一个工程中可以包含多个窗体文件
B、在一个窗体文件中用Private定义的通用过程能被其它窗体调用
C、在设计VisualBasic程序时，窗体、标准模块、类模块等需要分别保存为不同类型的文件
D、全局变量必须在标准模块中定义
30.在VisualBasic中，变量的默认类型是（）。
A、IntegerB、Double
C、Variant D、Currency
31.用Line方法画直线后,当前坐标在（）。
A、（0，0）B、直线起点
C、直线终点 D、容器的中心
32.执行指令“Line（1200,1200）-Step（1000,500）,B”后，CurrentX=（）
A、2200B、1200
C、200 D、1700
33．要退出Do…Loop循环，可使用的语句是（）。
A、ExitB、ExitForC、EndDoD、ExitDo
二、填空题
1.VisualBasic6.0集成开发环境有三种工作模式，当应用程序处于中断模式时，这时不可以。
2.在VB中，要想获得某个相关控件或语句的帮助信息，一般可首先选中该控件或语句，然后按键。
3.以写方式打开D盘中的Text.dat文件，正确的语句是
4.数学表达式
写成等价的VisualBasic表达式为。
5.将图片框的AutoSize属性设置成时，可使图片框根据图片调整大小。
6.Winsock控件的LocalIP属性，可以返回，LocalHostName属性，可以返回。
7．若窗体Form1左上角坐标为（-400,2500），右下角坐标为（400,-250），则X轴的正向向，Y轴的正向向。
8.ADO模型中一般可通过对象的Execute方法执行增加、删除、修改SQL语句。
9．使用ADO模型时，可通过属性建立Recordset和Connection对象的连接。
10．在VB中，将数据库分为，外部数据库和。
11．假设ADOrs为一个Recordset对象，那么从Table1表中获取所有记录的语句是
12．VB提供了结构化程序设计的三种基本结构，这三种基本结构是、
、。
13．如果要每隔15s产生一个Timer事件，则Interval属性应设置为。
14．VB中的程序错误类型主要有编译错误、等三种。
15．函数返回系统的时间。
16．以窗体Form1的中心为圆心，画一个半径为800的圆的语句是
。
17．控件数组的名字由属性指定，而数组中的每个元素由属性决定。
18．在VB的DAO、RDO、ADO三种数据对象的模型中，采用Jet引擎和ODBC两种方式访问数据库的是，采用ODBC访问数据库的是，主要采用OLEDB访问数据库的是。
19．按文件的存取方式。
可将文件分为、、
20．定时器（Timer）控件可识别的事件是，发生该事件的时间间隔由定时器的属性设置，其单位为。
三、阅读程序题
阅读下列程序并写出程序运行结果
1．
PrivateSubForm_Click（）
DimcAsInteger,jAsInteger,kAsInteger
k=0
c=1
Forj=1To5
Ifj>
3Then
c=c+4
ExitFor
Else
k=k+1
EndIf
Nextj
Printc,k
EndSub
写出程序运行时单击窗体后，c,k的值分别是：
2．
DimxAsInteger
StaticyAsInteger
x=x+2
y=y+3
Form1.Print"
x="
;
x,"
y="
y
EndSubEndSub
写出程序运行时连续单击三次窗体后，Form1上的输出结果。
3．
PrivateSubCommand1_Click（）
DimsAsDouble
DimiAsInteger
s=5
i=1
DoWhilei<
9
i=i+2
s=s+i
Loop
Text1.Text=s
EndSub
文件框Text1的输出结果是：
4.
DimIasinteger,jasinteger
Dimcasinteger
c=0
Fori=1To3
Forj=1to3
c=c+1
Nextj
NextI
Printc
写出程序运行时单击窗体后，c的输出结果：
5.
FunctionF（aAsInteger）
b=0
Staticc
b=b+1
c=c+2
F=a+b+c
EndFunction
DimaAsInteger
a=2
Fori=1To3
PrintF（a）
Nexti
写出程序运行时，单击命令按钮在窗体上的输出结果。
6.
DimA（1To5）AsInteger
Fori=1To5
A（i）=i
DoWhilex<
3
A（i）=A（i）+x
x=x+1
i=i+1
Text1.Text=A
（1）
Text2.Text=A
（2）
7.
SubChange（ByValxAsInteger,ByValyAsInteger）
DimtAsInteger
t=x
x=y
y=t
Printx,y
DimaAsInteger,bAsInteger
a=10:
b=20
Changea,b
Printa,b
写出程序运行时单击窗体后，Form1上的输出结果。
四、完善程序题
1．列表框应用程序。
要求在文本框Text1中输入课程名称，然后按“添加”按钮，把课程名称添加到列表框中；
当选择列表框中某一项后，按“删除”按钮，则从列表框中删除该项；
按“统计”按钮，在文本框Text2中输出课程数量总数；
按“结束”按纽，退出应用程序。
程序运行结果如图1所示。
图1
程序如下，请补充完整。
PrivateSubForm_Load（）
List1.AddItem"
计算机应用基础"
程序设计基础"
软件技术基础"
VisualBasic程序设计"
SQLSERVER数据库应用"
计算机专业英语"
Delphi程序设计"
IfText1.Text<
>
"
Then
[1]
Text1.Text=[2]
MsgBox"
请在文本框中输入信息！
[3]
PrivateSubCommand2_Click（）
List1.RemoveItem[4]
PrivateSubCommand3_Click（）
Text2.Text=[5]
PrivateSubCommand4_Click（）
UnloadMe
2.
函数图形程序。
用Pset方法在图形框Picture1内绘制y=Sinx在-π到π之间的图形。
运行结果如图8所示。
程序如下，请补充完整：
Picture1.Scale（-4,2）-（4,-2）'
定义坐标系
Picture1.Line（-4,0）-（4,0）'
画x轴
[1]'
画y轴
Picture1.CurrentX=0.2'
设置原点横坐标
Picture1.CurrentY=-0.1'
设置原点纵坐标
[2]'
标记原点
Picture1.CurrentX=-3.2
Picture1.CurrentY=-0.1
Picture1.Print"
-π"
'
标记“-π”
Picture1.CurrentX=3.3
π"
Picture1.CurrentX=0.2
Picture1.CurrentY=0.9
1"
标记“1”
Picture1.CurrentY=-0.8
-1"
标记“-1”
Fori=[3]Step0.001
Picture1.PSet（[4]）
[5]
五、编程题
编写一程序，要求单击“开始”按钮（Command1），在列表框（List1）中输出200~300之间不能被5整除的数，单击清除按钮（Command2），清除文本框中的全部内容。
程序运行结果如图所示。
注：
其它类型的完善程序题和编程题，请参考上学期网上复习要点及练习。
练习题答案答案
1．B2．D3．C4．B5．D6．C7．A8．B9．D10．B11．A
12．C13．C14．D15．C16．A17．B18．D19．D20．C
21．D22．B23．A24．B25．B26．C27．B28．A29．B30．C
31．C32．A33．D
1.设计界面
2.F1
3.open"
\text.dat"
ForOutputAs#1
4.5^（1/2）*sin（30*3.14/180），或者Sqr（5）*sin（30*3.14/180）
5.True
6.本地计算机的IP地址返回或设置远程计算机的名称
7.右上
8.Connection
9.ActiveConnection
10.本地数据库远程数据库
11.ADOrsOpen”Select*FromTable1”
12.选择结构循环结构顺序结构
13.15000
14.实时错误逻辑错误
15.Time
16.Circle（ScaleWidth/2,ScaleHeight/2）,800
17.NameIndex
18.DAORDOADO
19.顺序文件随机文件二进制文件
20.TimerIntervalms
1.
53
x＝2y=3
x＝2y=6
x＝2y=9
3.
29
5
7
9
6.
13
2010
1020
[1]List1.AddItemText1.Text
[2]"
[3]EndIf
[4]List1.ListIndex
[5]List1.ListCount
[1]Picture1.Line（0,2）-（0,-2）
[2]Picture1.Print"
0"
[3]-3.141To3.141Step0.001
[4]i,Sin（i）
[5]End
x=200
DoUntilx>
300
IfxMod5<
0Then
List1.AddItemx
EndIf
List1.Clear
升级会员 