VB试题加答案

1、2009年3月计算机等级考试二级VB笔试试题及答案一、选择题（每题2分，共计70分）(1)下列叙述中正确的是 A)栈是先进先出的线性表B)队列是先进后出的线性表C)循环队列是非线性结构D)有序线性表即可以采用顺序存储结构,也可以采用链式存储结构(2)支持子程序调用的数据结构是A)栈 B)树 C)队列 D)二叉树(3)某二叉树有5个读为2的结点,则该二叉树中的叶子结点数是A)10 B)8 C)6 D)4(4)下列排序方法中,最坏情况下比较次数最少的是A)冒泡排序 B)简单选择排序 C)直接插入排序 D)堆排序(5)软件按功能可以分为:应用软件、系统软件和支撑软件(或工具软件)。下列属于应用软件的

2、是A)编译程序 B)操作系统 C)教务管理系统 D)汇编程序(6)下面叙述中错误的是A)软件测试的目的是发现错误并改正错误B)对被调试程序进行错误定位是程序调试的必要步骤C)程序调试也成为DebugD)软件测试应严格执行测试计划，排除测试的随意性(7)耦合性和内聚性是对模块独立性度量的两个标准。下列叙述中正确的是A)提高耦合性降低内聚性有利于提高模块的独立性B)降低耦合性提高内聚性有利于提高模块的独立性C)耦合性是指一个模块内部各个元素间彼此结合的紧密程度D)内聚性是指模块间互相连接的紧密程度(8)数据库应用系统中的核心问题是A)数据库设计 B)数据库系统设计 C)数据库维护 D)数据库管理员

3、培训(9)有两个关系R,S如下：由关系R通过运算得到关系S,则所使用的运算为A)选择 B)投影 C)插入 D)连接(10)将E-R图转换为关系模式时,实体和联系都可以表示为A)属性 B)键 C)关系 D)域(11)执行语句 Dim X,Y As Integer 后,A)X和Y均被定义为整型变量B)X和Y均被定义为变体类型变量C)X被定义为整型变量,Y被定义为变体变量D)X被定义为变体类型变量,Y被定义为整型变量(12)以下关系表达式中，其值为True的是A)XYZXYz B)VisualBasicvisualbasicC)the=there D)IntegerInt(13)执行以下程序段a$=

4、Visual Basic Programmingb$=C+C$=UCase(Left$(a$,7) & b$ & Right$(a$,12)后,变量C$的值为A)Visual BASIC Programming B)VISUAL C+ ProgrammingC)Visual C+ Programming D)VISUAL BASIC Programming(14)下列叙述中正确的是A)MsgBox语句的返回值是一个整数B)执行MsgBox语句并出现信息框后,不用关闭信息框即可执行其他操作C)MsgBox语句的第一个参数不能省略D)如果省略MsgBox语句的第三个参数(Title),则信息框的标

5、题为空(15)在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后,在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数,以下可以实现上述操作的事件过程是A)Private Sub Text1_Change()Label1.Caption=str(Len(Text1.Text)End SubB)Private Sub Text1_Click()Label1.Caption=str(Len(Text1.Text)End SubC)Private Sub Text1_Change()Label1.Caption=Text1.TextEnd SubD)Pr

6、ivate Sub Label1_Change()Label1.Caption=str(Len(Text1.Text)End Sub(16)在窗体上画两个单选按钮(名称分别为Option1,Option2,标题分别为宋体和黑体),1个复选框(名称为Check1,标题为粗体)和1个文本框(名称为Text1,Text属性为改变文字字体)，窗体外观如图所示。程序运行后，要求“宋体”单选按钮和“粗体”复选框被选中，则以下能够实现上述操作的语句序列是A)Option1.Value=FalseCheck1.Value=TrueB)Option1.Value=TrueCheck1.Value=0C)Opti

7、on2.Value=FalseCheck1.Value=2D)Option1.Value=TrueCheck1.Value=1(17)在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程:PrivateSubCommand1_Click()c=1234c1=Trim(Str(c)Fori=1To4Print_NextEndSub程序运行后,单击命令按钮，要求在窗体上显示如下内容：1121231234则在横线处应填入的内容为A)Right(c1,i)B)Left(c1,i)C)Mid(c1,i,1)D)Mid(c1,i,1)(18)假定有一下程序段Fori=1To3Forj=5T

8、o1Step-1Printi*jNextjNexti则语句Print i*j 的执行次数是A)15 B)16 C)17 D)18(19)在窗体上画两个文本框（名称分别为Text1和Text2）和一个命令按钮（名称为Command1），然后编写如下事件过程：PrivateSubCommand1_Click()x=0DoWhilex50x=(x+2)*(x+3)n=n+1LoopText1.Text=Str(n)Text2.Text=Str(x)EndSub程序运行后，单击命令按钮，在两个文本框中显示的值分别为A)1和0 B)2和72 C)3和50 D)4和168(20)阅读程序：PrivateS

9、ubCommand1_Click()a=0Forj=1To15a=a+jMod3NextjPrintaEndSub程序运行后，单击窗体，输出结果是A)105 B)1 C)120 D)15(21)以下说法中正确的是A)当焦点在某个控件上时，按下一个字母键，就会执行该控件的KeyPress事件过程B)因为窗体不接受焦点，所以窗体不存在自己的KeyPress事件过程C)若按下的键相同，KeyPress事件过程中的KeyAscii参数与KeyDown事件过程中的KeyCode参数的值也相同D)在KeyPress事件过程中，KeyAscii参数可以省略(22)语句Dim a(-3 To 4,3 To 6

10、) As Integer 定义的数组的元素个数是A)18 B)28 C)21 D)32 (23)在窗体上画一个命令按钮，其名称为Command1，然后编写如下代码：OptionBase1PrivateSubCommand1_Click()Dimaa=Array(1,2,3,4)j=1Fori=4To1Step-1s=s+a(i)*jj=j*10NextiPrintsEndSub程序运行后，单击命令按钮，其输出结果是A)4321 B)1234 C)34 D)12(24)假定通过复制，粘贴操作建立了一个命令按钮数组Command1，以下说法中错误的是A)数组中每个命令按钮的名称(Name属性)均为

11、Command1B)若未做修改,数组中每个命令按钮的大小都一样C)数组中各个命令按钮使用同一个Click事件过程D)数组中每个命令按钮的Index属性值都相同(25)在窗体上画一个命令按钮，名称为Command1,然后编写如下代码：OptionBase0PrivateSubCommand1_Click()DimA1(4)AsInteger,A2(4)AsIntegerFork=0To2A1(k+1)=InputBox(请输入一个整数)A2(3-k)=A1(k+1)NextkPrintA2(k)EndSub程序运行后,单击命令按钮，在输入对话框中依次输入2、4、6则输出结果为A)0 B)1 C)

12、2 D)3(26)以下关于函数过程的叙述中，正确的是A)函数过程形参的类型与函数返回值的类型没有关系B)在函数过程中，过程的返回值可以有多个C)当数组作为函数过程的参数是，既能以传值方式传递，也能以传址方式传递D)如果不指明函数过程参数的类型，则该参数没有数据类型(27)在窗体上画两个标签按钮和一个命令按钮，其名称分别为Label1、Label2和Command1，然后编写如下程序：PrivateSubfunc(LAsLabel)L.Caption=1234EndSubPrivateSubForm_Load()Label1.Caption=ABCDELabel2.Caption=10EndSu

13、bPrivateSubCommand1_Click()a=Val(Label2.Caption)Callfunc(Label1)Label2.Caption=aEndSub程序运行后，单击命令按钮，则在两个标签中显示的内容分别为A)ABCD和10 B)1234和100 C)ABCD和100 D)1234和10(28)在窗体上画一个命令按钮(名称为Command1)，并编写如下代码:Functionfun1(ByValaAsInteger,bAsInteger)AsIntegerDimtAsIntegert=a-bb=t+afun1=t+bEndFunctionPrivateSubCommand

14、1_Click()DimxAsIntegerx=10Printfun1(fun1(x,(fun1(x,x-1),x-1)EndSub程序运行后，单击命令按钮，输出结果是A)10 B)0 C)11 D)21(29)以下关于过程及过程参数的描述中，错误的是A)过程的参数可以是控件名称B)调用过程时使用的实参的个数应与过程形参的个数相同C)只有函数过程能够将过程中处理的信息返回到调用程序中D)窗体可以作为过程的参数(30)设有如下通用过程PublicFunctionFun(xStrAsString)AsStringDimtStrAsString,strLAsIntegertStr=strL=Len(

15、xStr)i=strL/2DoWhilei 【7】 ThenImage1.Left = 【8】 - 100End IfEnd Sub7.上题【7】的答案是8.上一题【8】的答案是9. (7)设窗体上有一个名称为Combo1的组合框,并有以下程序：Private Sub Combo1_KeyPress(KeyAscii As Integer)If 【9】 = 13 ThenFor k = 0 To Combo1.ListCount - 1If Combo1.Text = Combo1.List(k) ThenCombo1.Text = Exit ForEnd IfNext kIf Combo1.

16、Text ThenCombo1.AddItem 【10】End IfEnd IfEnd Sub程序的功能是：在组合框的编辑区中输入文本后按回车键，则检查列表中有无与此文本相同的项目，若有，则把编辑区中的文本删除，否则把编辑区中的文本添加到列表的尾部。请填空。10. 上一题【10】的答案是11. (8)在当前目录下有一个名为myfile.txt的文本文件,其中有若干行文本。下面程序的功能是读入此文件中的所有文本行，按行计算每行字符的ASCII码之和，并显示在窗体上。请填空PrivateSubCommand1_Click()Dimch$,asciiAsIntegerOpenmyfile.txtFo

17、r【11】As#1WhileNotEOF(1)LineInput#1,chascii=toascii(【12】)PrintasciiWendClose#1EndSubPrivateFunctiontoascii(mystr$)AsIntegern=0Fork=1To【13】n=n+Asc(Mid(mystr,k,1)Nextktoascii=nEndFunction12. 上一题【12】的答案是13. 上一题【13】的答案是14. (9)本程序实现文本加密。先给定序列:a1,a2,.,an,它们的取值范围是1n,而且互不相同。加密算法是:把原文本中第k个字符放到加密后文本的第ak个位置处。若原文本长度大于n，则只对前面n个字符加密,后面的字符不变；若原文本长度小于n，则在后面补字符*使文本长度为n后再加密。例如：若给定序列a1,a2,.a7分别为2,5,3,7,6,1,4当文本为“PROGRAM时，加密后的文本为APOMRRG当文本为THANK时，加密后的文本为*TA*HKN下面的过程code实现这一算法。其中参数数组a()中存放给定序列(个数与数组a的元素个数相等)a1,a2,a3.的值，要加密