历年计算机二级vb笔试真题及公共基础知识

历年计算机二级vb笔试真题及公共基础知识全国计算机等级考试二级笔试试卷历年计算机二级笔试试题汇编全国计算机考试二级笔试试卷 Visual Basic语言程序设计（考试时间90分，满分100分） 2005年4月一、选择题（每小题2分，共70分）下列各题A）、B）、C）、D）四个选项中，只有一个选项是正确的。请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。（1）数据的存储结构是指D A）存储在外存中的数据 B）数据所占的存储空间量 C）数据在计算机中的顺序存储方式 D）数据的逻辑结构在计算机中的表示（2）下列关于栈的描述中错误的是B A）...

全国计算机等级考试二级笔试试卷历年计算机二级笔试试题汇编全国计算机考试二级笔试试卷 Visual Basic语言程序设计（考试时间90分，满分100分） 2005年4月一、选择题（每小题2分，共70分）下列各题A）、B）、C）、D）四个选项中，只有一个选项是正确的。请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。（1）数据的存储结构是指D A）存储在外存中的数据 B）数据所占的存储空间量 C）数据在计算机中的顺序存储方式 D）数据的逻辑结构在计算机中的表示（2）下列关于栈的描述中错误的是B A）栈是先进后出的线性表 B）栈只能顺序存储 C）栈具有记忆作用 D）对栈的插入与删除操作中，不需要改变栈底指针（3）对于长度位n的线性表，在最坏情况下，下列各排序法所对应的比较次数中正确的是D A）冒泡排序为n/2 B）冒泡排序为 n C）快速排序为 n D）快速排序为 n(n-1)/2 （4）对长度为n的线性表进行顺序查找，在最坏情况下所需要的比较次数为C A）log2n B）n/2 C）n D）n+1 （5）下列对于线性链表的描述中正确的是A A）存储空间不一定是连续，且各元素的存储顺序是任意的 B）存储空间不一定是连续，且前件元素一定存储在后件元素的前面 C）存储空间必须连续，且前件元素一定存储在后件元素的前面 D）存储空间必须连续，且各元素的存储顺序是任意的（6）下列对于软件测试的描述中正确的是C A）软件测试的目的是证明程序是否正确 B）软件测试的目的是使程序运行结果正确 C）软件测试的目的是尽可能多地发现程序中的错误 D）软件测试的目的是使程序符合结构化原则（7）为了使模块尽可能独立，要求B A）模块的内聚程度要尽量高，且各模块间的耦合程度要尽量强 B）模块的内聚程度要尽量高，且各模块间的耦合程度要尽量弱 C）模块的内聚程度要尽量低，且各模块间的耦合程度要尽量弱 D）模块的内聚程度要尽量低，且各模块间的耦合程度要尽量强（8）下列描述中正确的是D A）程序就是软件 B）软件开发不受计算机系统的限制 C）软件既是逻辑实体，又是物理实体 D）软件是程序、数据与相关文档的集合（9）数据独立性是数据库技术的重要特点之一。所谓数据独立性是指D A）数据与程序独立存放 B）不同的数据被存放在不同的文件中 C）不同的数据只能被对应的应用程序所使用 D）以上三种说法都不对（10）用树形结构表示实体之间联系的模型是C A）关系模型 B）网状模型 C）层次模型 D）以上三个都是（11）在窗体（名称为Form1）上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是A A）Private Sub Text1_Change () Command1.Caption="计算机等级考试" End Sub B）Private Sub Command1_Click () Caption="计算机等级考试" End Sub C）Private Sub Form1_Click () Text1.Text="计算机等级考试" End Sub D）Private Sub Command1_Click () Text1.Text="计算机等级考试" End Sub （12）设a=5，b=4，c=3，d=2，下列表达式的值是B 3>2*b Or a=c And b<>c Or c>d A）1 B）True C）Fasle D）2 （13）设a="MicrosoftVisualBasic"，则以下变量b的值为"VisualBasic"的语句是B A）b=Left(a,10) B）b=Mid(a,10) C）b=Right(a,10) D）b=Mid(a,11,10) （14）假定有如下的窗体事件代码：C 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）Microsoft Visual B）Microsoft C）Basic D）5 （15）设a="a"，b="b"，c="c"，d="d"，执行语句x=IIF((aD）, "A","B")后，x的值为D A）"a" B）"b" C）"B" D）"A" （16）为了使命令按钮（名称为Command1）右移200，应使用的语句是C A）Comand1.Move -200 B）Comand1.Move 200 C）Command1.Left=Command1.Left+200 D）Command1.Left=Command1.Left-200 （17）在窗体上画一个文本框，然后编写如下事件过程：D Private Sub Form_Click () x=InputBox(“请输入一个整数”) Print x+Text1.text End Sub 程序运行时，在文本框输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容为 A）123 B）456 C）579 D）123456 （18）在窗体上画一个文本框和一个计时器控件，名称分别为Text1和Timer1，在属性窗口中把计时器的Interval属性设置为1000，Enabled属性设置为False。程序运行后，如果单击命令按钮，则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操作的程序：A Private Sub Command1_Click () Timer1. End Sub Private Sub Timer1_Timer () Text1.Text=Time End Sub 在处应填入的内容是 A）Enabled=True B）Enabled=False C）Visible=True D）Visible=False （19）假定在图片框Picture1中装入一个图形，为了清除该图形（不删除图片框），应该用的正确方法是B A）选择图片框，然后按Del键 B）执行语句Picture1.Picture=LoadPicture (“”) C）执行语句Picture1.Picture=”” D）选择图片框，在属性窗口中选择Picture属性条，然后按回车键。（20）在窗体上画一个名称为List1的列表框，一个名称为Label1的标签，列表框中显示若干个项目。当单击列表框中的某个项目时，在标签中显示被选中项目的名称。下列能正确实现上述操作的程序是D A）Private Sub List1_Click () Label1.Caption=List1.ListIndex End Sub B）Private Sub List1_Click () Label1.Name=List1.ListIndex End Sub C）Private Sub List1_Click () Label1.Name=List1.Text End Sub D）Private Sub List1_Click () Label1.Caption=List1.Text End Sub （21）在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click () Dim i As Integer, x As Integer For i=1 To 6 If i=1 Then x=i If i<=4 Then x=x+1 Else x=x+2 End If Next i Print x End Sub 程序运行后，单击命令按钮，其输出结果为A A）9 B）6 C）12 D）15 （22）在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click () c=”ABCD” For n=1 To 4 Print Next End Sub 程序运行吼，单击命令按钮，要求在窗体上显示如下内容： D CD BCD ABCD 则在处应填入的内容为B A）Left(c,n) B）Right(c,n) C）Mid(c,n,1) D）Mid(c,n,n) （23）执行以下程序段 Dim x As Integer,i As Integer x=0 For i=20 To 1 Step -2 x=x+i\5 Next i 后，x的值为C A）16 B）17 C）18 D）19 （24）在Visual Bisic工程块中，可以作为“启动对象”的程序是D A）任何窗体或标准模块 B）任何窗体或过程 C）Sub Main过程或其他任何模块 D）Sub Main过程或任何窗体（25）假设建立了一个名为Command1的命令按钮数组，则以下说法中错误的是B A）数组中每个命令按钮的名称（Name属性）均为Command1 B）数组中每个命令按钮的标题（Caption属性）都一样 C）数组中所有命令按钮可以使用同一个事件过程 D）用名称Command1（下标）可以访问数组中的每个命令按钮（26）把窗体的KeyPreview属性设置为True，然后编写如下事件过程 Private Sub Form_KeyPress(KeyAscii As Integer) Dim ch As String Ch=Chr(KeyAscii) KeyAscii=Asc(UCase(ch)) Print Chr(KeyAscii+2) End Sub 程序运行后，按键盘上的“A”键，则在窗体上显示的内容是C A）A B）B C）C D）D （27）在窗体上画一个命令按钮和一个文本框，名称分别为Command1和Text1,然后编写如下程序： Private Sub Command1_Click() a=InputBox(“请输入日期（1～31）”) t=”旅游景点：”_ &IIf(a>0 And a<=10,”长城”，““)_ &IIf(a>10 And a<=20,”故宫”，““)_ &IIf(a>20 And a<=31,”颐和园”，““) Text1.Text=t End Sub 程序运行后，如果从键盘上输入16，则在文本框中显示的内容是D A）旅游景点：长城故宫 B）旅游景点：长城颐和园 C）旅游景点：颐和园 D）旅游景点：故宫（28）在窗体上画一个名称为Label1的标签，然后编写如下事件过程： Private Sub Form_Click() Dim arr(10,10)As Integer Dim i As Integer,j As Integer For i=2 To 4 For j=2 To 4 arr(i,j)=i*j Next j Next i Label1.Caption=Str(arr(2,2)+arr(3,3)) End Sub 程序运行后，单击窗体，在标签中显示的内容是B A）12 B）13 C）14 D）15 （29）在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程： Private Function fun(ByVal m As Integer) If m Mod 2=0 Then fun=2 Else fun=1 End If End Function Private Sub Command1_Click() Dim i As Integer,s As Integer s=0 For i=1 To 5 s=s+fun(i) Next Print s End Sub 程序运行后，单击命令按钮，在窗体上显示的是B A）6 B）7 C）8 D）9 （30）阅读程序： Option Base 1 Dim arr() As Integer Private Sub Form_Click() Dim i As Integer,j As Integer ReDim arr(3,2) For i=1 To 3 For j=1 To2 arr(i,j)=i*2+j Next j Next i ReDim Preserve arr(3,4) For j=3 To 4 arr(3,j)=j+9 Next j Print arr(3,2)+arr(3,4) End Sub 程序运行后，单击窗体，输出结果为A A）21 B）13 C）8 D）25 （31）在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() Dim c As Integer,d As Integer d=0 c=6 x=Array(2,4,6,8,10,12) For i=1 To 6 If x(i)>c Then d=d+x(i) c=x(i) Else d=d-c End If Next i Print d End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容诶C A）10 B）16 C）12 D）20 （32）设有如下程序 Private Sub Command1_Click() Dim c As Integer,d As Integer c=4 d=InputBox(“请输入一个整数”) Do While d>0 If d>c Then c=c+1 End If d=InputBox(“请输入一个整数”) loop Print c+d End Sub 程序运行后，单击命令按钮，如果在输入对话框中依次输入1、2、3、4、5、6、7、8、9、0，则输出结果是D A）12 B）11 C）10 D）9 （33）在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，在文本框中输入以下字符串： Microsoft Visual Basic Programming 然后编写如下事件过程： Private Sub Command1_Click() Open “d:\temp\outf.txt” For Output As # 1 For i=1 To Len(Text1.Text) c=Mid(Text1.Text,i,1) If c>=”A” And c<=”Z” Then Print # 1,LCase(C） End If Next i Close End Sub 程序运行后，单击命令按钮，文件outf.txt中的内容是D A）MVBP B）mvbp C）M D）m V v B b P p （34）在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Dim SW As Boolean Function func(X As Integer) As Integer If X<20 Then Y=X Else Y=20+X End If Func=Y End Function Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) SW=False End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single) SW=True End Sub Private Sub Command1_Click() Dim intNum As Integer intNum=InputBox(“”) If SW Then print func(intNum) End If End Sub 程序运行后，单击命令按钮，将显示一个输入对话框，如果在对话框中输入25，则程序的执行结果为D A）输出0 B）输出25 C）输出45 D）无任何输出（35）设有如下通用过程： Private Sub Fun(a() As Integer,x As Integer) For i=1 To 5 x=x+a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下的事件过程： Private Sub Command1_Click() Dim arr(5) As Integer,n As Integer For i=1 To 5 arr(i)=i+i Next Fun arr,n Text1.Text=Str(n) End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是A A）30 B）25 C）20 D）15 二填空题（每空2分，共30分）（1）某二叉树中度为2的结点有18个，则该二叉树中有 19 个叶子结点。（2）在面向对象方法中，类的实例称为对象。（3）诊断和改正程序中错误的工作通常称为调试。（4）在关系数据库中，把数据表示成二维表，每一个二维表称为关系。（5）问题处理方案的正确而完整的描述称为算法。（6）以下语句的输出结果是 12345.68 。 Print Int(12345.6789*100+0.5)/100 (7) 在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程： Private Sub Form_Click() Text1.Text="VB程序设计" End Sub Private Sub Text1_Change() Picture1.Print "VB Programming" End Sub 程序运行后，单击窗体，则在文本框中显示的内容是 vb程序设计，而在图片框中显示的内容是 vb programming 。（8）阅读下面程序： Private Sub Form_Click() Dim Check As Boolean,Counter As Integer Check=True Counter=5 Do Do While Counter<20 Counter=Counter+1 If Counter=10 Then Check=False Exit Do End If Loop Loop Until Check=False Print Counter End Sub 程序运行后，单击窗体，输出结果为 10 。（9）设有如下程序： Private Sub Form_Click() Dim a As Integer n=8 s=0 Do s=s+n n=n-1 Loop While n>0 Print s End Sub 以上程序的功能是计算8+7+···+1 。程序运行后，单击窗体，输出结果为 36 。（10）设有如果程序： Option Base 1 Private Sub Command1_Click(0 Dim arr1 Dim Min As Integer,I As Integer arr1=Array(12,435,76,-24,78,54,866,43) Min= arrl(1) For i=2 To 8 If arr1(i)a+c A）-1 B）1 C）True D）False （15）设a=5，b=10，则执行 c=Int ((b-A）* Rnd +A）+1 后，c值的范围为C A）5～10 B）6～9 C）6～10 D）5～9 （16）在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a$ = "software and hardware" b$ = Right(a$, 8) c$ = Mid(a$, 1, 8) MsgBox a$, , b$, c$, 1 End Sub 运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是C A）software and hardware B）software C）hardware D）1 （17）在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的Text属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() a = InputBox("Enter an integer") b = InputBox("Enter an integer") Text1.Text = b + a End Sub 程序运行后，单击命令按钮，如果在输入对话框中分别输入8和10，则文本框中显示的内容是A A）108 B）18 C）810 D）出错（18）在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序： Private Sub Form_Load() Show Text1.Text = "" Text2.Text = "" Text1.SetFocus End Sub Private Sub Text1_Change() Text2.Text = Mid(Text1.Text, 8) End Sub 程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是B A）BeijingChina B）China C）Beijing D）BeijingC （19）在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程： Private Sub Form_Load() List1.AddItem "Item 1" List1.AddItem "Item 2" List1.AddItem "Item 3" End Sub Private Sub Command1_Click() List1.List(List1.ListCount) = "AAAA" End Sub 程序运行后，单击命令按钮，其结果为B A）把字符串“AAAA”添加到列表框中，但位置不能确定 B）把字符串“AAAA”添加到列表框的最后（即“Item3”的后面） C）把列表框中原有的最后一项改为“AAAA” D）把字符串“AAAA”插入到列表框的最前面（即“Item1”的前面）（20）假定有如下事件过程 Private Sub Form_Click() Dim x As Integer, n As Integer x = 1 n = 0 Do While x < 28 x = x * 3 n = n + 1 Loop Print x, n End Sub 程序运行后，单击窗体，输出结果是A A）81 4 B）56 3 C）28 1 D）243 5 （21）有如下程序： Private Sub Form_Click() Dim Check, Counter Check = True Counter = 0 Do Do While Counter < 20 Counter = Counter + 1 If Counter = 10 Then Check = False Exit Do End If Loop Loop Until Check = False Print Counter, Check End Sub 程序运行后，单击窗体，输出结果为D A）15 0 B）20 -1 C）10 True D）10 False （22）有如下程序： Private Sub Form_Click() Dim i As Integer, sum As Integer sum = 0 For i = 2 To 10 If i Mod 2 <> 0 And i Mod 3 = 0 Then sum = sum + i End If Next i Print sum End Sub 程序运行后，单击窗体，输出结果为A A）12 B）30 C）24 D）18 （23）在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim array1(10, 10) As Integer Dim i As Integer, j As Integer For i = 1 To 3 For j = 2 To 4 array1(i, j) = i + j Next j Next i Text1.Text = array1(2, 3) + array1(3, 4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是A A）12 B）13 C）14 D）15 （24）在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() Dim a1(4, 4), a2(4, 4) For i = 1 To 4 For j = 1 To 4 a1(i, j) = i + j a2(i, j) = a1(i, j) + i + j Next j Next i Print a1(3, 3); a2(3, 3) End Sub 程序运行后，单击命令按钮，在窗体上输出的是D A）6 6 B）10 5 C）7 21 D）6 12 （25）有如下程序： Option Base 1 Private Sub Form_Click() Dim arr, Sum Sum = 0 arr = Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19) For i = 1 To 10 If arr(i) / 3 = arr(i) \ 3 Then Sum = Sum + arr(i) End If Next i Print Sum End Sub 程序运行后，单击窗体，输出结果为C A）25 B）26 C）27 D）28 （26）在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a(5) As String For i = 1 To 5 a(i) = Chr(Asc("A") + (i - 1)) Next i For Each b In a Print b; Next End Sub 程序运行后，单击命令按钮，输出结果是A A）ABCDE B）1 2 3 4 5 C）abcde D）出错信息（27）以下关于函数过程的叙述中，正确的是D A）如果不指明函数过程参数的类型，则该参数没有数据类型 B）函数过程的返回值可以有多个 C）当数组作为函数过程的参数时，既能以传值方式传递，也能以引用方式传递 D）函数过程形参的类型与函数返回值的类型没有关系（28）函数过程F1的功能是：如果参数b为奇数，则返回值为1，否则返回值为0，以下能正确实现上述功能的代码是B A）Function F1(b As Integer) B）Function F1(b As Integer) If b Mod 2 = 0 Then If b Mod 2 = 0 Then Return 0 F1=0 Else Else Return 1 F1=1 End If End If End Function End Function C）Function F1(b As Integer) D）Function F1(b As Integer) If b Mod 2 = 0 Then If b Mod 2 = 0 Then F1=1 Return 0 Else Else F1=0 Return 1 End If End If End Function End Function （29）以下关于KeyPress事件过程中参数KeyAscii的叙述中正确的是A A）KeyAscii参数是所按键的ASCII码 B）KeyAscii参数的数据类型为字符串 C）KeyAscii参数可以省略 D）KeyAscii参数是所按键上标注的字符（30）设窗体上有一个名为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Text1.Text = "" Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) Print "程序设计" End Sub Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Print "Visual Basic" End Sub 程序运行后，如果在文本框中输入字母“a”，然后单击窗体，则在窗体上显示的内容是C A）Visual Basic B）程序设计 C）Visual Basic程序设计 D）a程序设计（31）假定有下表所列的菜单结构：标题名称层次显示 appear 1（主菜单）大图标 bigicon 2（子菜单）小图标 smallicon 3（子菜单）要求程序运行后，如果单击菜单项“大图标”，则在该菜单项前面添加一个“∨”，以下正确的事件过程是C A）Private Sub bigicon_Click() B）Private Sub bigicon_Click() bigicon.Checked = Flase Me.appear.bigicon.Checked = Flase End Sub End Sub C）Private Sub bigicon_Click() D）Private Sub bigicon_Click() bigicon.Checked =True appear.bigicon.Checked = Flase End Sub End Sub （32）假定通用对话框的名称为CommonDialog1，命令按钮的名称为Command1，则单击命令按钮后，能使打开的对话框的标题为“New Title”的事件过程是C A）Private Sub Command1_Click() CommonDialog1.DialogTitle = "New Title" CommonDialog1.ShowPrinter End Sub B）Private Sub Command1_Click() CommonDialog1.DialogTitle = "New Title" CommonDialog1.ShowFont End Sub C）Private Sub Command1_Click() CommonDialog1.DialogTitle = "New Title" CommonDialog1.ShowOpen End Sub D）Private Sub Command1_Click() CommonDialog1.DialogTitle = "New Title" CommonDialog1.ShowColor End Sub （33）如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是D A）任何时刻最多只有一个窗体是活动窗体B）不能把标准模块设置为启动模块 C）用Hide方法只是隐藏一个窗体，不能从内存中清除该窗体 D）如果工程中含有Sub Main过程，则程序一定首先执行该过程（34）假定在工程文件中有一个标准模块，其中定义了如下记录类型 Type Books Name As String * 10 TelNum As String * 20 End Type 要求当执行事件过程Command1_Click时，在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是A A）Private Sub Command1_Click() Dim B As Books Open "c:\Person.txt" For Output As #1 B.Name = InputBox("输入姓名") B.TelNum = InputBox("输入电话号码") Write #1, B.Name, B.TelNum Close #1 End Sub B）Private Sub Command1_Click() Dim B As Books Open "c:\Person.txt" For Input As #1 B.Name = InputBox("输入姓名") B.TelNum = InputBox("输入电话号码") Print #1, B.Name, B.TelNum Close #1 End Sub C）Private Sub Command1_Click() Dim B As Books Open "c:\Person.txt" For Output As #1 Name = InputBox("输入姓名") TelNum = InputBox("输入电话号码") Write #1, B Close #1 End Sub D）Private Sub Command1_Click() Dim B As Books Open "c:\Person.txt" For Input As #1 B.Name = InputBox("输入姓名") B.TelNum = InputBox("输入电话号码") Print #1, B.Name, B.TelNum Close #1 End Sub （35）目录列表框的Path属性的作用是B A）显示当前驱动器或指定驱动器上某目录下的文件名 B）显示当前驱动器或指定驱动器上的目录结构 C）显示根目录下的文件名D）显示指定路径下的文件二、填空题（每空2分，共30分）（1）数据管理技术发展过程经过人工管理、文件系统和数据库系统三个阶段，其中数据独立性最高的阶段是数据库系统阶段。（2）算法复杂度主要包括时间复杂度和空间复杂度。（3）在进行模块测试时，要为每个被测试的模块另外设计两类模块：驱动模块和承接模块（桩模块）。其中驱动模块的作用是将测试数据传送给被测试的模块，并显示被测试模块所产生的结果。（4）一棵二叉树第六层（根结点为第一层）的结点数最多为 32 结构。（5）数据结构分为逻辑结构和存储结构，循环队列属于存储结构。（6）设有以下函数过程： Function fun(m As String) As Integer Dim k As Integer, sum As Integer sum = 0 For k = m To 1 Step -2 sum = sum + k Next k fun = sum End Function 若在程序中用语句s=fun(10)调用此函数，则s的值为 30 。（7）在窗体上画一个命令按钮和一个文本框，然后编写命令按钮的Click事件过程。程序运行后，在文本框中输入一串英文字母（不区分大小写），单击命令按钮，程序可找出未在文本框中输入的其他所有英文字母，并以大写方式降序显示到Text1中。例如，若在Text1中输入的是abDfdb，则单击Command1按钮后Text1中显示的字符串是 ZYXWVUTSRQPONMLKJIHGEC。请填空。 Private Sub Command1_Click() Dim str As String, s As String, c As String str = UCase(text1) s = "" c = "Z" While c >= "A" If InStr(str, C）= 0 Then s= s+c End If c = Chr$(Asc(C） -1 ) Wend If s <> "" Then text1 = s End If End Sub （8）在n个运动员中选出任意r个人参加比赛，有很多种不同的选法，选法的个数可以用公式计算。下图窗体中3个文本框的名称依次是Text1、Text2、Text3。程序运行时在Text1、Text2中分别输入n和r的值，单击Command1按钮即可求出选法的个数，并显示在Text3文本框中（见下图）。请填空。 Private Sub Command1_Click() Dim r As Integer, n As Integer n = Text1 r = Text2 Text3 = fun(n) / fun( n-r ) / fun(r) End Sub Function fun(n As Integer) As Long Dim t As Long t=1 For k = 1 To n t = t * k Next fun = t End Function （9）以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组，然后画一个名为Text2的文本框和名为Command1的命令按钮。运行时在文本框数组中输入7个分数，单击“计算得分”命令按钮，则最后得分显示在Text2文本框中（去掉一个最高分和一个最低分的平均分即为最后得分），如图所示。请填空。 Private Sub Command1_Click() Dim k As Integer Dim sum As Single, max As Single, min As Single sum = Text1(0) max = Text1(0) min = Text1（0） For k = 1 To 6 If max < Text1(k) Then max = Text1(k) End If If min > Text1(k) Then min = Text1(k) End If sum = sum + Text1(k) Next k text2=( sum-max-min )/5 End Sub （10）如图所示，在列表框List1中已经有若干人的简单信息，运行时在Text1文本框（即“查找对象”右边的文本框）输入一个姓或姓名，单击“查找”按钮，则在列表框中进行查找，若找到，则把该人的信息显示在Text2文本框中。若有多个匹配的列表项，则只显示第1个匹配项；若未找到，则在Text2中显示“查找此人”。请填空。 Private Sub Command1_Click() Dim k As Integer, n As Integer, found As Boolean found = False n = Len( text1.text ) k = 0 While k < List1.ListCount And Not found If Text1 = Left$(List1.List(k), n) Then Text2 = list.list(k) found = True End If k = k + 1 Wend If Not found Then Text2 = "查无此人" End If End Sub 2006年4月一、选择题（每小题2分，共70分）下列各题A）、B）、C）、D）四个选项中，只有一个选项正确的，请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。（1）下列选项中不属于结构化程序设计方法的是D A）自顶向下 B）逐步求精 C）模块化 D）可复用（2）两个或两个以上模块之间关联的紧密程度称为A A）耦合性 B）内聚性 C）复杂度 D）数据传输特性（3）下列叙述中正确的是D A）软件测试应该由程序开发者来完成 B）程序经调试后一般不需要再测试 C）软件维护只包括对程序代码的维护 D）以上三种说法都不对（4）按照“后进先出”原则组织数据的数据结构是B A）队列 B）栈 C）双向链表 D）二叉树（5）下列叙述中正确的是A A）线性链表是线性表的链式存储结构 B）栈与队列是非线性结构 C）双向链表是非线性结构 D）只有根结点的二叉树是线性结构（6）对如下二叉树进行后序遍历的结果为D A）ABCDEF B）DBEAFC C）ABDECF D）DEBFCA （7）在深度为7的满二叉树中，叶子结点的个数为C A）32 B）31 C）64 D）63 （8）“商品”与“顾客”两个实体集之间的联系一般是D A）一对一 B）一对多 C）多对一 D）多对多（9）在E-R图中，用来表示实体的图形是A A）矩形 B）椭圆形 C）菱形 D）三角形（10）数据库DB、数据库系统DBS、数据库管理系统DBMS之间的关系是C A）DB包含DBS和DBMS B）DBMS包含DB和DBS C）DBS包含DB和DBMS D）没有任何关系（11）以下关于Visual Basic特点的叙述中，错误的是D A）Visual Basic是采用事件驱动编程机制的语言 B）Visual Basic程序既可以编译运行，也可以解释运行 C）构成Visual Basic程序的多个过程没有固定的执行顺序 D）Visual Basic程序不是结构化程序，不具备结构化程序的三种基本结构（12）以下叙述中，错误的是C A）一个Visual Basic应用程序可以含有多个标准模块文件 B）一个Visual Basic工程可以含有多个窗体文件 C）标准模块文件可以属于某个指定的窗体文件 D）标准模块文件的扩展名是.bas （13）以下叙述中，错误的是B A）在Visual Basic中，对象所能响应的事件由系统定义的 B）对象的任何属性既可以通过属性窗口设定，也可以通过程序语句设定 C）Visual Basic中允许不同对象使用相同名称的方法 D）Visual Basic中的对象具有自己的属性和方法（14）设有如下语句： Dim a, b As Integer c = "VisualBasic" d = #7/20/2005# 以下关于这段代码的叙述中，错误的是A A）a被定义为Integer类型变量 B）b被定义为Integer类型变量 C）c中的数据是字符串 D）d中的数据是日期类型（15）以下能从字符串“VisualBasic”中直接取出子字符串“Basic”的函数是B A）Left B）Mid C）String D）Instr （16）设a=4，b=3，c=2，d=1，下列表达式的值是D a>b+1 Or c

                    本文档为【历年计算机二级vb笔试真题及公共基础知识】，请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑，
                    图片更改请在作品中右键图片并更换，文字修改请直接点击文字进行修改，也可以新增和删除文档中的内容。 
 该文档来自用户分享，如有侵权行为请发邮件ishare@vip.sina.com联系网站客服，我们会及时删除。

                    [版权声明] 本站所有资料为用户分享产生，若发现您的权利被侵害，请联系客服邮件isharekefu@iask.cn，我们尽快处理。

                    本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权，请谨慎使用。

                    网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传，仅限个人学习分享使用，禁止用于任何广告和商用目的。
                

下载需要：免费已有0 人下载

立即下载

历年计算机二级vb笔试真题及公共基础知识

你可能还喜欢