1、VB 笔试模拟试卷 217及答案与解析 1 在窗体上画一个名称为 Text1的文本框和一个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer,n As Integer For i=0 To 50 i=i+3 n=n+1 If i 10 Then Exit For Next Text1.Text=Str(n) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是 L )： （ A） 5 （ B） 4 （ C） 3 （ D） 2 2 窗体上有 Text1、 Text2两个文本框及一个命令按
2、钮 Command1，编写下列程序： Dim y As Integer Private Sub Command1_Click() Dim x As Integer x=2 Text1.Text=p2(pl(x),y) Text2.Text=pl(x) End Sub Private Function pl(x As Integer)As Integer x=x+y:y=x+y pl=x+y End Function Private Function p2(x As Integer,y As Integer)As Integer p2=2*x+y End Function 当单击 1次和单击 2
3、次命令按钮后，文本框 Text1和 Text2内的值分别是 ( )。 （ A） 2 4 2 4 （ B） 2 4 4 8 （ C） 10 10 58 58 （ D） 4 4 3 设有如下过程： Sub ff(x,y,z,) x=y+z End Sub 以下所有参数的虚实结合都是传址方式的调用语句是 ( )。 （ A） Call ff(5,7,z) （ B） Call ff(x,y,z) （ C） Call ff(3+x,5+y,z) （ D） Call ff(x+y,x-y,z) 4 窗体的 MouseDown事件过程 Form_MouseDown(Button As Integer,Shif
4、t As Integer,X As Single， Y As Single)有 4个参数，关于这些参数，正确的描述是 ( )。 （ A）通过 Button参数判定当前按下的是哪一个鼠标键 （ B） Shift参数只能用来确定是否按下 Shift键 （ C） Shift参数只能用来确定是否按下 Alt和 Ctrl键 （ D）参数 X、 Y用来设置鼠标当前位置的坐标 5 运行以下程序后，输出的结果是 ( )。 Print“中国 “ Font=“隶书 “ Print“人民 “ Font=“仿宋 “ Print“万岁 “ Font=“宋体 “ （ A）中国 (默认字体 ) 人民 (默认字体 ) 万岁
5、!(默认字体 ) （ B）中国 (默认字体 ) 人民 (仿宋 ) 万岁 !(宋体 ) （ C）中国 (默认字体 ) 人民 (隶书 ) 万岁 !(仿宋 ) （ D）中国隶书 (默认字体 ) 人民 (仿宋 ) 万岁 !(仿宋 ) 6 下列程序执行后，变量 a的值为 ( )。 Dim a,b,c,d as single a=100 b=20 c=1000 if b a Then d=a:a=b:b=d End if if c a Then d=a:a=c:c=d End if if c b Then d=b:b=c:c=d End if （ A） 0 （ B） 1000 （ C） 20 （ D） 1
6、00 7 在窗体上画一个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x=-5 If Sgn(x)Then y=Sgn(x2) Else y=Sgn(x) End If Print y End Sub 程序运行后，单击命令按钮，窗体上显示的是 ( )。 （ A） -5 （ B） 25 （ C） 1 （ D） -1 8 如果准备读文件，打开顺序文件 ”text.dat”的正确语句是 ( )。 （ A） Open“text.dat“For Write As#1 （ B） Open“text.dat“For Binary As#
7、1 （ C） Open“text.dat“For Input As#1 （ D） Open“text.dat“For Random As#1 9 以下程序段执行后整型变量 n的值为 ( )。 n=0 For i=1 to 20 Step 5 n=n+1 Next i （ A） 50 （ B） 4 （ C） 15 （ D） 210 10 假定有如下的 Sub过程： Sub S(x As Single,y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a
8、 As Single Dim b As Single a=5 b=2 S a,b print a,b End Sub 程序运行后，单击命令按钮，输出结果是 ( )。 （ A） 5 2 （ B） 1 1 （ C） 1.25 4 （ D） 2.5 1 11 下列程序段的执行结果为 ( )。 A=0:B=1 A=A+B:B=A+B:Print A:B A=A+B:B=A+B:PrintA:B A=A+B:B=A+B:PrintA:B （ A） 1 2 3 5 8 13 （ B） 1 1 3 5 8 13 （ C） 1 3 3 4 8 1 （ D） 1 2 5 6 12 在窗体上绘制一个命令按钮，其名
9、称为 Command1，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer,x As Integer For i_1 T0 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） 9 （ B） 6 （ C） 12 （ D） 15 13 设已经在菜单编辑器中设 计了窗体的快捷菜单，某顶级菜单为 a1，且取消其“可见 ”属性。运行时，以下 ( )事件过程可以使快捷菜单的菜单项响
10、应鼠标左键单击和右键单击。 （ A） Private Sub Form_Mouse Down(Button As Integer,Shift As Integer,_X As Single,Y As Single) If Button=2 Then PopupMenu a1,2 End Sub （ B） Private Sub Form Mouse Down(Button As Integer,Shift As Integer,_X As Single,Y As Single) PopupMenu a1,0 End Sub （ C） Private Sub Form_Mouse Down(Bu
11、tton As Imeger,Shift As Integer,_X As Single,Y As Single) PopupMenu a1 End Sub （ D） Private Sub Form_Mouse Down(Button As Integer,Shift As Integer,_X As Single,Y As Single) If (Button=vbLetfButton)Or(Button=vbRightButton)Then PopupMenu a1 End Sub 14 运行以下程序后，打印机上的输出结果是 ( )。 For I=To 9 Printer.Print t
12、ab(I*I),I Next （ A） 12345678*9 9 （ B） 12345678 （ C） 12345 6789 （ D） 1 2 3 4 5 6 7 8 9 15 下列程序的运行结果是 ( )。 s=0:t=0:u=0 For x=1 To 3 For y=1 To x For z=y To 3 s=s+1 Next z t=t+1 Next y u=u+1 Next x Print s;t;u （ A） 3 6 14 （ B） 14 6 3 （ C） 14 3 6 （ D） 16 4 3 16 执行下列语句后整型变量 a的值是 ( )。 If(3-2) 2 Then a=10
13、Else If(10/2)=6 Then a=20 Else a=30 End If （ A） 10 （ B） 20 （ C） 30 （ D）不确定 17 执行以下 Commaand1的 Click事件过程在窗体上显示 ( )。 Option Base 0 Prinvate Sub Command1_Clcik() Dim a a=Array(“a“,“b“,“C“,“d“,“e“,“f“,“g“) Print a(1);a(3);a(5) End Sub （ A） abc （ B） bdf （ C） ace （ D）出错 18 为组合框 Combo1增加一个数据项 “计算机 ”，下列命令正确
14、的是（ ）。 （ A） Combo1.Text=“计算机 “ （ B） Combo1.ListIndex=“计算机 “ （ C） Combo1.AddItem“计算机 “ （ D） Combo1.ListCount=“计 算机 “ 19 可决定窗体左上角是否有控制菜单的属性是（ ）。 （ A） ControlBox （ B） MinButton （ C） MaxButton （ D） BorderStyle 20 下列选项中不属于软件生命周期开发阶段任务的是（ ）： （ A）软件测试 （ B）概要设计 （ C）软件维护 （ D）详细设计 21 以下叙述中正确的是（ ）。 （ A）窗体的 Nam
15、e属性指定窗体的名称，用来标识一个窗体 （ B）窗体的 Name属性值是显示在窗体标题栏中的文本 （ C）可以在运行期间改变窗体的 Name属性的值 （ D）商体的 Name属性值可以为空 22 如果希望定时器控件每秒产生 10个事件，则要将 Interval属性的值设为（ ）。 （ A） 100 （ B） 200 （ C） 300 （ D） 400 23 如果 x是一个正的实数，将千分位四舍五入，保留两位小数的表达式是（ ）。 （ A） 0.01*Int(X+0.05) （ B） 0.01*Int(X+0.005)*100) （ C） 0.01*Int(100*(X+0.05) （ D） 0
16、.01*Int(X+0.005) 24 表达式 String(2,“Shanghai“)的值是（ ）。 （ A） Sh （ B） Shanghai （ C） ShanghaiShanghai （ D） SS 25 要使文本框可输入多行文字，要更改的默认选项是（ ）。 （ A） SorollBoars和 MultiLine （ B） Visible （ C） ScrillBoars （ D）以上都不是 26 在运行程序时，在文本框中输入新的内容，或在程序代码中改变 Text的属性值，相应会触发到（ ）事 件。 （ A） GotFocus （ B） Crick （ C） Change （ D） D
17、blClick 27 表达式 Int(Rnd(0)+1)+Int(Rnd(1)-1)的值为（ ）。 （ A） 1 （ B） 0 （ C） -1 （ D） 2 28 在 4个字符 “D”， “z”， “A”， “9”中，其 ASCII码值最大的是（ ）。 （ A） “D” （ B） “z” （ C） “A” （ D） “9” 29 以下叙述中错误的是（ ）。 （ A）打开一个工程文件时，系统自动装入与该工程有关的窗体、标 准模块等文件 （ B）当程序运行时，双击一个窗体，则触发该窗体的 DblClick事件 （ C） Visual Basic应用程序只能以解释方式执行 （ D）事件可以由用户引发
18、，也可以由系统引发 30 inputBox函数返回值的类型为（ ）。 （ A）数值 （ B）字符串 （ C）变体 （ D）数值或字符串 (视输入的数据而定 ) 31 窗体上建立了一个名为 CormnonDialong1 的通用对话框，用下面的语句建立一个对话框： CommonDialong1.action=2则以下语句与之等价的是（ ）。 （ A） CommonDialon1.ShowOpen （ B） CommonDialog1.ShowSave （ C） CommonDialog1.ShowColor （ D） CommonDialog1.ShowFont 32 下面叙述中不正确的是（ ）
19、。 （ A）若使用 write样语句将数据输出到文件，则各数据项之间自动插入逗号，并且将字符串加上双引号 （ B）若使用 Print#语句将数据输出到文件，则各数据项之间没有逗号分隔，且字符串不加双引号 （ C） Write#语句和 Print#语句建立的顺序文件格式完全一样 （ D） Write#语句和 Print#语句均实现向文件写入数据 33 如果要将窗体中的某个命令按钮设置成无效状态，应该设置命令按钮的（ ）属性。 （ A） Value （ B） Visible （ C） Enabled （ D） Default 34 能触发滚动条 Scorll事件的操作是（ ）。 （ A）拖动滚动条
20、中滑块 （ B）单击滚动条中滑块 （ C）单击滚动条两端箭头 （ D）单击箭头与滑块之间的滚动条 35 下列语句的输出结果是 _。 Print Format$(1258.6， “000,000.00“) 36 刚建立工程时，使窗体上的所有控件具有区别于默认值的相同的字体格式，应对 _ 的 _ 属性进行设置。 37 下列程序的功能是：当 x 50时， y=0.8x；当 50x100时， y=0.7x；当 x100时，没有意义。请填空。 Private Sub Command1_Click() Dim x As Single x=InputBox(“请输入 x的值 !“) Select Case
21、x Case Is 50 y=0.8*x Case 50 To 100 y=0.7*x _ Print“输入的数据出界 !“ End Select Print x,y End Sub 38 已知数组 A(4,4)，各个元素在运行程序时被赋值并打印，形成四除非方阵。请在 _和 _处填入所需的内容，使产生一个转置矩阵 (即行列互换 )，仍放在数组 A中，并打印出来。例如： 1 2 3 4 1 2 3 4 1 2 3 4 1 2 3 4 1 1 1 1 2 2 2 2 3 3 3 3 4 4 4 4 Private Sub Command1_Click() Dim a(4,4) For k=1 To
22、 4 For j=1 To 4 a(k,j)=j Print a(k,j)； Next Print Next For k=2 To 4 For j=1 To _ t=a(j,k) a(j,k)= _ a(k,j)=t Next Next For k=1 To 4 Print a(k,1)； a(k,2)； a(k,3)； a(k,4) Next End Sub 39 有如下程序： Private Sub command1_Click() a=1:b=1 Print“a=“;a;“,b=“;b Call mult(a),b) Print“a=“;a;“;b=“;b 语句 End Sub Sub
23、mult(x,y) x=2*k y=3*k Print“x=“;x;“,y=“;y End Sub 运行后，标有 “语句 ”的 Print语句的输出结果是 _。 40 长度为 n的顺序存储线性表中，当在任何位置上插入一个元素概率都相等时，插入一个元素所需移动元素的平均个数为 _。 41 数据结构分为线性结构和非线性结构，带链的队列属于 _。 42 软件工程研究的内容主要包括 _技术和软件工程管理。 43 常用的黑箱测试有等价分类法、 _、因果图法和错误推测法 4种。 44 数据库保护分为安全性控制、 _、并发性控制和数据的恢复。 45 表达式 2*42-2*6/3+32的值是 _。 46 建立
24、控件时系统自动给控件一个名称，第一个建立的命令按钮名称是 _。 47 软件设计模块化的目的是 _。 VB 笔试模拟试卷 217答案与解析 1 【正确答案】 C 2 【正确答案】 C 3 【正确答案】 B 4 【正确答案】 A 5 【正确答案】 C 6 【正确答案】 B 7 【正确答案】 C 8 【正确答案】 C 9 【正确答案】 B 10 【正确答案】 D 11 【正确答案】 A 12 【正确答案】 A 13 【正确答案】 A 14 【正确答案】 D 15 【正确答案】 B 16 【正确答案】 C 17 【正确答案】 B 18 【正确答案】 C 19 【正确答案】 A 20 【正确答案】 C
25、21 【正确答案】 A 22 【正确答案】 A 23 【正确答案】 B 24 【正确答案】 D 25 【正确答案】 A 26 【正确答案】 C 27 【正确答案】 B 28 【正确答案】 B 29 【正确答案】 C 30 【正确答案】 B 31 【正确答案】 B 32 【正确答案】 C 33 【正确答案】 C 34 【正确答案】 A 35 【正确答案】 001,258.60 【试题解析 】 命题目的 考查 Format函数的使用方法。 解题要点 Format$()为格式输出函数，格式为： Format$(数值表达式， “格式字符串 ”) 其功能是：按 “格式字符串 ”指定的格式输出 “数值表达
26、式 ”的值。如果省略了 “格式字符串 ”，则把 “数值表达式 ”的值转换为一个字符串原样输出。在本题中，1258.6将按 000,000.00的格式输出，即输出结果为： 001,258.60。 考点链接 内部函数的使用方法。 36 【正确答案】 Form窗体 font 【试题解析 】 考查考生对 Visual Basic 基础知识的掌握情况。 解题要点 通过对窗体的 font属性设置，使窗体上所有控件具有区别于默认值的相同的字体格式。 考点链接 Visual Basic基础知识。 37 【正确答案】 Case Else 【试题解析】 命题目的 考查考生对多分支控制结构的掌握。 解题要点 阅读程
27、序后，在 Select case结构中，只有两个 Case子句，分别表示x取值的两种情况，但题目中将 x的值分为 3种情况，空白处应该填写 case Else语句。 错解分析 嵌套使用多分支控制结构时，应注意程序执行过程。 考点链接 Select CaseEnd Select 多分支结构语句应用。 38 【正确答案】 a a(k,j) 39 【正确答案】 a=1， b=3 【试题解析】 考查考生对参数传递的掌握情况。 解题要点 在 Visual Basic 语言中，虚实结合有值传递方式和地址传递方式，实参为常量或表达式，是值传递方式，这种传递是单向的。实参为变量，是地址传递方式，这种传递是双向
28、的，在调用子程序时，形参的值如果改变 了，会通过实参带回主程序。本题中，第 1个实参变量 a用括弧括起来，采用的是值传递方式；第 2个实参数变量 b 没用括弧括起来，采用的是地址传递方式。在调用子程序后，第 1个实参 a的值为 1，不管在子程序中是否被重新赋值，返回调用程序，保留调用前的值仍为 1；第 2个实参数 b的值为 1，在子程序中被重新赋值为 3，返回调用程序就不再保留调用前的值，而是带回了形参的值 3。因此，在标有 “语句 ”的 Print语句中的输出项为 a=1， b=3。 错解分析 参数的传值方式和传址方式的区别。 考点链接 函数调用和参数传递。 40 【正确答案】 n/2 41 【正确答案】 线性结构 42 【正确答案】 软件开发 43 【正确答案】 边值分析法 44 【正确答案】 完整性控制 45 【正确答案】 29 46 【正确答案】 Commandl 47 【正确答案】 降低复杂性
