1、VB 笔试模拟试卷 207及答案与解析 1 下列不属于 Visual Basic特点的是 （ A）对象的链接与嵌入 （ B）结构化程序设计 （ C）编写跨平台应用程序 （ D）事件驱动程序编程机制 2 下列事件过程运行后输出结果是 Private Sub Command1_Click() Print Formats(123,456， “#,#%“) End Sub （ A） 123.46% （ B） 123.45% （ C） 123.456% （ D） 12345.6% 3 单击命令按钮时，下列程序的执行结果是 Private Sub Command1_Click() Dim a As Int
2、eger， b As Integer， c As Integer a=3:b=4:c=5 Print SecProc(c,b,a) End Sub Function FirProc(x As Integer， y As Integer， z As Integer) FirProc=2*x+y+3*z+2 End Function Function SecProc(x As Integer， y As Integer，z As Integer) SecProc=FirProc(z,x,y)+x+7 End Function （ A） 20 （ B） 25 （ C） 37 （ D） 32 4 在窗
3、体上画一个命令按钮 (其 Name属性为 Command1)，然后编写如下代码： Private Sub Command1_Click() Dim a(5,5) For i=1 To 3 For j=1 To 4 a(i,j)=i*j Next Next For n=1 To 2 For m=1 To 3 Print a(m,n)； Next Next End Sub 程序运行后，单击命令按钮，输出结果是 （ A） 2 4 6 1 2 3 （ B） 1 2 3 2 4 6 （ C） 1 2 3 4 5 6 （ D） 6 5 4 3 2 1 5 有如下程序： Private Sub Form_C
4、lick() E=1:F=1 For j=1 To 3 E=E+F:F=F+E Next Print E:F End Sub 该程序的输出结果是 （ A） 6 6 （ B） 5 8 （ C） 13 21 （ D） 34 55 6 下列程序段的执行结果为 Dim A(3,3) For M=1 To 3 For N=1 To 3 If N=M Or N=3-M+1 Then A(M,N)=1 Else A(M,N)=0 End If Next N Next M For M=1 To 3 For N=1 To 3 Print A(M,N) Next N Print Next M （ A） 1 0 0
5、 0 1 0 0 0 0 （ B） 1 1 1 1 1 1 1 1 1 （ C） 0 0 0 0 0 0 0 0 0 （ D） 1 0 1 0 1 0 1 0 1 7 设有下面的循环： i=0 While i =1 i=i+3 Print i Wend 则运行后的输出结果是 （ A） 1 （ B） 2 （ C） 3 （ D） 4 8 下面的数组声明语句中正确的是 （ A） Dim gg1,5As String （ B） Dim gg1 To 5,1 To 5As String （ C） Dim gg(1 To 5)As String （ D） Dim gg1:5,1:5As String 9
6、单击命令按钮时，下列程序的执行结果是 Private Sub Command1_Click() BT 4 End Sub Private Sub BT(x As Integer) x=x*2+1 If x 6 Then Call BT(x) End If x=x*2 Print x； End Sub （ A） 15 （ B） 16 （ C） 17 （ D） 18 10 有如下的程序： Private Sub Command1_Click() Dim k As Integer， m As Integer Dim P As Integer k=4： m=1 P=Fun(k,m)： Print P；
7、 P=Fun(k,m)： Print P End Sub Private Function Fun(a As Integer， b As Integer) Static m As Integer， i As Integer in=5： i=2 i=i+m+1 m=i+a+b Fun=m2 End Function 单击命令按钮后，输出结果为 （ A） 2 2 （ B） 4 4 （ C） 5 5 （ D） 6 6 11 在窗体上画一个名称为 TxtA的文本框，然后编写如下的事件过程： Private Sub TxtA_KeyPress(Keyascii as integer) End Sub 若
8、焦 点位于文本框中，则能够触发 KeyPress事件的操作是 （ A）单击鼠标 （ B）双击文本框 （ C）鼠标滑过文本框 （ D）按下键盘上的某个键 12 下面有一段程序代码，如果从键盘上输入 “Computer”，则在文本框内显示的内容是 Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii =65 And KeyAscii =122 Then KeyAscii=42 End If End Sub （ A） Computer （ B）什么都没有 （ C） * （ D）程序出错 13 向顺序文件 Temp.txt中写入 1，
9、2， 3这 3个数。在程序中加入以下语句的哪一项可以使程序功能完整。 Private Sub Command1_Click() Open“ c:Temp.txt“， Output As #1 For i=0 To 3 _ Next Close #1 End Sub （ A） Print #1， Temp.txt （ B） Get #1， i （ C） Print #1， i （ D） Unit #1， i 14 下列选项中不符合良好程序设计风格的是 （ A）源程序要文档化 （ B）数据说明的次序要规范化 （ C）避免滥用 goto语句 （ D）模块设计要保证高耦合、高内聚 15 软件开发模型包
10、括 瀑布模型 扇形模型 快速原型法模型 螺旋模型 （ A） 、 、 （ B） 、 、 （ C） 、 、 （ D） 、 、 16 软件开发的结构化 生命周期方法将软件生命周期划分成 （ A）定义、开发、运行维护 （ B）设计阶段、编程阶段、测试阶段 （ C）总体设计、详细设计、编程调试 （ D）需求分析、功能定义、系统设计 17 单个用户使用的数据视图的描述称为 （ A）外模式 （ B）概念模式 （ C）内模式 （ D）存储模式 18 数据结构作为计算机的一门学科，主要研究数据的逻辑结构、对各种数据结构进行的运算，以及 （ A）数据的存储结构 （ B）计算方法 （ C）数据映象 （ D）逻辑存储
11、 19 设有关系 R和 s，关系代数表达式为 R-(R-S)表示的是 （ A） RS （ B） R-S （ C） R S （ D） RS 20 下列叙述中正确的是 （ A）一个算法的空间复杂度大，则其时间复杂度也必定大 （ B）一个算法的空间复杂度大，则其时间复杂度必定小 （ C）一个算法的时间复杂度大，则其空间复杂度必定小 （ D）上述三种说法都不对 21 对长度为 n的线性表进行顺序查找，在最坏情况下所需要的比较次数为 （ A） log2n （ B） n/2 （ C） n （ D） n+1 22 数据库技术的根本目标是要解决数据的 （ A）存储问题 （ B）共享问题 （ C）安全问题 （
12、D）保护问题 23 若某二叉树的前序遍历访问顺序是 abdgcefh，中序遍历访问顺序是 dgbaechf，则其后序遍历的结点访问顺序是 （ A） bdgcefha （ B） gdbecfha （ C） bdgaechf （ D） gdbehfca 24 要将窗体 Form1标题设为 “学习 VB”，以下能正确实现该功能的语句为 （ A） Form1.Name=“学习 VB“ （ B） Form1.Visible=“学习 VB“ （ C） Form1.caption=“学习 VB“ （ D） Form1.Show=“学习 VB“ 25 各种运算符间的优先顺序从高到低是 （ A）比较运算符 算术
13、运算符 逻辑运算符 （ B）比较运算符 逻辑运算符 算术运算符 （ C）算术运算符 比较运算符 逻辑运算符 （ D）算术运算符 逻辑运算符 比较运算符 26 如果一个变量未经定义就直接使用，则该变量的类型为 （ A） Integer （ B） Byte （ C） Boolean （ D） Variant 27 在文本框中，当用户键入一个字符，能同时引发的事件是 （ A） KeyPress和 Click （ B） KeyPress和 LostFocus （ C） KeyPress和 Change （ D） Change和 LostFocous 28 引用列表框 (List1)最后一个数据项应使用
14、 （ A） List1.List(List1.ListCount) （ B） List1.List(List.ListCount-1) （ C） List1.List(ListConut) （ D） List1.List(ListCount-1) 29 Sub过程与 Function过程最根本的区别是 （ A） Sub过程名称与 Function过程名称的格式不统一 （ B） Function过程可以带参数， Sub过程不可以 （ C）两种过程参数的传递方式不同 （ D） Sub过程的过程参数名称不能有返回值，而 Function过程能通过过程名称得到返回值 30 激活菜单栏的快捷键是 （ A
15、） F10 （ B） F4 （ C） F5 （ D） Ctrl 31 通过对话框中能打开 “颜色对话框 ”的方法是 （ A） ShowOpen （ B） ShowColor （ C） ShowSave （ D） ShowPrinter 32 在窗体模块中用 Public定义的变量的作用范围是 （ A）整个程序的所有模块中 （ B）该窗体模块中 （ C）标准模块中 （ D）其他窗体模块中 33 声明一个变量为局部变量应该用 （ A） Global （ B） Private （ C） Static （ D） Public 34 随机文件用于读数据的语句是 （ A） Get （ B） Writ （
16、C） print （ D） Input 35 下列程序功能是，产生 10个 0 100的随机数，输出其中的最大值。请将程序补充完整。 Private Sub Form_Click() Dim an (10) As Integer Dim max As Integer Randomize For i%=1 To 10 an(i%)= _ Next i% max=an(1) For i%=2 To 10 if _ then max=an(i%) End If Next i% print max End Sub End Sub 36 在窗体上画 1个文本框，名称为 Text1，然后编写如下程序： P
17、rivate Sub Form_Load() Open“d:tempdat.txt“For Output As #1 Text1.Text=“ End Sub Private Sub Text1_KeyPress(Key Ascii As Integer) If _ =13 Then If U Case(Text1.Text)= _Then Close 1 End Else Write #1, _ Text1.Text=“ End If End If End Sub 以上程序的功能是，在 D盘 temp目录下建立 1个名为 dat.txt的文件，在文本框中输入字符，每次按回车键 (回车符的 A
18、SCII码是 13)都把当前文本框中的内容写入文件 dat.txt，并清除文本框中的内容；如果输入 “END”，则结束程序。请 填空。 37 启动 Visual Basic，选择标准 EXE进入集成环境后，系统为用户启动建立一个窗体，并为该窗体起的临时名称是 _。 38 算法复杂度主要包括时间复杂度和 _复杂度。 39 一棵二叉树第六层 (根结点为第一层 )的结点数最多为 _个。 40 窗体是一种对象，由属性定义其外观，由 _定义其行为，由事件定义其与用户的交互。 41 逻辑常量值为 True或 _。 42 要使命令按钮控件不可用，应设置的属性是 _。 43 Defsnga定义的变量 a是 _
19、类型的变量。 44 为了防止用户随意将光标置于控件上，应将控件的 _属性设置为 False。 45 运行时，要使工具栏控件 Toolbarl中的第二个按钮的按钮菜单中的第三项无效(变成灰色 )，应使用语句 _。 46 要使一个命令按钮成为图形命令按钮，则应设置 _属性值。 VB 笔试模拟试卷 207答案与解析 1 【正确答案】 C 2 【正确答案】 A 3 【正确答案】 C 【试题解析】 此题程序代码中用了嵌套调用，我们对这样的 问题要多加小心，千万不要把实参和相对应的形参弄混。主调过程 Command1_click 输出的是SecProc(c， b， a)的返回值，调用过程 SecProc时
20、，主调过程分别把实参 c、 b、 a地址传给形参 x、 y、 z，此时在过程 SecProc 中， SecProc=FirProc(a， c， b)+7。由此看出，程序段执行此语句时，将调用过程 FirProc。把实参 a， c， b 的地址分别传给形参 x、 y、 z，此时在过程 FirProc中， FirProc=2*x+y+3*z+2，所以FirProc(a， c， b)=6+4+15+2=27， SecProc(a， c， b)=27+3+7=37。 4 【正确答案】 B 5 【正确答案】 C 【试题解析】 阅读本题程序可以看出， E 或 F的值总是它前边 E和 F值的和， E和 F的
21、值顺序分别为 1、 1， 2、 3， 5、 8， 13、 21，可以很容易地用前两个数相加得到后一个数。第 1次循环 E和 F的值分别为 2和 3，第 2次循环 E 和 F的值分别为 5和 8，第 3次循环 E 和 F的值分别为 13 和 21，最后输出结果为 13和 21。 6 【正确答案】 D 【试题解析】 题中以嵌套 For循环为数组 A(3,3)赋值，此过程中 ，如果 A(M,N)符合条件 “N=M OR N=3-M+1“则此项赋 1，否则赋 0。以 A(1,1)为例，由于M=N=1，故 A(1,1)=1。 依次类推： A(1,1)=1 A(2,1)=0 A(3,1)=1 A(1,2)
22、=0 A(2,2)=1 A(3,2)=0 A(1,3)=1 A(2,3)=0 A(3,3)=1 7 【正确答案】 C 【试题解析】 本题中考查了 WhileWend 循环语句，条件是 i =1，当运行一次之后， i=i+3， i变为 3，不满足条件，所以在运行 中只运行了一次就停止了，最终输出结果为 3。 8 【正确答案】 C 9 【正确答案】 D 【试题解析】 此题在函数调用过程中采用了简单递归的方式，具体流程如下：主调过程调用 BT过程，把实参 4传递给 BT过程中的形参 x，由 x=x*2+1语句推出x=9，此时不满足 BT过程中判断语句的判断条件，执行 x=x*2； Print x；语
23、句。由 x=x*2语句得到 x值为 18并输出，结束此次调用过程，返回到主调过程结束程序，输出结果为 18。 10 【正确答案】 D 【试题解析】 在 Sub过程中，程序段先定义 了 3个 Integer型变量 k,m,p，并赋给 k 初值为 4,m的初值为 1，然后调用事件过程 Fun，并将它的值赋给 p；在事件过程 Fun 中定义了两个形参，参数的传送是通过引用实参，即将 k,m的地址作为a,b 的地址；在 Fun 中，将 m,i定义为静态变量，所以第一次调用后的值仍然保留，但是 m,i分别都有赋值语句，将它们的值变为 5,2，所以返回值不变，都是6,6。 11 【正确答案】 D 12 【
24、正确答案】 C 【试题解析】 此事件过程是 KeyPress 事件过程，参数 KeyAscii 的值是键盘输入的字符的 ASCII码值。上述过程对输入的字符进行判断，如果其 ASCII码大于65(大写字母 “A”)并小于 _122(小写字母 “a”)，则用星号 (ASCII 码为 42)代替，而运行过程中，题意是要从键盘上输入 “Computer“，则应在文本框中显示“*”。 13 【正确答案】 C 14 【正确答案】 D 15 【正确答案】 C 16 【正确答案】 A 17 【正确答案】 A 18 【正确答案】 A 19 【正确答案】 A 20 【正确答案】 D 21 【正确答案】 C 22
25、 【正确答案】 B 23 【正确答案】 D 24 【正确答案】 C 25 【正确答案】 C 26 【正确答案】 D 27 【正确答案】 C 28 【正确答案】 B 29 【正确答案】 D 30 【正确答案】 A 31 【正确答案】 B 32 【正确答案】 A 33 【正确答案】 C 34 【正确答案】 A 35 【正确答案】 Int(Rnd*100) an(i%) max 36 【正确答案】 KeyAscii “END“ Text1.Text 或 Text1 37 【正确答案】 Form1 38 【正确答案】 空间 39 【正确答案】 32 40 【正确答案】 方法 41 【正确答案】 假 42 【正确答案】 Enabled属性 43 【正确答案】 单精度 44 【正确答案】 Enabled 45 【正确答案】 Toolbar1.Buttons(2).ButtonMenus(3).Enabled=False 46 【正确答案】 Style
