[计算机类试卷]VB笔试模拟试卷253及答案与解析.doc
《[计算机类试卷]VB笔试模拟试卷253及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]VB笔试模拟试卷253及答案与解析.doc(23页珍藏版)》请在麦多课文档分享上搜索。
1、VB 笔试模拟试卷 253及答案与解析 1 模块独立性是软件模块化所提出的要求 ,衡量模块独立性的度量标准则是模块的 ( A)抽象和信息隐蔽 ( B)局部化和封装化 ( C)内聚性和耦合性 ( D)激活机制和控制方法 2 为了在列表框中使用 Ctrl和 Shift键进行多个列表项的选择,应将列表框的Multi-select属性设置为 ( A) 0 ( B) 1 ( C) 2 ( D) 3 3 MsgBox函数用于显示提示信息,关于函数返回值的说明正确的是( )。 ( A)函数的返回值是提示信息的数据类 型 ( B)函数的返回值是提示信息的数据长度 ( C)函数的返回值是整数,指示按下哪个按钮
2、( D)函数的返回值是符号常量,指示按下哪个按钮 4 有两个关系 R和 S如下:则由关系 R得到关系 S的操作是 ( )。( A)选择 ( B)投影 ( C)自然连接 ( D)并 5 对于不同的对象有不同的属性,但所有对象都共同拥有的属性是 _。 ( A) Picture ( B) Caption ( C) Name ( D) Lcon 6 为用户与数据库系统提供接口的语言是 ( A)高级语言 ( B)数据定义语 言 (DDL) ( C)数据操纵语言 (DML) ( D)汇编语言 7 在下列几种排序方法中,要求内存量最大的是 _。 ( A)插入排序 ( B)选择排序 ( C)快速排序 ( D)
3、归并排序 8 对建立良好的程序设计风格,描述正确的是 ( A)程序应简单、清晰、可读性好 ( B)符号名的命名只要符合语法即可 ( C)充分考虑程序的执行效率 ( D)程序的注释可有可无 9 以下关于图片框控件的说法中,错误的是 ( A) 可以通过 Print方法在图片框中输出文本 ( B)清空图片框控件中图形的 方法之一是加载一个空图形 ( C)图片框控件可以作为容器使用 ( D)用 Stretch属性可以自动调整图片框中图形的大小 10 一个栈的初始状态为空。现将元索 1、 2、 3、 4、 5、 A、 B、 c、 D、 E依次入栈,然后再依次出栈,则元素出栈的顺序是 ( A) 12345
4、ABCDE ( B) EDCBA54321 ( C) ABCDEl2345 ( D) 54321EDCBA 11 阅读程序 : 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 To 2 arr(i,j)=i*2+j Next Next ReDim Preserve arr(3,4) For j=3 To 4 arr(3,j)=j+9 Next Print arr(3,2)+arr(3,
5、4) End Sub 程序运行后 ,单击窗体 ,输出结果为 ( A) 21 ( B) 13 ( C) 8 ( D) 25 12 在窗体上画一个名称为 TxtA的文本框,然后编写如下的事件过程: Private Sub TxtA_KeyPress(Keyascii as integer) End Sub 若焦点位于文本框中,则能够触发 KeyPress事件的操作是 ( A)单击鼠标 ( B)双击文本框 ( C)鼠标滑过文本框 ( D)按下键盘上的某个键 13 Visual Basic为命令按钮提供的 Cancel属性是 ( )。 ( A)用来指定命令按钮是否为窗体的 “取消 ”按钮 ( B)用来
6、指定命令按钮的功能是停止一个运行程序 ( C)用来指定命令按钮的功能是关闭一个运行程序 ( D)用来指定命令按钮的功能是中断一个程序的运行 14 在文本框中输入密码时,要求在文本框中只显示 (*)号,则应当设置此文本框的( )属性。 ( A) Text ( B) Caption ( C) Password ( D) PasswordChar 15 在新建一个 VB工程时,将新建窗体的 Name属性设置为 TheFirst,则默认的窗体文件名为 ( )。 ( A) Form1 frm ( B)工程 1 frm ( C) TheFirst frm ( D) Form1 vbp 16 下面程序运行时
7、,若输入 395,则输出结果是 ( )。 Private Sub Cmdl_Click() Dim a a=InputBox(“请输入一个 3位整数 ”) Print a Mod 10, a 100, (a Mod 100) 10 End Sub ( A) 5 9 3 ( B) 3 5 9 ( C) 5 3 9 ( D) 3 9 5 17 已知 a=5, b=8, c=12,下列表达式的值为 True的是 ( )。 ( A) a b And c a ( B) a b Or c a ( C) a b Xor c a ( D) a b Eqv c a 18 以下能够触发文本框 Change事件的操
8、作是 ( A)文本框失去焦点 ( B)文本框获得焦点 ( C)设置文本框的焦点 ( D)改变文本框的内容 19 下面数组说明语句错误的是 _。 ( A) Dim b(-10)As Double ( B) Dim c(8, 3)As Byte ( C) Dim d(-10 To-1)As Boolean ( D) Dim e(-99 To-5, -3 To 0) 20 在窗体上画一个文体框 (其 Name属性为 Text1),然后编写如下事件姓程; Private Sub Fom_Load() Text1.Text=“ Text1.SetFocus For i=1 To 10 Stun=Stun
9、 +i Next i Text1.Text=Sum End Sub 上述程序的运行结果是_。 ( A)在文本框 Text1中输出 55 ( B)在文本框 Tece1 中输出 0 ( C)出错 ( D)在文本框 Text1中输出不定值 21 下列程序的执行结果为 _。 Private sub Command1_ Click ( ) a = 100 b = 50 if a b then a = a + b Else b = b -a Print a, bEnd Sub ( A) 50 50 ( B) 150 50 ( C) 200 200 ( D) 10 10 22 若要在图片框中绘制一个椭圆,使
10、用的方法是 _。 ( A) Circle ( B) Line ( C) Point ( D) Pset 23 假定窗体上有一个文本框,名为 Txt1,为了使文本框的内容能够操作,并且具有水平和垂直滚动条,正确的属性设置为 ( ) ( A) Txt1. MultiLine=True Txt1. SerollBars=0 ( B) Txt1. MultiLine=True Txtl. SerollBars=3 ( C) Txt1. MultiLine=False Txt1.ScrollBars=0 ( D) Txtl. MultiLine=False Txt1.ScrollBars=3 24 在参
11、数传递过程中,使用关键字来修饰参数,可以使之按值传递,此关键字是( ) ( A) ByVal ( B) Byref ( C) Value ( D) Reference 25 设有如下程序: Private Sub Command1_Click() Dim sum As Double, x As Double sum=0 n=0 For i=1 To 5 x=n/i n=n+1 sum=sum+x Next End Sub 该程序通过 For循环计算一个表达式的值,这个表达式是 _。 ( A) 1+1/2+2/3/4+4/5 ( B) 1+1/2+2/3+3/4 ( C) 1/2+2/3+3/4
12、+4/5 ( D) 1+1/2+1/3+1/4+1/5 26 在窗体上画一个 命令按钮,然后编写如下代码: Private Type Record ID As Integer Name As String*20 End Type Private Sub Command1_Click() Dim MaxSize.NextChar, MyChar Open“D:tempfemale.txt“For Input As #1 MaxSize=LOF(1) For NextChar=1 To MaxSize Seek#1, NextChar MyChar=Input(1, #1) Next NextCh
13、ar Print EOF(1) Close #1 End Sub 程序运行后,单击命令按钮,其输出结果为 _。 ( A) True ( B) False ( C) 0 ( D) Null 27 程序运行后,在窗体上单击鼠标,此时窗体不会接收到的事件是 _。 ( A) MouseDown ( B) MouseUp ( C) Load ( D) Click 28 以下定义数组或给数组元素赋值的语句中,正确的是 ( A) Dim x%(2) x(1)=“等级考试 “ ( B) Dim x(3), y(3)As Integer x(0)=1: y=x ( C) Dim x x=Array(0, 1,
14、2) ( D) Dim x(3)As Integer x=Array(0, 1, 2) 29 要利用通用对话框控件来显示 “保存文件 ”对话框,需要调用控件的 _ 方法。 ( A) ShowPrinter ( B) ShowOpen ( C) ShowSave ( D) ShowColor 30 在 Visual Basic的集成开发环境中不能执行程序的方法是 _。 ( A)按 F8键 ( B)按 F5键 ( C)按 F9键 ( D)按 Shift+F8 31 在使用应用程序时,常常用作在单击时执行指定的操作的控件是 ( A)命令按钮 ( B)图片框 ( C)复选框 ( D)单选按钮 32 下
15、列语句的输出结果为 Print Format (100036, “000, 000 000”) ( A) 10, 009 36 ( B) 10, 009 360 ( C) 10, 009 3 ( D) 010, 009 360 33 以下叙述中错误的是 _。 ( A)在程序运行时,通用对话框控件是不可见的 ( B)调用同 个通用对话框控件的不同方法 (如 ShowOpen或 ShowSave)可以打开不同的对话框窗口 ( C)调用通用对话框控件的 ShowOpen方法,能够直接打开在该通用对话框中指定的文件 ( D)调用通用对话框控件的 ShowColor方法,可以打开颜色对话框窗口 34 在
16、窗体上画一个命令按 钮,其名称为 Commandl,然后编写如下事件过程: Private Sub Commandl_Click() Dim al(4,4),a2(4,4) Dim i As Integer,j As Integer 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 al(3,3);a2(3,3) End Sub 程序运行后,单击命令按钮,在窗体上输出的是 _。 ( A) 6 6 ( B) 10 5 ( C) 7 21 ( D) 6 12 35 设窗体的名称为 Form1,
17、标题为 Win,则窗体的 MouseDown事件过程的过程名是 ( A) Form1_MouseDown ( B) Win_MouseDown ( C) Form_MouseDown ( D) MouseDown_Form1 36 在关系模型中 ,把数据看成一个二维表 ,每一个二维表称为一个【 】。 37 在窗体上画一个文本框 (其 Name属性为 Text1),编写如下事件过程,运行结果是 _。 Private Sub Form_Load( ) Text1.Text=“ “ Text1.SetFocus For i=1 To 10 Sum=Sum+i Next i Text1.Text=Su
18、m End Sub 38 数据结构分为线性结构和非线性结构,带链的队列属于 _。 39 数据管理技术发展过程经过人工管理、文件系统和数据库系统 3个阶段,其中数据独立性最高的阶段是【 】。 40 软件危机出现于 60年代末,为了解决软件危机,人们提出了【 】的原理来设计软件,这就是软件工程诞生的基础。 41 在窗体上画一个名称为 Text1的文本框,然后画三个单选按钮,并用这三个单选按钮建立一个控件数组,名称为 Option1.程序运行后,如果单击某个单选按钮,则文本框中的字体将根据所选择的单选按钮切换,如图所示,请填空。Private Sub Optionl_click(Index AS I
19、nteger) Select Case Index Case0 a=“宋体 ” Case 1 a=“黑体 ” Case2 42 下面运行程序后 ,单击命令按钮 ,输出的结果是 【 】 。 Private Sub Command1_Click() Dim a%(1 To 5),i%, s# For i=1 To 5 a(i)=i Next s=Fun(a) Print “s=“; s; End Sub Function Fun(a() As Integer) Dim t#, i% t=1 For i=LBound(a) To UBound(a) Next Fun=t End Function 4
20、3 要想在文本框中显示垂直滚动条,必须把 _属性设置为 2,同时还应把Mulfiline属性设置为 True。 44 控件数组的名字由【 】属性指定,而数组中的每个元素由【 】属性指定。 45 如果在立即窗口中执行以下操作 a=8 b=9 print (a b); 则输出结果为 _。 46 以下程序的功能是:求 x的 y次方。根据题意,请完善下列程序。 Private Function funl(x As Double, y As Integer)As Double Dim i As Integer Dim z As Double z=【 】 For i=1 To y z=z*x Next i
21、 【 】 End Function Private Sub Command1_Click() Dim m As Double Dim n As Integer Dim t As Double m=InputBox(“输入 x数 :“) n=InputBox(“输入次方数 :“) t=funl(m, n) Print Str(m)+“+Str(n)+“=“;【 】 End Sub 47 执行下面的程序段后, S的值为【 】。 s=5 For i=2.6 To 9Step0.6 S=s+1 Next i 48 程序执行结果 s的值是【 】。 Private Sub sub1(Byval p As
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 VB 笔试 模拟 253 答案 解析 DOC
