2009年3月二级VB语言笔试真题及答

1、2009年3月二级VB语言笔试真题及答案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.软件按功能可以分为:应用软件、系统软件和支撑软件。下列属于应用软件的是A)编译程序 B)操作系统 C)教务管理系统 D)汇编程序6.

2、下面叙述中错误的是A)软件测试的目的是发现错误并改正错误B)对被调试程序进行错误定位是程序调试的必要步骤C)程序调试也成为DebugD)软件测试应严格执行测试计划，排除测试的随意性7.耦合性和内聚性是对模块独立性度量的两个标准。下列叙述中正确的是A)提高耦合性降低内聚性有利于提高模块的独立性B)降低耦合性提高内聚性有利于提高模块的独立性C)耦合性是指一个模块内部各个元素间彼此结合的紧密程度D)内聚性是指模块间互相连接的紧密程度8.数据库应用系统中的核心问题是A)数据库设计 B)数据库系统设计 C)数据库维护 D)数据库管理员培训9.有两个关系R,S如下： 由关系R通过运算得到关系S,则所使用的

3、运算为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)VisualBasicvisualbasic C)the=there D)IntegerInt13.执行以下程序段a$=Visual Basic Programmingb$=C+C$=UCase

4、(Left$(a$,7) & b$ & Right$(a$,12)后,变量C$的值为A)Visual BASIC Programming B)VISUAL C+ ProgrammingC)Visual C+ Programming D)VISUAL BASIC Programming14.下列叙述中正确的是A)MsgBox语句的返回值是一个整数B)执行MsgBox语句并出现信息框后,不用关闭信息框即可执行其他操作C)MsgBox语句的第一个参数不能省略D)如果省略MsgBox语句的第三个参数(Title),则信息框的标题为空15.在窗体上画一个文本框(名称为Text1)和一个标签(名称为Lab

5、el1),程序运行后,在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数,以下可以实现上述操作的事件过程是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.Text End SubD)Private Sub Label1_Change() Label1.

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

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

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

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

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

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

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

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

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

15、r= strL=Len(xStr) i=strL/2 DoWhilei 【7】 ThenImage1.Left = 【8】 - 100End IfEnd Sub(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.Text ThenCom

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

17、nput#1,chascii=toascii(【12】)PrintasciiWendClose#1EndSubPrivateFunctiontoascii(mystr$)AsIntegern=0Fork=1To【13】n=n+Asc(Mid(mystr,k,1) Nextktoascii=nEndFunction(9)本程序实现文本加密。先给定序列:a1,a2,.,an,它们的取值范围是1n,而且互不相同。加密算法是:把原文本中第k个字符放到加密后文本的第ak个位置处。若原文本长度大于n，则只对前面n个字符加密,后面的字符不变；若原文本长度小于n，则在后面补字符*使文本长度为n后再加密。例如：

18、若给定序列a1,a2,.a7分别为2,5,3,7,6,1,4 当文本为“PROGRAM时，加密后的文本为APOMRRG 当文本为THANK时，加密后的文本为*TA*HKN下面的过程code实现这一算法。其中参数数组a()中存放给定序列(个数与数组a的元素个数相等)a1,a2,a3.的值，要加密的文本放在参数变量mystr中，过程执行完毕，加密后的文本仍然放在变量mystr中。请填空。OptionBase1PrivateSubcode(a()AsInteger,mystrAsString) DimchAsString,c1AsString n=UBound(a)-Len(mystr) Ifn0Then mystr=mystr&Str