Visual Basic程序设计复习题及答案.docx
《Visual Basic程序设计复习题及答案.docx》由会员分享,可在线阅读,更多相关《Visual Basic程序设计复习题及答案.docx(15页珍藏版)》请在冰豆网上搜索。
VisualBasic程序设计复习题及答案
中南大学网络教育课程考试复习题及参考答案
VisualBasic程序设计(专科)
一、单项选择题:
1.VisualBasic程序中的注释所使用的字符是[]
A.'B.:
C.\D._
2.若要设置定时器的定时间隔设为10秒,应将()属性值设为10000。
[]
A.IntervalB.ValueC.EnabledD.Text
3.算法一般都可以用()三种控制结构组合而成。
[]
A.循环、分支、递归B.顺序、循环、嵌套
C.循环、递归、选择D.顺序、选择、循环
4.下列可调整图片框的大小以适合图片的属性是[]
A.stretchB.autosizeC.pictureD.oledropmode
5.用下面的语句所定义的数组的元素个数是[]
Dimarr(3to5,-2to2)
A.20B.12C.15D.24
6.下列不属于常量的是[]
A.12B.“ch”C.abcD.1.23
7.InputBox函数的返回值类型为[]
A.数值型B.字符型C.逻辑型D.变体型
8.默认情况下,语句:
Dimstudent(10,5)定义的数组有()个元素。
[]
A.50B.6C.15D.66
9.Abs(-3.14)的值是[]
A.3B.-3C.-3.14D.3.14
10.要让菜单项无效,应将()属性值设置为False。
[]
A.VisibleB.EnabledC.MoveableD.Checked
11.以下代码,循环()次[]
Dimn
Forn=1To50Step5
sult.Text=Str(n)
Next
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
Nexti
Printf
EndSub
2.程序功能:
求S=1+1/2+1/3+……+1/100,程序中有一行错误。
改正错误,使它能输出正确的结果。
OptionBase1
PrivateSubCommand1_Click()
sum1=sumd(100)
Printsum1
EndSub
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的值。
程序中有一行有错误。
改正错误,使它能输出正确的结果。
PrivateSubCommand1_Click()
s=0
n=1
DoWhilen<=10
n=n+1
S=S+1
Loop
Print“S=”;S
EndSub
4.程序功能:
根据整型参数m,计算100-999的平方根的倒数之和。
程序的函数fun()中有一行有错误,改正错误,使它能输出正确的结果。
PrivateSubCommand1_Click()
PrintFormat(fun(100,999),"#.######")
EndSub
PrivateFunctionfun(mAsInteger,nAsInteger)AsSingle
y=0
Fori=mTon
t=1/Sqr(i)
y=y+t
Nexti
fun=t
EndFunction
四、程序填空题:
1.编程求1-99的平方根的和并输出结果。
(保留两位小数)
OptionBase1
PrivateSubcmdSqrt_Click()
DimiAsInteger,sAsSingle
s=_________
Fori=1To99
________________
Nexti
s=Round(s,2)
FontSize=12
FontBold=True
Prints
EndSub
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
_________
Nexti
FindMin=Min
EndFunction
PrivateSubCommand1_Click()
DimnAsInteger
n=_________
printn
EndSub
3.用选择法将数组a中的6个整数按升序排列。
OptionBase1
PrivateSubCommand1_Click()
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
Nexti
Fori=1To10
Printa(i)
Nexti
EndSub
4.在文本框Text1中输入一个字符串,统计各字母出现的次数,字母不区分大小写。
OptionBase1
PrivateSubCommand1_Click()
Dima(1To26)AsInteger,cAsString*1
Le=Len(Text1)
ForI=1Tole
c=____________
Ifc>=“A”Andc<=“Z”Then
j=Asc(c)—65+1
a(j)=____________
EndIf
NextI
Forj=1To26
Ifa(j)>0ThenPicture1.PrintChr(j+64);”=”;a(j);””;
Nextj
5.在窗体画1个命令按钮,然后编写一个函数:
Functiona(i)
DimsAsInteger
S=0
Fork=1Toi
s=s+(k+1)*k
Nextk
a=s
EndFunction
PrivateSubCommand1_Click()
b=5
x=a(b)
Printx
EndSub
程序运行的结果为________。
五、编程题:
1.在窗体上画3个标签,名称分别为L1,L2,L3。
标题分别为“操作数1”,“操作数2”和“结果”;再在窗体上画3个命令按钮,名称分别为cmd1,cmd2,cmd3。
标题分别为“加法”,“减法”和“乘法”。
最后在窗体上画3个文本框,名称为Text1,Text2,Text3,内容为空。
编写适当的程序,程序的功能是实现简单的加法、减法和乘法的运算。
程序的运行结果如图1所示:
图1
PrivateSubcmd1_Click()
EndSub
PrivateSubcmd2_Click()
EndSub
PrivateSubcmd3_Click()
EndSub
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
命令按钮1
Command1
Command2
计算
结束
要求如下:
(1)单击按钮“计算”,根据输入的身高和性别计算相应性别计算相应的性别的标准体重,并显示在文本框中;
(2)单击“结束”按钮,结束程序运行;
PrivateSubCommand1_Click()‘计算按钮
EndSub
PrivateSubCommand2_Click()
EndSub
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))
a(j)+1
5.70
五、编程题:
1.加法:
PrivateSubcmd1_Click()
Text3.Text=Val(Text1.Text)+Val(Text2.Text)
EndSub
减法:
PrivateSubcmd2_Click()
Text3.Text=Text1.Text-Text2.Text
EndSub
乘法:
PrivateSubcmd3_Click()
Text3.Text=Text1.Text*Text2.Text
EndSub
2.PrivateSubCommand1_Click()
IfOption1.Value=TrueThen
Text2.Text=Text1.Text-100
ElseIf
Option2.Value=TrueThen
Text2.Text=Text1.Text-105
EndSub
PrivateSubCommand2_Click()
End
EndSub
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
EndSub
六、问答题:
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)对话框不是应用程序的主要工作区,只是临时使用,使用后就必须关闭。