1、VB笔试模拟试卷 93及答案与解析 1 算法指的是 _。 （ A） 计算机程序 （ B）解决问题的计算方法 （ C）解决问题的有限运算序列 （ D）排序算法 2 下列关于线性表的叙述中，不正确的是 _。 （ A）线性表是 n个结点的有穷序列 （ B）线性表可以为空表 （ C）线性表的每一个结点有且仅有一个前趋和一个后继 （ D）线性表结点间的逻辑关系是 1:1的联系 3 栈和队列 _。 （ A）共同之处在于二者都是先进先出的特殊的线性表 （ B）共同之处在于二者 都是先进后出的特殊的线性表 （ C）共同之处在于二者都只允许在顶端执行删除操作 （ D）没有共同之处 4 若二叉树中度为 2的结点有
2、 15个，度为 1的结点有 10个，则有 _个叶结点。 （ A） 25 （ B） 30 （ C） 31 （ D） 16 5 已知二叉树的前序序列为 ABDCEFG，中序序列为 DBCAFEG，则后序序列为_。 （ A） DCBAFGE （ B） DCBFGEA （ C） DCBFEGA （ D） DCBGFEA 6 软件调试方法中的静态调试方法之一为 _。 （ A）计算机辅助静态分析 （ B）黑盒法 （ C）因果图 （ D）路径覆盖 7 为了克服软件危机，人们提出了用 _的原理来设计软件，这就是软件工程诞生的基础。 （ A）数学 （ B）软件学 （ C）运筹学 （ D）工程学 8 为了防止一个
3、用户的工作不适当地影响另一个用户，应该采取 _。 （ A）完整性控制 （ B）安全性控制 （ C）并发控制 （ D）访问控制 9 在数据库设计中，数据流图表达的是 _。 （ A） 数据和数据结构的关系 （ B）数据和算法的 关系 （ C）数据和处理的关系 （ D）数据和通信的关系 10 关于数据库系统的特点，下列说法中错误的是数据 _。 （ A）结构化 （ B）共享性高 （ C）独立性差 （ D）统一管理和控制 11 若要使用户不能修改文本框 TextBox1中内容，应修改 _ 属性。 （ A） Locked （ B） MultiLine （ C） PassWordChar （ D） Sero
4、llBar 12 命令按钮 Command1的 Caption属性为 “退出 (x)”，要将命令按钮的快捷键设为Alt+x，应修改 Caption属性为 _ 。 （ A） 在 x前插入 （ B）在 x后插入 （ C）在 x前插入 # （ D）在 x后插入 # 13 Label控件中内容能垂直方向变化而宽度保持不变则应设置 _ 属性。 （ A） Wordwrap （ B） Enabled （ C） Locked （ D） AutoSize 14 使用 CoamonDialog 控件的 _ 方法可显示 ”打印 ”对话框。 （ A） ShowOpen （ B） ShowSave （ C） ShowC
5、olor （ D） Showprinter 15 确定复选框是否选中，可访问的属性是 _ 。 （ A） Value （ B） Checked在 （ C） Selected （ D） Caption 16 只能用来显示字符信息的控件是 _ 。 （ A） 文本框 （ B）标签框 （ C）图片框 （ D）图像框 17 在窗体上添加一个文本框，名为 text1，然后编写如下的 load事件过程，则程序的运行结果是 _ 。 private sub form_ load text1.text=“” text1.setfocus for k=1 to 5 t=t*k next k text1.text=t
6、end sub （ A） 在文本框中显示 120 （ B）文本框中仍为空 （ C）在文本框中显示 1 （ D）出错 18 以下语句错误的是： _ 。 （ A） Do while(Condition) Statements Loop （ B） Do Statements Loop while(condition) （ C） Do until(condition) Statements Loop （ D） Do until(condition) Statements end do 19 下列程序运行后，输出的结果为 _ 。 B=1Do while b 40 b=*(b+1)LoopPrint B
7、（ A） 42 （ B） 39 （ C） 6 （ D） 1 20 在窗体上添加一个命令按纽，名为 command1，其事件过程如下，程序运行后，其输出的结果为 _ 。 Private sub_command1_ click () Dim a a=array(1， 2， 3， 4， 5) For k=1 to 4 S=s+ a(k) Next k Print s End sub （ A） 10 （ B） 14 （ C） 15 （ D） 120 21 设执行以下程序段时依次输入 1、 3、 5，执行结果为 _ 。 Dim a(4)As Integer Dim b(4) As Integer For
8、 K=0 To 2 a(K+1)=Val(1nputBox(“请输入数据： ”) b(3-K)=a(K+1) Next K Print b(K) （ A） 1 （ B） 3 （ C） 5 （ D） 0 22 下列程序执行后，变量 S的值为 _ 。 Dim s As Long， X As Integer s=0 X=1 Do While x 10 s= s+ x x=x+2 Loop Print s （ A） 10 （ B） 25 （ C） 50 （ D） 100 23 下列程序段的执行结果为 _ 。 Dim A(4) N= 3 A(1) =1 For K=0 To N-1 For L=1 To
9、 K+1 X=K+2 -L A(X)=A(X)+A(X-1) If K N-1 Then Exit For Print A(X)； Next L Next K （ A） 1 2 1 （ B） 1 2 3 （ C） 2 4 6 （ D） 1 3 1 24 下列命令按纽事件过程执行后，输出的结果是 _ 。 private sub command_ click() for m+1 to 10 step 2 a=10 for n=1 to 10 step 2 a+a+2 next n next m print a end sub （ A） 60 （ B） 50 （ C） 30 （ D） 20 25 当
10、执行以下过程时，在名为 1blResult的标签框内将显示 _。 Private Sub cmdlt_ click() Dim I， R R=0 For I=1 To 5 Step 1 R=R+I Next i 1blResult Caption=Str (R) End Sub （ A） 字符串 15 （ B）整数 15 （ C）字符串 5 （ D）整数 5 26 下面程序执行的结果是 _。 Private Sub Form_ Click() A =“123”： B =“456” C=Val(A )+Val(B ) Print C100 End Sub （ A） 123 （ B） 3 （ C）
11、 5 （ D） 579 27 每个 ActiveX控件都是扩展名为 _的独立文件。 （ A） .OCX （ B） .c （ C） .act （ D） .bmp 28 控件 _ 属性的设置，可使该控件不能通过 Tab键得到焦点。 （ A） TabStop （ B） Tablndex （ C） GotFocus （ D） SetFocus 29 在窗体上画一个名称为 Command1的命令按钮，然后编写如下程序： Private Sub Command1-Click() Static X Am Integer Static Y As Integer Cls Y=1 Y=Y+5 X=5+X Prin
12、t X， Y End Sub程序运行时，三次单击命令按钮 Comand1后，窗体上显示的结果为 _。 （ A） 15 16 （ B） 15 6 （ C） 15 15 （ D） 5 6 30 下列表达式中， _的值为 false。 （ A） “BCD” “BCE” （ B） “12345” “12345”旷 “ABC” （ C） Not 2*5=10 （ D） 4=4 and 5 2+2 31 用如下语句所定义的数组的元素个数是 _个。 Dim b(-2 to 4)as string （ A） 2 （ B） 4 （ C） S （ D） 7 32 先在 窗体上添加一个命令按纽，然后编写如下程序：
13、Function fun(ByVal nm As Long)As Long Dim k As Long k=1 num=Abs(num) Do While num k=k*(num Mod 10) num=num10 Loop fun=k End Function Private Sub Command1_Click() Dim n As Long Dim r As Long n=InputBox(“请输入一个数 ”) n=CLng(n) r=fun(n) Print r End Sub 则在程序运行后，单击命令按纽，在对话框 中输入 “100”，输出结果是 _。 （ A） 0 （ B） 10
14、0 （ C） 200 （ D） 300 33 单击命令按钮时，下列程序代码的执行结果为 _。 Private Function PickMid(xStr As String) As String Dim tempStr As String Dim strLen As Integer tempStr=“” strLen=Len(xStr) i=1 Do While i =strLen/2 tempStr=tempStr+Mid(xStr， i， 1)+Hid(xStr，strLen-i+1， 1) i=i + 1 Loop PickMid=tempStr End Function Private
15、 Sub Command1_Click() Dim FirstStr As String FirstStr=“abcdef” Print PickMid(FirstStr) End Sub （ A） abcdef （ B） afbecd （ C） fedcba （ D） defabc 34 下面叙述中不正确的是 _。 （ A） 若使用 Write #语句将数据输出到文件，则各数据项之间自动插入逗号，并且将字符串加上双引号。 （ B）若使用 Print #语句将数据输出到文件，则各数据项之间没有逗号分隔，且字符串不加双引号。 （ C） Write #语句和 Print #语句建立的顺序文件格式完
16、成一样。 （ D） Write #语句和 Print #语句均实现向文件中写入数据。 35 在窗体上添加一个命令按钮，名为 command1，一文本框，名为 text1，则执行如下事件过程后，文本框中的输出为 _。 For i=1 To 4 x=3 For j=1 To 3 For k=1 To 2 x= x + 3 Next k Next j Next i Text1.Text=str(x) （ A） 6 （ B） 12 （ C） 18 （ D） 21 36 深度为 n(n 0)的二叉树最多有【 】个结点。 37 目前，有两种重要的高级语 言，分别是结构化程序和【 】。 38 对象还有操作，
17、用于改变对象的状态，对象及其操作就是对象的【 】。 39 结构化分析方法的基本思想是采用【 】方法，分析整个系统，有效的控制系统开发的复杂性。 40 数据库管理系统 (DBMS)是数据库的机构，通常由数据定义语言、数据控制语言，【 】和一些实用程序四部分组成。 41 DIM a(3, -3 to 0, 3 to 6)AS STRING语句定义的数组元素有【 】个。 42 已知在窗体上有一个文本框控件，它的名称为 Text1，且输入 的字符全部为数字，现在要把该字符转换为整数送给整型变量 C，所用到的语句是【 】。 43 在 C盘当前文件夹下建立一个名为 StuData. txt的顺序文件。要求
18、用 InputBox函数输入 5名学生的学号 (StuNo)、姓名 (StuName)和英语成绩 (StuEng)。 Private Sub Form Click() Open“C: StuData. txt“For OutPut As#1 Fori=1 To 5 StuNo=InpuzztBox(“请输入学号 ”) StuName=InputBox(“请输入姓名 ”) StuEng=Val(InputBox(“请输入英语成绩 ”) 【 】 Next i Close#1 End Sub 44 假定建立了一个工程，该工程包括两个窗体，其名称 (Name属性 )分别为 Form1和 Form2，启
19、动窗体为 Form1。在 Form1画一个命令按钮 Command1，程序运行后，要求当单击该命令按钮时， Form1窗体消失，显示窗体 Form2，请在【 】和【 】处将程序补充完整。 Private Sub Command1_Click() 【 】 Form1 Form2.【 】 End Sub 45 一下程序的作用是生成一个 1010的矩阵该矩阵主对角线上的数据为 1，其余数据为 0(程序运行结果如下图所示 )。该程序不完整，请补充完改程序。Private Sub Command1_Click() Dim a(10， 10)As Integer For i=1 To【 】 For j=1
20、 To 10 If【 】 Then 【 】 =1 Else a(i， j)=0 End If Next j Next i For i =1 To 10 For j=1 To 10 Print a(i， j)； Next j Print Next i End Sub VB笔试模拟试卷 93答案与解析 1 【正确答案】 C 2 【正确答案】 C 3 【正确答案】 C 4 【正确答案】 D 5 【正确答案】 B 6 【正确答案】 A 7 【正确答案】 D 8 【正确答案】 C 9 【正确答案】 C 10 【正确答案】 C 11 【正确答案】 A 12 【正确答案】 A 13 【正确答案】 A 14
21、【正确答案】 D 15 【正确答案】 A 16 【正确答案】 B 17 【正确答案】 D 18 【正确答案】 D 19 【正确答案】 A 20 【正确答案】 B 21 【正确答案】 A 22 【正确答案】 B 23 【正确答案】 A 24 【正确答案】 D 25 【正确答案】 A 26 【正确答案】 C 27 【正确答案】 A 28 【正确答案】 A 29 【正确答案】 B 30 【正确 答案】 C 31 【正确答案】 D 32 【正确答案】 A 33 【正确答案】 B 34 【正确答案】 C 35 【正确答案】 D 36 【正确答案】 2n-1 37 【正确答案】 面向对象程序设计 38 【
22、正确答案】 行为 39 【正确答案】 面向数据流 40 【正确答案】 数据操纵 41 【正确答案】 48 【试题解析】 DIM 9(3， -3 to 0， 3 to 6)AS STRING语句定义的数组元素的计算式为： 3*(0-(-3)+1)*(6-3+1) 故元素个数为 48。 42 【正确答案】 c=Val(Text1. Text) 【试题解析】 Text属性的内容就是显示在文本框控件上的内容。其类型为字符类型。要将它转换成数值类型，需用到转换函数 Val。根据以上知识点分析题意可知所用到的语句为： c Val(Textl. Text)。 43 【正确答案】 Write #1, StuNo, StuName, StuEng或 Print#1, StuNo, StuName, Stu- Eng 【试题解析】 顺序文件的写操作可以 使用 Print#或 Write#语句。其格式为： Print #文件号，表达式表 Write#文件号，表达式表 题中要将学生的学号、姓名、英语成绩写入文件 1，故可以用语句 Write #1, StuNo, StuName, StuEng或 Print#1, StuNo, Stu- Name, StuEng 44 【正确答案】 Unload,Show 45 【正确答案】 10 , i=j , a(i， j)
