全国计算机等级考试二级Visual Basic笔试.docx
- 文档编号:12321741
- 上传时间:2023-04-18
- 格式:DOCX
- 页数:18
- 大小:21.15KB
全国计算机等级考试二级Visual Basic笔试.docx
《全国计算机等级考试二级Visual Basic笔试.docx》由会员分享,可在线阅读,更多相关《全国计算机等级考试二级Visual Basic笔试.docx(18页珍藏版)》请在冰豆网上搜索。
全国计算机等级考试二级VisualBasic笔试
2005年4月全国计算机等级考试二级VisualBasic笔试(含参考答案)
一、选择题(
(1)~(35)每小题2分,共70分)
下列各题A)、B)、C)、D)四个选项中,只有一个选项是正确的,请将正确选项涂写在答题卡相应位置上,答在试卷上不得分。
(1)数据的存储结构是指______。
A)存储在外存中的数据B)数据所占的存储空间量
C)数据在计算机中的顺序存储方式D)数据的逻辑结构在计算机中的表示
(2)下列关于栈的描述中错误的是______。
A)栈是先进后出的线性表B)栈只能顺序存储
C)栈具有记忆作用D)对栈的插入与删除操作中,不需要改变栈底指针
(3)对于长度为n的线性表,在最坏情况下,下列各排序法所对应的比较次数中正确的是______。
A)冒泡排序为n/2B)冒泡排序为nC)快速排序为nD)快速排序为n(n-1)/2
(4)对长度为n的线性表进行顺序查找,在最坏情况下所需要的比较次数为______。
A)log2nB)n/2C)nD)n+1
(5)下列对于线性链表的描述中正确的是______。
A)存储空间不一定是连续,且各元素的存储顺序是任意的
B)存储空间不一定是连续,且前件元素一定存储在后件元素的前面
C)存储空间必须连续,且前件元素一定存储在后件元素的前面
D)存储空间必须连续,且各元素的存储顺序是任意的
(6)下列对于软件测试的描述中正确的是______。
A)软件测试的目的是证明程序是否正确B)软件测试的目的是使程序运行结果正确
C)软件测试的目的是尽可能多地发现程序中的错误D)软件测试的目的是使程序符合结构化原则
(7)为了使模块尽可能独立,要求______。
A)模块的内聚程度要尽量高,且各模块间的耦合程度要尽量强
B)模块的内聚程度要尽量高,且各模块间的耦合程度要尽量弱
C)模块的内聚程度要尽量低,且各模块间的耦合程度要尽量弱
D)模块的内聚程度要尽量低,且各模块间的耦合程度要尽量强
(8)下列描述中正确的是______。
A)程序就是软件B)软件开发不受计算机系统的限制
C)软件既是逻辑实体,又是物理实体D)软件是程序、数据与相关文档的集合
(9)数据独立性是数据库技术的重要特点之一。
所谓数据独立性是指______。
A)数据与程序独立存放B)不同的数据被存放在不同的文件中
C)不同的数据只能被对应的应用程序所使用D)以上三种说法都不对
(10)用树形结构表示实体之间联系的模型是______。
A)关系模型B)网状模型C)层次模型D)以上三个都是
(11)在窗体(名称为Form1)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写一个事件过程。
程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。
以下能实现上述操作的事件过程是______。
A)PrivateSubText1_Change()
Command1.Caption="计算机等级考试"
EndSub
B)PrivateSubCommand1_Click()
Caption="计算机等级考试"
EndSub
C)PrivateSubForm1_Click()
Text1.Caption="计算机等级考试"
EndSub
D)PrivateSubCommand1_Click()
Text1.Text="计算机等级考试"
EndSub
(12)设a=5,b=4,c=3,d=2下列表达式的值是______。
3>2*bOra=cAndb<>cOrc>d
A)1B)TrueC)FalseD)2
(13)设a="MicrosoftVisualBasic",则以下使变量b的值为“VisualBasic”的语句是______。
A)b=Left(a,10)B)b=Mid(a,10)C)b=Right(a,10)D)b=Mid(a,11,10)
(14)假定有如下的窗体事件过程:
Private Sub Form_Click()
a$ = "Microsoft Visual Basic"
b$ = Right(a$, 5)
c$ = Mid(a$, 1, 9)
MsgBox a$, 34, b$, c$, 5
End Sub
程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是______。
A)MicrosoftVisualB)MicrosoftC)BasicD)5
(15)设a="a",b="b",c="c",d="d",执行语句x=IIf((a A)"a"B)"b"C)"B"D)"A" (16)为了使命令按钮(名称为Command1)右移200,应使用的语句是______。 A)Command1.Move-200B)Command1.Move200 C)Command1.Left=Command1.Left+200D)Command1.Left=Command1.Left-200 (17)在窗体上画一个文本框,然后编写如下事件过程: PrivateSubForm_Click() x=InputBox("请输入一个整数") Printx+Text1.Text EndSub 程序运行时,在文本框中输入456,然后单击窗体,在输入对话框中输入123,单击“确定”按钮后,在窗体上显示的内容为______。 A)123B)456C)479D)123456 (18)在窗体上画一个文本框和一个计时器控件,名称分别为Text1和Timer1,在属性窗口中把计时器的Interval属性设置为1000,Enabled属性设置为False。 程序运行后,如果单击命令按钮,则每隔一秒钟在文本框中显示一次当前的时间。 以下是实现上述操作的程序: PrivateSubCommand1_Click() Timer1.______ EndSub PrivateSubTimer1_Timer() Text1.Text=Time EndSub 在下划线处应填入的内容是______。 A)Enabled=TrueB)Enabled=FalseC)Visible=TrueD)Visible=False (19)假定在图片框Picture1中装入了一个图形,为了清除该图形(不删除图片框),应采用的正确方法是______。 A)选择图片框,然后按Del键B)执行语句Picture1.Picture=LoadPicture("") C)执行语句Picture1.Picture=""D)选择图片框,在属性窗口中选择Picture属性条,然后按回车键 (20)在窗体上画一个名称为List1的列表框,一个名称为Label1的标签,列表框中显示若干个项目。 当单击列表框中的某个项目时,在标签中显示被选中项目的名称。 下列能正确实现上述操作的程序是: _____。 A)PrivateSubList1_Click() Label1.Caption=List1.ListIndex EndSub B)PrivateSubList1_Click() Label1.Name=List1.ListIndex EndSub C)PrivateSubList1_Click() Label1.Name=List1.Text EndSub D)PrivateSubList1_Click() Label1.Caption=List1.Text EndSub (21)在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: PrivateSubCommand1_Click() DimiAsInteger,xAsInteger Fori=1To6 Ifi=1Thenx=i Ifi<=4Then x=x+1 Else x=x+2 EndIf Nexti Printx EndSub 程序运行后,单击命令按钮,其输出结果为______。 A)9B)6C)12D)15 (22)在窗体上画一个名称为Command1命令按钮,然后编写如下事件过程: PrivateSubCommand1_Click() c="ABCD" Forn=1To4 Print______ Next EndSub 程序运行后,单击命令按钮,要求在窗体上显示如下内容 D CD BCD ABCD 则在______处填入的内容为。 A)Left(c,n)B)Right(c,n)C)Mid(c,n,1)D)Mid(c,n,n) (23)执行以下程序段后,x的值为______。 DimiAsInteger,xAsInteger x=0 Fori=20To1Step-2 x=x+i\5 Next Printx A)16B)17C)18D)19 (24)在VisualBasic工程中,可以作为“启动对象”的程序是______。 A)任何窗体或标准模块B)任何窗体或过程 C)SubMain过程或其他任何模块D)SubMain过程或任何窗体 (25)假定建立了一个名为Command1的命令按钮数组,则以下说法中错误的是______。 A)数组中每个命令按钮的名称(Name属性)均为Command1 B)数组中每个命令按钮的标题(Caption属性)都一样 C)数组中所有命令按钮可以使用同一个事件过程 D)用名称Command1(下标)可以访问数组中的每个命令按钮 (26)把窗体的KeyPreview属性设置为True,然后编写如下事件过程 PrivateSubForm_KeyPress(KeyAsciiAsInteger) DimchAsString ch=Chr(KeyAscii) KeyAscii=Asc(UCase(ch)) PrintChr(KeyAscii+2) EndSub 程序运行后,按键盘上的“A”键,则在窗体上显示的内容是______。 A)AB)BC)CD)D (27)在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序: PrivateSubCommand1_Click() a=InputBox("请输入日期(1~31)") t=”旅游景点: ”_ &IIf(a>0Anda<=10,"长城","")_ &IIf(a>10Anda<=20,"故宫","")_ &IIf(a>20Anda<=31,"颐和园","") Text1.Text=t EndSub 程序运行后,如果从键盘上输入16,则在文本框显示的内容是______。 A)旅游景点: 长城故宫B)旅游景点: 长城颐和园 C)旅游景点: 颐和园D)旅游景点: 故宫 (28)在窗体上画一个名称为Label1的标签,然后编写如下事件过程: PrivateSubForm_Click() Dimarr(10,10)AsInteger DimiAsInteger,jAsInteger Fori=2To4 Forj=2To4 arr(i,j)=i*j Nextj Nexti Label1.Caption=Str(arr(2,2)+arr(3,3)) EndSub 程序运行后,单击窗体,在标签中显示的内容是______。 A)12B)13C)14D)15 (29)在窗体上画一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程: PrivateFunctionfun(ByValmAsInteger) IfmMod2=0Then fun=2 Else fun=1 EndIf EndFunction PrivateSubCommand1_Click() DimiAsInteger,sAsInteger s=0 Fori=1To5 s=s+fun(i) Next Prints EndSub 程序运行后,单击命令按钮,在窗体上显示的是______。 A)6B)7C)8D)9 (30)阅读程序: OptionBase1 Dimarr()AsInteger PrivateSubForm_Click() DimiAsInteger,jAsInteger ReDimarr(3,2) Fori=1To3 Forj=1To2 arr(i,j)=i*2+j Nextj Nexti ReDimPreservearr(3,4) Forj=3To4 arr(3,j)=j+9 Nextj Printarr(3,2)+arr(3,4) EndSub 程序运行后,单击窗体,输入结果为______。 A)21B)13C)8D)25 (31)在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: OptionBase1 PrivateSubCommand1_Click() DimcAsInteger,dAsInteger d=0 c=6 x=Array(2,4,6,8,10,12) Fori=1To6 Ifx(i)>cThen d=d+x(i) c=x(i) Else d=d-c EndIf Next Printd EndSub 程序运行后,如果单击命令按钮,则在窗体上输出的内容为______。 A)10B)16C)12D)20 (32)设有如下程序: PrivateSubCommand1_Click() DimcAsInteger,dAsInteger c=4 d=InputBox("请输入一个整数") DoWhiled>0 Ifd>cThen c=c+1 EndIf d=InputBox("请输入一个整数") Loop Printc+d EndSub 程序运行后,单击命令按钮,如果在输入对话框中依次输入1、2、3、4、5、6、7、8、9、0,则输出结果是______。 A)12B)11C)10D)9 (33)在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,在文本框中输入以下字符串: MicrosoftVisualBasicProgramming 然后编写如下事件过程: PrivateSubCommand1_Click() Open"d: \temp\outf.txt"ForOutputAs#1 Fori=1ToLen(Text1.Text) c=Mid(Text1.Text,i,1) Ifc>="A"Andc<="Z"Then Print#1,LCase(c) EndIf Nexti Close EndSub 程序运行后,单击命令按钮,文件outf.txt中的内容是______。 A)MVBPB)mvbpC)MD)m Vv Bb Pp (34)在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: DimSWAsBoolean Functionfunc(XAsInteger)AsInteger IfX<20Then Y=X Else Y=20+X EndIf func=Y EndFunction PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle) SW=False EndSub PrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle) SW=True EndSub PrivateSubCommand1_Click() DimintNumAsInteger intNum=InputBox("") IfSWThen Printfunc(intNum) EndIf EndSub 程序运行后,单击命令按钮,将显示一个输入对话框,如果在输入对话框中输入25,则程序的执行结果为______。 A)输出0B)输出25C)输出45D)无任何输出 (35)设有如下通用过程: PublicSubFun(a()AsInteger,xAsInteger) Fori=1To5 x=x+a(i) Next EndSub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。 然后编写如下的事件过程: PrivateSubCommand1_Click() Dimarr(5)AsInteger,nAsInteger Fori=1To5 arr(i)=i+i Next Funarr,n Text1.Text=Str(n) EndSub 程序运行后,单击命令按钮,则在文本框中显示的内容是______。 A)30B)25C)20D)15 二、填空题(每空2分,共30分) 请将每空的正确答案写在答题卡【1】~【15】序号的横线上,答在试卷上不得分。 (1)某二叉树中度为2的结点有18个,则该二叉树中有【1】个叶子结点。 (2)在面向对象方法中,类的实例称为【2】。 (3)诊断和改正程序中错误的工作通常称为【3】。 (4)在关系数据库中,把数据表示成二维表,每一个二维表称为【4】。 (5)问题处理方案的正确而完整的描述称为【5】。 (6)以下语句输出结果是【6】。 PrintInt(12345.6789*100+0.5)/100 (7)在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程: PrivateSubForm_Click() Text1.Text="VB程序设计" EndSub PrivateSubText1_Change() Picture1.Print"VBProgramming" EndSub 程序运行后,单击窗体,则在文本框中显示的内容是【7】,而在图片框中显示的内容是【8】。 (8)阅读下面的程序: PrivateSubForm_Click() DimCheckAsBoolean,CounterAsInteger Check=True Counter=5 Do DoWhileCounter<20 Counter=Counter+1 IfCounter=10Then Check=False ExitDo EndIf Loop LoopUntilCheck=False PrintCounter EndSub 程序运行后,单击窗体,输出结果为【9】。 (9)设有如下程序: PrivateSubForm_Click() DimnAsInteger,sAsInteger n=8 s=0 Do s=s+n n=n-1 LoopWhilen>0 Prints EndSub 以上程序的功能是【10】。 程序运行后,单击窗体,输出结果为【11】。 (10)设有如下程序: OptionBase1 PrivateSubCommand1_Click() Dimarr1 DimMinAsInteger,iAsInteger arr1=Array(12,435,76,-24,78,54,866,43) Min=【12】 Fori=2To8 Ifarr1(i) Next Print"最小值是: ";Min EndSub 以上程序的功能是: 用Array函数建立一个含有8个元素的数组,然后查找并输出该数组中各元素的最小值。 请填空。 (11)在名称为Form1的窗体上画一个文本框,其名称为Text1,在属性窗口中把该文本框的MultiLine属性设置为True,然后编写如下的事件过程: Private Sub Form_Click() Open "d: \test\smtext1.txt" For Input As #1 Do While Not 【14】 Line Input #1, as
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 全国计算机等级考试二级Visual Basic笔试 全国 计算机等级考试 二级 Visual Basic 笔试