[计算机类试卷]VB笔试模拟试卷217及答案与解析.doc
《[计算机类试卷]VB笔试模拟试卷217及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]VB笔试模拟试卷217及答案与解析.doc(17页珍藏版)》请在麦多课文档分享上搜索。
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
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 VB 笔试 模拟 217 答案 解析 DOC
