Visual Basic程序设计复习题及答案Word文档下载推荐.docx
《Visual Basic程序设计复习题及答案Word文档下载推荐.docx》由会员分享，可在线阅读，更多相关《Visual Basic程序设计复习题及答案Word文档下载推荐.docx（13页珍藏版）》请在冰豆网上搜索。
A.12B.10C.50D.11
12.表达式Mid（"
Beijing2008"
4,4）的值是[]
A.BeijB.jingC.inj2D.2008
13.A$="
+3.14+2"
，则Val（A$）的值为[]
A.+3.14+2B.+5.14C.3.14D.5.14
14.语句：
Dimstudent（10,5to100）定义的是一个（）维数组。
[]
A.2B.3C.5D.10
15.默认情况下，语句：
Dimstudent（10to11,4）定义的数组有（）个元素。
A.20B.22C.10D.11
二、填空题：
1.工程文件的扩展名是_______，窗体文件的扩展名是_______。
2.下列表达式返回的值为True还是False_________。
9>
4+3
Or
5+3>
10
And
Not（4+2>
5
EQV
3+5>
2）
3.为了能在运行时把d:
\pic文件夹下的图形a.jpg装入图片框Picture1,所使用的语句为___________。
4.以下语句的输出结果是_______。
a%=3.14156
Printa%
5.设有如下程序语句：
ForI=1To100Step7
S=S+1
NextI
在该循环语句中，循环体S=S+1的循环执行次数应为______________
6.VisualBasic提供的对数据文件的三种访问方式为随机访问方式,__________和二进制访问方式。
7.与数学表达式cos2（a+b）÷
（3+x）+5对应的VisualBasic表达式是_____________。
8.表达式Fix（-3.2）+Int（-2.4）的值为______________。
9.VisualBasic中有一种控件组合了文本框和列表框的特性，这种控件是________。
10.表达式Str（Int（-2.3）+Sgn（6）+Sqr（25））的值为________。
11.VisualBasic6.0分为3种版本，这3种版本是_______、_______和_______。
12.以下语句的输出结果是__________。
a%=3.14156
printa%
13.执行下面的程序段后，S的值为_______。
Fori=2.6To4.9Step0.6
s=s+1
Nexti
14.在VisualBasic中最基本的对象是____________。
15.OOP的含义是________。
三、程序改错：
1.程序功能：
建立一个过程来计算11的阶乘，程序中有错误，改正错误，使程序能输出正确的结果。
PrivateSubCommand1_Click（）
Calln（11）
EndSub
PublicSubn（aAsInteger）
DimiAsInteger
DimfAsInteger
f=0
Fori=1Toa
f=f*i
Printf
2.程序功能：
求S=1+1/2+1/3+……+1/100，程序中有一行错误。
改正错误，使它能输出正确的结果。
OptionBase1
sum1=sumd（100）
Printsum1
PrivateFunctionsumd（nAsInteger）AsSingle
i=0
Do
i=i+1
s=s+1/i
LoopUntili>
=n
sumf=s
EndFunction
3.程序功能：
求当N=10时，S=1+2+3+….+N的值。
程序中有一行有错误。
s=0
n=1
DoWhilen<
=10
n=n+1
S=S+1
Loop
Print“S=”;
S
4.程序功能：
根据整型参数m，计算100-999的平方根的倒数之和。
程序的函数fun（）中有一行有错误，改正错误，使它能输出正确的结果。
PrivateSubCommand1_Click（）
PrintFormat（fun（100,999）,"
#.######"
）
PrivateFunctionfun（mAsInteger,nAsInteger）AsSingle
y=0
Fori=mTon
t=1/Sqr（i）
y=y+t
fun=t
四、程序填空题：
1.编程求1－99的平方根的和并输出结果。
（保留两位小数）
PrivateSubcmdSqrt_Click（）
DimiAsInteger,sAsSingle
s=_________
Fori=1To99
________________
Nexti
s=Round（s,2）
FontSize=12
FontBold=True
Prints
2.编写一个Function过程，求数组a（10,50.34,26）的最小值
PrivateFunctionFindMin（a（）AsInteger）
Dimx1AsInteger,x2AsInteger,iAsInteger
X1=LBound（a）
X2=_________
Min=a（x1）
ForI=x1Tox2
Ifa（i）>
MinThen
_________
FindMin=Min
EndFunction
DimnAsInteger
n=_________
printn
EndSub
3.用选择法将数组a中的6个整数按升序排列。
Dima（1To6）asInteger,MasInteger,TasInreger
a=Array（324,78,459,728,439,357）
Fori=____
Forj=_____
Ifa（i）______a（j）Then
M=j
T=a（i）
a（i）=a（j）
a（j）=T
EndIf
Nextj
Fori=1To10
Printa（i）
4.在文本框Text1中输入一个字符串，统计各字母出现的次数，字母不区分大小写。
Dima（1To26）AsInteger，cAsString*1
Le=Len（Text1）
ForI=1Tole
c=____________
Ifc>
=“A”Andc<
=“Z”Then
j=Asc（c）—65+1
a（j）=____________
EndIf
Forj=1To26
Ifa（j）>
0ThenPicture1.PrintChr（j+64）;
”=”;
a（j）;
””;
5.在窗体画1个命令按钮,然后编写一个函数:
Functiona（i）
DimsAsInteger
S=0
Fork=1Toi
s=s+（k+1）*k
Nextk
a=s
b=5
x=a（b）
Printx
程序运行的结果为________。
五、编程题：
1.在窗体上画3个标签，名称分别为L1，L2，L3。
标题分别为“操作数1”，“操作数2”和“结果”；
再在窗体上画3个命令按钮，名称分别为cmd1,cmd2,cmd3。
标题分别为“加法”，“减法”和“乘法”。
最后在窗体上画3个文本框，名称为Text1,Text2,Text3,内容为空。
编写适当的程序，程序的功能是实现简单的加法、减法和乘法的运算。
程序的运行结果如图1所示：
图1
PrivateSubcmd1_Click（）
PrivateSubcmd2_Click（）
PrivateSubcmd3_Click（）
2.编写程序，根据身高计算标准体重。
计算公式如下：
男标准体重（kg）＝身高－100
女标准体重（kg）＝身高－105
注：
按钮“男”的Value属性已设为True;
程序界面设计如图1
图1程序设计界面
表1控件设计表
控件
控件名
标题
标签框1
标准框2
标准框3
Label1,Label2
Label3
请输入身高
标准体重为
请选择性别
文本框1
文本框2
Text1
Text2
无
单选按钮1
单选按钮2
Option1,Option2
男
女
命令按钮1
Command1
Command2
计算
结束
要求如下：
（1）单击按钮“计算”，根据输入的身高和性别计算相应性别计算相应的性别的标准体重，并显示在文本框中;
（2）单击“结束”按钮，结束程序运行;
PrivateSubCommand1_Click（）‘计算按钮
PrivateSubCommand2_Click（）
3.在窗体上有一个命令按钮：
Command1,4个文本框控件：
Text11~Text4功能是找出三个数中的最大数，界面如下图所示：
六、问答题：
本题15分。
1.简述多文档及其特性。
2.简述对话框的分类和特点。
参考答案
1.A2.A3.D4.B5.B6.C7.B8.D9.D10.B11.B12.B13.C14.A15.C
1..vbp,.frm
2.true;
分析：
由高到低Not→And→Or→Xor→Eqv→Imp
3.Picture1.picture=LoadPicture（“d:
\pic\a.jpg”）
4.3
%是整形的说明符
5.15
循环次数=[（100-1）/7+1]=15
6.顺序访问方式
7.（cos（a+b））^2÷
（3+x）+5
8.-6Int和Fix函数的区别在于如果number参数为负数时，Int函数返回小于或等于number的第一个负整数，而Fix函数返回大于或等于number参数的第一个负整数。
9.组合框
10.3
11.学习版、专业版、企业版
12.3
13.9
14.窗体
15.面向对象的程序设计
三、程序改错题：
1.第七行f=0改成f=1
2.第十行i>
=n改成i>
=n-1
3.第三行n=1改成n=0
4.第十行fun=t改成fun=y
1.s=s+Sqr（i）
a（j）+1
2.UBound（a）
Min=a（i）
FindMin（a（））
3．1To5
i+1To6
>
4．UCase（Mid（Text1,I,1））
5．70
1.加法：
Text3.Text=Val（Text1.Text）+Val（Text2.Text）
减法：
Text3.Text=Text1.Text-Text2.Text
乘法：
Text3.Text=Text1.Text*Text2.Text
2.PrivateSubCommand1_Click（）
IfOption1.Value=TrueThen
Text2.Text=Text1.Text-100
ElseIf
Option2.Value=TrueThen
Text2.Text=Text1.Text-105
End
3.PrivateSubCommand_Click（）
Dima!
b!
c!
max!
a=Text1.Text
b=Text2.Text
c=Text3.Text
max=a
Ifb>
maxThenmax=b
Ifc>
maxThenmax=c
Text4.Text=max
1.答：
●定义：
多文档界面（MDI，MultipleDocumentInterface）允许创建在单个容器窗体中包含多个窗体的应用程序。
绝大多数基于Windows的大型应用程序都是多文档界面，例如，MicrosoftWord和MicrosoftExcel等。
多文档界面可同时打开多个文档，它简化了文档之间的信息交换。
●多文档界面有如下特性：
（1）所有子窗体均显示在MDI窗体的工作区中。
用户可以改变、移动子窗体的大小，但被限制在MDI窗体中。
（2）当最小化子窗体时，它的图标将显示在MDI窗体上，而不是在任务栏中。
当最小化MDI窗体时，所有的子窗体也被最小化，只有MDI窗体的图标出现在任务栏中。
（3）当最大化一个子窗体时，它的标题与MDI窗体的标题一起显示在MDI窗体的标题栏上。
（4）MDI窗体和子窗体都可以有各自的菜单，当子窗体加载时覆盖MDI窗体的菜单。
2.答：
分类：
对话框分为3种类型：
预定义对话框、通用对话框和自定义对话框
（1）预定义对话框也称预制对话框，是由系统提供的。
VB提供了两种预定义对话框，即输入框和信息框（或消息框），前者用InputBox函数建立，后者用MsgBox函数建立，具体用法参见第4章。
（2）通用对话框是一种控件，用这种控件可以设计较为复杂的对话框。
（3）自定义对话框也称定制对话框，这种对话框由用户根据自己的需要进行定义。
输入框和信息框尽管很容易建立，但在应用上有一定的限制，很多情况下无法满足需要，用户可以根据具体需要建立自己的对话框。
本章将介绍后两种对话框，即通用对话框和自定义对话框。
●特点：
（1）在一般情况下，用户没有必要改变对话框的大小，因此其边框是固定的。
（2）为了退出对话框，必须单击其中的某个按钮，不能通过单击对话框外部的某个地方关闭对话框。
（3）在对话框中不能有最大化按钮（MaxButton）和最小化按钮（MinButton），以免被意外地扩大或缩成图标。
（4）对话框不是应用程序的主要工作区，只是临时使用，使用后就必须关闭。
升级会员 