vb期末考试最新例题.docx
- 文档编号:27015363
- 上传时间:2023-06-25
- 格式:DOCX
- 页数:29
- 大小:28.30KB
vb期末考试最新例题.docx
《vb期末考试最新例题.docx》由会员分享,可在线阅读,更多相关《vb期末考试最新例题.docx(29页珍藏版)》请在冰豆网上搜索。
vb期末考试最新例题
1.SUB与Function过程,Function过程是函数,有返回值
2.数据字典在后续数据库可修改,又称元数据,可储存在计算机中,用数据字典来管理
数据项,数据结构,数据流,处理逻辑,数据储存,外部实体。
3.在菜单编辑器中,Open命令方式是把Caption改成&open
4.数据流程图(DFD)作为描述工具软件开发阶段是:
需求分析
5.信息隐藏概念与模块独立性直接相关
6.软件调试目的是:
改正错误
7.Function可以用CALL调用
8.变量名第一个字符必须是字母,长度不超过255字符,不能使用关键字
9.数据只能以ASCII码形式存放在文件中,可通过文本编辑软件显示
10.强制显示声明变量可在窗模块或标准模块中加上OptionExplicit
11.命令按钮所有Caption属性不都只能是command1,默认情况下,所有命令按钮元素大小相同,在代码中任意访问一个命令按钮都要使用名称Command1加下标的方式,所有命令按钮共享一个相同事件过程
12.软件需求说明书作用:
反映用户问题的结构可以作为软件开发的工作的基础和结构,便于用户和开发人员理解,交流,作为确认测试和验收的依据
13.关系数据模型:
关系操作结果是二维表,关系数据型中,实体集和实体集之间的联系均用二维表表示,存储路径对用户透明
14.数据独立性指的是应用程序和数据库的逻辑结构,物理结构之间相互独立性
15.刚建立一个EXE工程中,不出现工具箱控件是通用对话框
16.N-S图是为了避免流程图在描述程序逻辑时的灵活性,提出用方框图代替传统流程图
17.对象的某些属性既可以在属性窗口中设置,也可以通过代码程序设置或改变
18.瀑布模型方法,分析和设计的方法是直顶向下,逐层分解,逐步求精
19.用户所见的数据模型是外模式
20.放置控件到窗体最快捷方法是双击工具箱中的控件
21.清空图片框方法之一是加载空图片,可用print在图片框中输入文本,可作容器使用
22.为了在窗体上增加文字说明,最常用的是标签控件,其中设置atosize属性为True时它的大小自动适应文字的长短。
23.在单击滚动条或单击滚动条两端的箭头时,滚动条的Value属性值将随之递增或递减。
其中largechange用于返回或设置在单击滚动条区域时Value属性值的改变量
24.将文本框Text1中的内容添加到列表框List1的末尾可以使用语句list1.additemtext1.text。
25.在对列表框进行列表项的添加时,可使用additem方法。
26.E与D分别代表10幂次,E代表单精度型,D代表双精度型
27.随机文件:
每条记录的长度必须相同,可通过编程对文件中的某条记录方便地修改,文件的组织结构比顺序文件复杂
28.结构化分析的常用工具的是数据流图,数据字典,判定树
29.数据的冗余度是指相同数据重复出现,数据的安全性是指保护数据,防止非法使用,数据的完整性是指数据的正确性和一致性
30.信息系统软件开发瀑布模型方法将软件生命周期依次分为(系统规划、系统分析、系统设计、系统实施和系统维护阶段)。
31.关于系统规划原则信息系统的结构要有良好的整体性,方案选择要考虑实用和实效,技术手段强调成熟和先进,计划安排强调合理和可行,以应用单位的战略目标作为系统规划的出发点,分析本单位管理的信息需求
二.各个题型:
1.在窗体上画一个文本框,然后编写如下事件过程:
PrivateSubForm_Click()
X=Inputbox("请输入一个整数")
PrintX+Text1.Text
EndSub
程序运行时,在文本框中输入456,然后单击窗体,在输入对话框中输入123,单击"确定"按钮后,在窗体上显示的内容是(123456)。
2.关于语句Ifx=1Theny=1,下列说法正确的是(x=1为关系表达式,y=1为赋值语句)。
3.执行下列程序段,输出结果为(70)。
Dima(10)AsInteger
DimiAsInteger
Fori=1To10
a(i)=2*i-1
Nexti
Printa(4);
Erasea
Printa(4)
4.设A,B,C表示三角形的三条边,表示条件"任意两边之和大于第三边"的布尔表达式可以用(A+B>CAndA+C>BAndB+C>A)表示。
5.名为sort的Sub子过程的形式参数为一数组,以下的定义语句中正确的是(PrivateSubsort(A()AsInteger))。
6.下面(#False#)不是字符串常量。
7.在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程:
PrivateSubCommand1_Click()
A=Inputbox("EnterAnInteger")
B=Inputbox("EnterAnInteger")
Text1.Text=B+A
EndSub
程序运行后,单击命令按钮,如果在输入对话框中分别输入4和56,则文本框中显示的内容是(564)。
8.下列符号常量的声明中,(ConstaAsDouble=Sin
(1))是不合法的。
9.下面程序段的运行结果为(1212288)。
n=1
Fori=1To4
Forj=1Toi
n=n*j
Nextj
Printn;
Nexti
10.下列程序段的执行结果为(46)。
Dima(10)AsInteger,b()AsInteger
DimiAsInteger
ReDimb(5)
Fori=1To10
a(i)=i
IfiMod2=0Then
b(i/2)=a(i)
EndIf
Nexti
Printa(4);b(3)
11.运行下列程序并用记事本打开数据文件观察结果为("李斌",89,67)。
Open"c:
\score.dat"ForOutputAs#1
Write#1,"李斌",89,67
Close#1
12.设有数组声明语句:
OptionBase1
DimA(2To4,3)
以上语句所定义的数组A中共有(9)个元素。
13.假定在窗体(名称为Form1)的代码窗口中定义如下记录类型:
PrivateTypeanimal
animalNameAsString*20
aColorAsString*10
EndType
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
DimrecAsanimal
Open"c:
\vbTest.dat"ForRandomAs#1Len=len(reC)
reC.animalName="Cat"
reC.aColor="White"
Put#1,,rec
Close#1
EndSub
则以下叙述中正确的是(语句"Put#1,,rec"将animal类型的两个数据元素写到文件中)。
14.在窗体上用复制、粘贴的方法建立一个命令按钮数组,数组名为C1,共有3个数组元素。
设窗体Form1的标题为"Myform1",打开代码编辑器,写下如下代码:
PrivateSubC1_Click(IndexAsInteger)
Form1.Caption="myform2"
EndSub
运行时,单击按钮数组中的第三个按钮,则窗体标题为(myform2)。
15.一只白色的足球被踢进球门,则白色、足球、踢、进球门是(属性、对象、事件、方法)。
16.在窗体上画一个命令按钮,名称为Command1。
单击命令按钮时,执行如下事件过程:
PrivateSubCommand1_Click()
a$="MicroSoftVisualBasic"
B$=Right(a$,5)
C$=Mid(a$,1,9)
MsgBoxa$,,B$,C$,1
EndSub
则在弹出的信息框的标题栏中显示的信息是(Basic)。
17.有程序段如下:
Fori=1To3
Forj=5ToiStep-1
Printi*j
Nextj
Nexti
其中"Printi*j"语句执行的次数为(12)。
18.下列程序段的执行结果是(False)。
X=2
Y=1
IfX*Y<1ThenY=Y-1ElseY=-1
PrintY-X>0
19.有如下程序:
PrivateSubCommand1_Click()
x=InputBox("inputvalue")
SelectCasex
CaseIs>0
y=x+1
CaseIs=0
y=x+2
CaseElse
y=x+3
EndSelect
Printx;y
EndSub
假设运行时从键盘上输入-5,输出结果是(-5-2)。
20.执行下列程序段,输出结果为(出错)。
Dima()AsInteger
DimiAsInteger
ReDima(10)
Fori=1To10
a(i)=2*i-1
Nexti
Printa(4);
Erasea
Printa(4)
21.下面程序段的运行结果为(12624)。
Fori=1To4
n=1
Forj=1ToI
n=n*j
Nextj
Printn;
Nexti
22.执行语句:
A=Inputbox("Today","Tomorrow","Yesterday")
将显示一个输入对话框,在对话框的输入区中显示的信息是(Yesterday)。
23.若在应用程序中用"PrivateSubSub1(XAsInteger,YAsSingle)"定义了子程序Sub1,以下调用子程序Sub1的Call语句中(CallSub1(5))是错误的。
24.在下面的程序段中,循环体将执行(0)次。
Forv=10To20Step-2
printv
Nextv
25.执行以下程序,单击命令按钮后,窗体上的输出结果是(-1)。
PrivateSubCommand1_Click()
DimaAsInteger
a=True*6+5
Printa
EndSub
26.运行以下程序,单击窗体后,如果依次输入20和40,则输出内容是(60)。
PrivateSubForm_Click()
DimxAsInteger
x=InputBox("请输入变量x的值","输入窗口")
y=InputBox("请输入变量y的值","输入窗口")
Printx+y
EndSub
27.一个工程中含有窗体Form1.Form2和标准模块Model1,如果在Form1中有语句
PublicXAsInteger;在Model1中有语句PublicYAsInteger则以下叙述中正确的是(在From1中可以直接使用X)
28.在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程:
PrivateSubCommand1_Click()
A=Inputbox("EnterAnInteger")
B=Inputbox("EnterAnInteger")
Text1.Text=B+A
EndSub
程序运行后,单击命令按钮,如果在输入对话框中分别输入4和56,则文本框中显示的内容是(564)。
29.使用(AddItem)方法可将新的列表项添加到一个列表框中。
30.在数据管理技术发展过程中,文件系统与数据库系统的主要区别是数据库系统具有(特定的数据模型)。
31.面向对象的设计方法与传统的的面向过程的方法有本质不同,它的基本原理是(使用现实世界的概念抽象地思考问题从而自然地解决问题)。
32.在文本框Text1中输入数字12,Text2中输入数字34,执行以下语句,只有(Text3.Text=val(Text1.Text)+val(Text2.Text))
可使文本框Text3中显示46。
33.VB中三种文件访问的类型为(顺序、随机、二进制)。
34.SQL语句集数据查询、数据操纵、数据定义和数据控制功能于一体,语句INSERT、DELETE和UPDATE实现的功能为(数据操纵)。
35.软件测试是软件开发过程中的一个重要环节。
软件产品在交付前必须经历三种测试,它们是(模块测试、集成测试和验收测试)。
36.执行以下程序,单击命令按钮后在窗体上的输出内容是(200)。
PrivateSubCommand1_Click()
DimaAsInteger,bAsInteger,cAsInteger
a=2
c=b=a
Printa,b,c
EndSub
37.运行以下程序,单击窗体后,如果依次输入20和40,则输出内容是(2040)。
PrivateSubForm_Click()
x=InputBox("请输入变量x的值","输入窗口")
y=InputBox("请输入变量y的值","输入窗口")
Printx+y
EndSub
38.下面这段程序的运行结果为(22-2-2)。
PrivateSubCommand1_Click()
Print9Mod7;9Mod-7;-9Mod7;-9Mod-7
EndSub
39.下面这段程序,第一行运行结果为(6),第二行运行结果为(5),第三行运行结果为(12.3)。
PrivateSubCommand1_Click()
PrintLen(Str(12345))
PrintLen(CStr(12345))
PrintVal("12.3ab")
EndSub
40.执行以下程序,单击命令按钮后,输出结果是(012345678910)。
PrivateSubCommand1_Click()
Dima(10)AsInteger
Dimb
Fori=1To10
a(i)=i
Nexti
ForEachbIna
Printb;
Nextb
EndSub
41.在文本框Text1中输入一串字符,判别其是否是回文字符串。
所谓回文字符串是指正读和反读都一样的字符串,比如ABBA、DEAED等就是回文字符串。
PrivateSubCommand1_Click()
DimsAsString,nAsInteger,mAsInteger
s=Text1.Text
n=1
(m=len(s))
DoWhilen<=m
IfMid(s,n,1)=Mid(s,m,1)Then
m=m-1
(n=n+1或n=1+n)
Else
ExitDo
EndIf
Loop
If(n>m或m)Then
Text2.Text=Text1.Text&"是回文"
Else
Text2.Text=Text1.Text&"不是回文"
EndIf
EndSub
42.要从磁盘上新建一个文件名为"c:
\t1.txt"顺序文件的语句为Open"c:
\t1.txt"For(outopen)As#2。
43.下面程序段中,在窗体上显示的结果为(515)。
PrivateSubCommand1_Click()
DimbAsInteger,kAsInteger
b=1
Fork=1To5
b=b*k
Ifb>=15Then
ExitFor
Else
k=k+1
EndIf
Nextk
Printk,b
EndSub
44.执行下面的程序段,文本框Text1中显示的是(9)。
DimiAsInteger,jAsInteger
i=1
DoWhilei<20
j=i+j
i=i*(i+1)
Loop
Text1.Text=j
45.运行以下程序,单击窗体后,如果依次输入20和40,则输出内容是(60)。
PrivateSubForm_Click()
DimxAsInteger
x=InputBox("请输入变量x的值","输入窗口")
y=InputBox("请输入变量y的值","输入窗口")
Printx+y
EndSub
46.若形参前缺省ByVal和ByRef关键字,系统默认为按_(地址)传递。
47.下面程序是接受用户从键盘上输入的一个正整数,找出大于或等于该数的第一个素数。
OptionExplicit
PrivateSubCommand1_Click()
DimnAsInteger,kAsInteger
DimiAsInteger
n=InputBox("请输入一个正整数")
k=n
Do
Fori=2ToSqr(k)
IfkModi=0ThenExitFor
Nexti
Ifi>spr(k)Then
ExitDo
Else
K=k+1
EndIf
Loop
Print"大于等于";n;"的第一个素数是";k
EndSub
48.在过程中定义的变量,如果希望在离开该过程后,还能保存过程中局部变量的值,就应该使用(static)关键字在过程中定义局部变量。
49.以下程序段首先按降序输入10个数到数组Y的前10个元素中,又输入一个x插入到数组Y中,要求插入x后Y中的数据仍按降序排列。
DimY(1To11)
Fori=1To10
Y(i)=Val(InpuBox("请输入:
"))
Nexti
x=Val(InpuBox("请输入x:
"))
Fori=10To1Step-1
IfxxThen
ExitFor
EndIf
Y(i+1)=Y(i)
Nexti
Y(i+1)=x
Text1.Text=""
Fori=1To11
Text1.Text=Text1.Text&Str(Y(i))&""
Nexti
50.执行以下程序段,则第一行输出结果是(53),第二行输出结果是(-30)。
Dima(-3To5)AsSingle
Dimb(3,4)AsInteger
PrintUBound(a),UBound(b,1)
PrintLBound(a),LBound(b,2)
51.下列表达式的值分别为(-4)和(-3)。
①Int(-3.14159)②Fix(-3.14159)
52.以下程序的功能是:
从键盘上输入两个正整数,比较其大小,并输出相应的信息。
如:
将两个数赋给两个变量x和y,如果x=y,提示"两个数相等",x>y,提示"第一个数大于第二个数",x 按要求完善程序。 PrivateSubCommand1_Click() DimxAsInteger,yAsInteger IfText1.Text<>""AndIsNumeric(Text1.Text)Then'如果文本框已输入数值数据 x=Val(Text1.Text)'将输入的数值赋给变量x Else MsgBox"请在文本框中输入数值" Text1.SetFocus ExitSub EndIf IfText2.Text<>""AndIsNumeric(Text2.Text)Then y=Val(Text2.Text) Else MsgBox"请在文本框中输入数值" Text2.SetFocus ExitSub EndIf Ifx=yThen MsgBox"两个数相等" ElseIf(xx)Then MsgBox"第一个数小于第二个数" Else MsgBox"第一个数大于第二个数" EndIf EndSub 53.如果依次输入75,55,45,70,30,25,40,15,20,5,下列程序段的执行结果为(330)。 DimcAsInteger,kAsInteger,dAsInteger c=70 Fork=11To20 x=InputBox("输入X的数值: ") Ifx d=d+x: c=x Else d=d+c EndIf Nextk Printd 54.表示对象可见性的属性是(visible)。 55.阅读下面程序,当单击窗体后,窗体上输出的是(1274)。 PrivateSubForm_Click() DimiAsInteger,jAsInteger DimkAsInteger Fori=1To10Step3 Forj=1To10Step2 Ifj>=5Theni=i+4: ExitFor j=j+1 k=k+1 Nextj Ifi>8ThenExitFor Nexti Printi;j;k EndSub 56.设计一个函数,求任意数的阶乘。 编写通用函数过程如下,请补充程序。 PublicFunctionf(nAsDouble)AsDouble DimsAsDouble DimiAsInteger Ifn<0ThenExitFunction s=1 Fori=1T
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- vb 期末考试 最新 例题
![提示](https://static.bdocx.com/images/bang_tan.gif)