二级VISUAL BASIC真题.docx
- 文档编号:7211950
- 上传时间:2023-05-11
- 格式:DOCX
- 页数:19
- 大小:24.98KB
二级VISUAL BASIC真题.docx
《二级VISUAL BASIC真题.docx》由会员分享,可在线阅读,更多相关《二级VISUAL BASIC真题.docx(19页珍藏版)》请在冰点文库上搜索。
二级VISUALBASIC真题
二级VISUALBASIC真题2011年03月
一、选择题
下列各A)、B)、C)、D)四个选项中,只有一个选项是正确的。
1、下列关于栈叙正确的是( )。
A)栈顶元素最先能被删除 B)栈顶元素最后才能被删除
C)栈底元素永远不能被删除 D)以上三种说法都不对
2、下列叙述中正确的是( )。
A)有一个以上根结点的数据结构不一定是非线性结构
B)只有一个根结点的数据结构不一定是线性结构
C)循环链表是非线性结构
D)双向链表是非线性结构
3、某二叉树共有7个结点,其中叶子结点只有1个,则该二叉树的深度为(假设根结点在第1层)( )。
A)3 B)4 C)6 D)7
4、存软件开发中,需求分析阶段产生的主要文档是( )。
A)软件集成测试计划 B)软件详细设计说明书
C)用户手册 D)软件需求规格说明书
5、结构化程序所要求的基本结构不包括( )。
A)顺序结构 B)GOTO跳转
C)选择(分支)结构 D)重复(循环)结构
6、下面描述中错误的是( )。
A)系统总体结构图支持软件系统的详细设计
B)软件设计是将软件需求转换为软件表示的过程
C)数据结构与数据库设计是软件设计的任务之一
D)PAD图是软件详细设计的表示工具
7、负责数据库中查询操作的数据库语言是( )。
A)数据定义语言 B)数据管理语言 C)数据操纵语言 D)数据控制语言
8、一个教师可讲授多门课程,一门课程可由多个教师讲授。
则实体教师和课程间的联系是( )。
A)1:
1联系 B)1:
m联系 C)m:
1联系 D)m:
n联系
9、有三个关系R、S和T如下( )。
则由关系R和S得到关系T的操作是
A)自然连接 B)交 C)除 D)并
10、定义无符号整数类为UInt,下面可以作为类UInt实例化值的是( )。
A)-369 B)369
C)0.369 D)整数集合{1,2,3,4,5)
11、在VisualBasic集成环境中,可以列出工程中所有模块名称的窗口是( )。
A)工程资源管理器窗口 B)窗体设计窗口
C)属性窗口 D)代码窗口
12、假定编写了如下4个窗体事件的事件过程,则运行应用程序并显示窗体后,已经执行的事件过程是( )。
A)Load B)Click C)LostFocus D)KeyPress
13、为了使标签具有“透明”的显示效果,需要设置的属性是( )。
A)Caption B)Alignment C)BackStyle D)AutoSize
14、下面可以产生20~30(含20和30)的随机整数的表达式是( )。
A)Int(Rnd*10+20) B)Int(Rnd*11+20)
C)Int(Rnd*20+30) D)Int(Rnd*30+20)
15、设窗体上有一个名称为HS1的水平滚动条,如果执行了语句:
HS1.Value=(HS1.Max-HS1.Min)/2+HS1.Min则( )。
A)滚动块处于最左端
B)滚动块处于最右端
C)滚动块处于中间位置
D)滚动块可能处于任何位置,具体位置取决于Max、Min属性的值
16、窗体上有一个名称为Cb1的组合框,程序运行后,为了输出选中的列表项,应使用的语句是( )。
A)PrintCb1.Selected B)PrintCb1.List(Cb1.ListIndex)
C)PrintCb1.Selected.Text D)PrintCb1.List(Listlndex)
17、为了在窗体上建立2组单选按钮,并且当程序运行时,每组都可以有一个单选按钮被选中,则以下做法中正确的是( )。
A)把这2组单选按钮设置为名称不同的2个控件数组
B)使2组单选按钮的Index属性分别相同
C)使2组单选按钮的名称分别相同
D)把2组单选按钮分别画到2个不同的框架中
18、如果一个直线控件在窗体上呈现为一条垂直线,则可以确定的是( )。
A)它的Y1、Y2属性的值相等
B)它的X1、X2属性的值相等
C)它的X1、Y1属性的值分别与X2、Y2属性的值相等
D)它的X1、X2属性的值分别与Y1、Y2属性的值相等
19、设a=2,b=3,c=4,d=5.则下面语句的输出是( )。
Print3>2*bOra=cAndb<>cOrc>d
A)False B)1 C)True D)-1
20、窗体Form1上有一个名称为Command1的命令按钮,以下对应窗体单击事件的事件过程是( )。
A)PrivateSubForm1_Click()
...
EndSub
B)PrivateSubForm_Click()
...
EndSub
C)PrivateSubCommand1_Click()
...
EndSub
D)PrivateSubCommand1_Click()
...
EndSub
21、默认情况下,下面声明的数组的元素个数是( )。
Dima(5,-2To2)
A)20 B)24 C)25 D)30
22、设有如下程序段:
Dima(10)
...
ForEachxlna
Printx;
Nextx
在上面的程序段中,变量x必须是( )。
A)整型变量 B)变体型变量 C)动态数组 D)静态数组
23、设有以下函数过程
PrivateFunctionFun(a()AsInteger,bAsString)AsInteger
EndFunction
若已有变量声明:
Dimx(5)asInteger,nAsInteger,chAsString
则下面正确的过程调用语句是( )。
A)x(0)=Fun(x,"ch") B)n=Fun(n,ch)
C)CallFunx,"ch" D)n=Fun(x(5),ch)
24、假定用下面的语句打开文件:
Open"File1.Txt"ForInputAs#1
则不能正确读文件的语句是( )。
A)Input#1,ch$ B)LineInput#1,ch$
C)ch$=Input$(5,#1) D)read#1,ch$
25、下面程序的执行结果是( )。
PrivateSubCommand1_Click()
a=10
Fork=1To5Step-1
a=a-k
Nextk
Printa;k
EndSub
A)-56 B)-5-5 C)100 D)101
26、设窗体上有一个名为Text1的文本框和一个名为Command1的命令按钮,并有以下事件过程:
PrivateSubCommand1_Click()
x!
=Val(Text1.Text)
SelectCasex
CaseIs<-10,Is>=20
Print"输入错误"
CaseIs<0
Print20-x
CaseIs<10
Print20
CaseIs<=20
Printx+10
EndSelect
EndSub
程序运行时,如果在文本框中输入-5,则单击命令按钮后的输出结果是( )。
A)5 B)20 C)25 D)输入错误
27、设有如下程序
PrivateSubCommand1_Click()
x=10:
y=0
Fori=1To5
Do
x=x-2
y=y+2
LoopUntily>5Orx<-1
Next
EndSub
运行程序,其中Do循环执行的次数是( )。
A)15 B)10 C)7D)3
28、阅读程序:
PrivateSubCommand1_Click()
Dimarr
DimiAsInteger
art=Array(0,1,2,3,4,5,6,7,8,9,10)
Fori=0To2
Printarr(7-i);
Next
EndSub
程序运行后,窗体上显示的是( )。
A)876 B)765 C)654 D)543
29、在窗体上画一个名为Command1的命令按钮,然后编写以下程序:
PrivateSubCommand1_Click()
Dima(10)AsInteger
Fork=10To1Step-1
a(k)=20-2*k
Nextk
k=k+7
Printa(k-a(k))
EndSub
运行程序,单击命令按钮,输出结果是( )。
A)18 B)12 C)8 D)6
30、窗体上有一个名为Command1的命令按钮,并有如下程序:
PrivateSubCommand1_Click()
Dima(10),x%
Fork=1To10
a(k)=Int(Rnd*90+10)
x=x+a(k)Mod2
Nextk
Printx
EndSub
程序运行后,单击命令按钮,输出结果是( )。
A)10个数中奇数的个数 B)10个数中偶数的个数
C)10个数中奇数的累加和 D)10个数中偶数的累加和
31、窗体上有一个名为Command1的命令按钮和一个名为Timed的计时器,并有下面的事件过程:
PrivateSubCommand1_Click()
Timer1.Enabled=True
EndSub
PrivateSubForm_Load()
Timer1.Interval=10
Timed.Enabled=False
EndSub
PrivateSubTimer1_Timer()
Command1.Left=Command1.Left+10
EndSub
程序运行时,单击命令按钮,则产生的结果是( )。
A)命令按钮每10秒向左移动一次 B)命令按钮每10秒向右移动一次
C)命令按钮每10毫秒向左移动一次 D)命令按钮每10毫秒向右移动一次
32、设窗体上有一个名为List1的列表框,并编写下面的事件过程:
PrivateSubList1_Click()
DimchAsString
ch=List1.List(List1.ListIndex)
List1.RemoveItemList1.ListIndex
List1.AddItemch
EndSub
程序运行时,单击一个列表项,则产生的结果是( )。
A)该列表项被移到列表的最前面 B)该列表项被删除
C)该列表项被移到列表的最后面 D)该列表项被删除后又在原位置插入
33、窗体上有一个名为Command1的命令按钮,并有如下程序:
PrivateSubCommand1_Click()
DimaAsInteger,bAsInteger
a=8
b=12
Printfun(a,b);a;b
EndSub
PrivateFunctionFun(ByValaAsInteger,bAsInteger)AsInteger
a=aMod5
b=b\5
Fun=a
EndFunction
程序运行时,单击命令按钮,则输出结果是( )。
A)332 B)382 C)8812 D)3812
34、为了从当前文件夹中读入文件File1.txt,某人编写了下面的程序:
PrivateSubCommand1_C1ick()
Open"File1.txt"ForOutputAs#20
DoWhileNotEOF(20)
LineInput#20,ch$
Printch
Loop
Close#20
EndSub
程序调试时,发现存错误,下面的修改方案中正确的是( )。
A)在Open语句中的文件名前添加路径 B)把程序中各处的“20”改为“1”
C)把Primch语句改为Print#20,ch D)把Open语句中的Output改为Input
35、以下程序运行后的窗体如图所示。
其中组合框的名称是Combo1,已有列表框如图所示;命令按钮的名称是Command1。
PrivateSubCommand1_Click()
IfNotCheck(Combo1.Text)Then
MsgBox("输入错误")
ExitSub
EndIf
Fork=0ToCombo1.ListCount-1
IfCombo1.Text=Combo1.List(k)Then
MsgBox("添加项目失败")
ExitSub
EndIf
Nextk
Combo1.AddItemCombo1.Text
MsgBox("添加项目成功")
EndSub
PrivateFunctionCheck(chAsString)AsBoolean
n=Len(ch)
Fork=1Ton
c$=UCase(Mid(ch,k,1))
Ifc<"A"Orc>"Z"Then
Check=False
ExitFunction
EndIf
Nextk
Check=True
EndFunction
程序运行时。
如果在组合框的编辑区中输入“Java”,则单击命令按钮后产生的结果是( )。
A)显示“输入错误” B)显示“添加项目失败”
C)显示“添加项目成功” D)没有任何显示
二、填空题
36、有序线性表能进行二分查找的前提是该线性表必须是______存储的。
37、一颗二叉树的中序遍历结果为DBEAFC,前序遍历结果为ABDECF,则后序遍历结果为______。
38、对软件设计的最小单位(模块或程序单元)进行的测试通常称为______测试。
39、实体完整性约束要求关系数据库中元组的______属性值不能为空。
40、在关系A(S,SN,D)和关系B(D,CN,NM)中,A的主关键字是S,B的主关键字是D,则称______是关系A的外码。
41、在窗体上有1个名称为Command1的命令按钮,并有如下事件过程和函数过程:
PrivateSubCommand1_Click()
DimpAsInteger
p=m
(1)+m
(2)+m(3)
Printp
EndSub
PrivateFunctionm(nAsInteger)AsInteger
StaticsAsInteger
Fork=1Ton
s=s+1
Next
m=s
EndFunction
运行程序,单击命令按钮Command1后的输出结果为______。
42、在窗体上画1个名称为Command1的命令按钮,然后编写如下程序:
PrivateSubCommand1_Click()
DimmAsInteger,xAsInteger
DimflagAsBoolean
flag=False
n=Val(InputBox("请输入任意1个正整数"))
DoWhileNotflag
a=2
flag= (7)
DoWhileflagAnda<=Int(Sqr(n))
Ifn/a=n\aThen
flag=False
Else
(8)
EndIf
Loop
IfNotflagThenn=n+1
Loop
Print (9)
EndSub
43、以下程序的功能是:
先将随机产生的10个不同的整数放入数组a中,再将这10个数按升序方式输出。
请填空。
PrivateSubForm_Click()
Dima(10)AsInteger,iASInteger
Randomize
i=0
Do
num=Int(Rnd*90)+10
Forj=1Toi '检查新产生的随机数是否与以前的相同,相同的无效
Ifnum=a(j)Then
ExitFor
EndIf
Nextj
Ifj>iThen
i=i+1
a(i)= (10)
EndIf
LoopWhilei<10
Fori=1To9
Forj= (11) To10
Ifa(i)>a(j)Thentemp=a(i):
a(i)=a(j):
(12)
Nextj
Nexti
Fori=1To10
Printa(i)
Nexti
EndSub
44、窗体上已有名称分别为Dri、,e1、Dir1、Fite1的驱动器列表框、目录列表框和文件列表框,且有1个名称为Text1的文本框。
以下程序的功能是:
将指定位置中扩展名为“*.txt”的文件显示在File1中,如果双击File1中的某个文件,则在Text1中显示该文件的内容。
请填空。
PrivateSubForm_Load()
File1.Pattern= (13)
EndSub
PrivateSubDirt1_Change()
File1.Path=Dir1.Path
EndSub
PrivateSubDrive1_Change()
Dir1.Path=Drive1.Drive
EndSub
PrivateSubFile1_DblClick()
DimsAsString*1
IfRight(File1.Path,1)="\"Then
f_name=File1.Path+File1.FileName
Else
f_name=File1.Path+"\"+File1.FileName
EndIf
Openf_name (14) As#1
Text1.Text=""
DoWhile (15)
s=Input(1,#1)
Text1.Text=Tex1.Text+s
Loop
Close#1
EndSub
答案:
一、选择题
1、A
[解析]栈是先进后出的线性表,栈顶的元素最先被删除,栈底的元素最后被删除。
2、B
[解析]在数据结构中,树这类的的数据结构只有一个根结点,但它不是线性结构。
3、D
[解析]根据二叉树的性质,度为0的结点(即叶子结点)总是比度为2的结点多一个。
题目中的二叉树的叶子结点为1,因此度为2的结点的数目为0,因而这个二叉树的深度为7。
4、D
[解析]在软件开发过程中,需求分析阶段产生的主要文档是软件需求规格说明书。
5、B
[解析]结构化程序的基本结构有:
顺序结构、选择结构和循环结构,没有GOTO跳转结构。
6、A
[解析]软件设计是将软件需求转换为软件表示的过程;数据结构与数据库设计是软件设计的任务之一;PAD图,即问题分析图,是一种主要用于描述软件详细设计的图形工具。
7、C
[解析]负责数据库中查询操作的数据库语言是数据操纵语言。
8、D
[解析]一个教师可讲授多门课程,一门课程可由多个教师讲授,则实体教师和课程的联系是多对多的联系。
9、C
[解析]从关系R、S和T的结构可以得出关系T是由关系R、S经过除运算后得到的。
10、B
[解析]UInt表示的是无符号整数类,所以它的每个实例都是一个无符号整数,所以排除选项A)和选项C),选项D)是整数集合,所以也排除。
11、A
[解析]在VB集成环境中,窗体设计窗口简称为窗体(Form),是应用程序最终面向用户的窗口,它对应于应用程序的运行结果。
各种图形、图像、数据等都是通过窗体或窗体中的控件显示出来的;在工程资源管理器窗口中,含有建立一个应用程序所需要的文件清单,列出工程中所有模块的名称;属性窗口是用来设置对象(窗体或控件)的属性值;代码窗口用于编辑代码。
12、A
[解析]Load事件在一个窗体被装载时发生,常用于在程序启动时对属性和变量进行初始化,该事件在显示出窗体时已经执行完成,其余的事件均要在窗体显示出来后经过某种动作触发。
13、C
[解析]BackStyle属性用于指出Shape或Labe1控件的背景
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 二级VISUAL BASIC真题 二级 VISUAL BASIC