[计算机类试卷]VB笔试模拟试卷2及答案与解析.doc
《[计算机类试卷]VB笔试模拟试卷2及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]VB笔试模拟试卷2及答案与解析.doc(24页珍藏版)》请在麦多课文档分享上搜索。
1、VB 笔试模拟试卷 2及答案与解析 1 下列叙述中正确的是 ( A)线性表是线性结构 ( B)栈与队列是非线性结构 ( C)线性链表是非线性结构 ( D)二叉树是线性结构 2 非空的循环单链表 head的尾结点 (由 p所指向 ),满足 ( A) p - next=NULL ( B) p=NULL ( C) p - next=head ( D) p=head 3 已知数据表 A中每个元素距其最终位置不远,为节省时间,应采用的算法是 ( A)堆排序 ( B)直接插入排序 ( C)快速排序 ( D)直接选择排序 4 对建立良好的程序设计风格,下面描述正确的是 ( A)程序应简单、清晰、可读性好 (
2、 B)符号名的命名只要符合语法 ( C)充分考虑程序的执行效率 ( D)程序的注释可有可无 5 下列不属于结构化分析的常用工具的是 ( A)数据流图 ( B)数据字典 ( C)判定树 ( D) PAD图 6 在软件生产过程中,需求信息的给出是 ( A)程序员 ( B)项目管理者 ( C)软件分析设计人员 ( D)软件用户 7 下列工具中为需求分析常用工具的是 ( A) PAD ( B) PFD ( C) N-S ( D) DFD 8 NULL是指 ( A) 0 ( B)空格 ( C)未知的值或无任何值 ( D)空字符串 9 数据库的故障恢复一般是由 ( A)数据流图完成的 ( B)数据字典完成
3、的 ( C) DBA完成的 ( D) PAD图完成的 10 下列说法中,不属于数据模型所描述的内容的是 ( A)数据结构 ( B)数据操作 ( C)数据查询 ( D)数据约束 11 下列说法正确的是 ( A)对象的可见性可设为 True或 False ( B)标题的属性值不可设为任何文本 ( C)属性窗口中属性只能按字母顺序 排列 ( D)某些属性的值可以跳过不设置,自动设为空值 12 下列关于退出 Visual Basic系统的方法的描述错误的是 ( A)打开 Visual Basic主窗体的 “文件 ”菜单,执行其中的 “退出 ”命令 ( B)按快捷键 Alt+Q退出 ( C)单击 Vis
4、ual Basic主窗体右上角的 “关闭 ”按钮 ( D)按快捷键 Alt+E退出 13 单击窗体上的关闭按钮时,触发的事件是 ( A) Form_Initialize ( ) ( B) Form_Load ( ) ( C) Form_Unload ( ) ( D) Form_Click ( ) 14 在代码编辑器中,续行符是用来换行书写同一个语句的符号,用以表示续行符的是 ( A)一个空格加一个下划线 “_” ( B)一个下划线 “_” ( C)一个造字符 “_” ( D)一个空格加一个连字符 “-” 15 为了暂时关闭计时器,应把该计时器控件的哪个属性设置为 False? ( A) Vis
5、ible ( B) Timer ( C) Enabled ( D) Interval 16 以下关于 Visual Basic数据类型的说法,不恰当的是 ( A) Visual Basic 6 0提供的数据类型主要有字符串型和数值型,此外还有字节、货币、对象、日期、布尔和变体数据类型等 ( B)目前 Decimal数据类型只能在变体类型中使用 ( C)用户不能定义自己的数据类型 ( D)布尔型数据只能取两种值,用两个字节存储 17 以下各项,可以作为 Visual Basic变量名的是 ( A) Book ( B) 2_Seek ( C) 123 58 ( D) Book-1 18 表达式 (
6、3/2+1)*(5/2+2)的值是 ( A) 25 ( B) 3 ( C) 6 125 ( D) 4 19 关于自定义对话框概念的说明,错误的是 ( A)建立自定义对话框时必须执行添加窗体的操作 ( B)自定义对话框实际上是 VB的窗体 ( C)在窗体上还要使用其他控件才能组成自定义对话框 ( D)自定义对话框不一定要有与之对应的事件过程 20 下面 Change事件过程中,文本框控件 Text1用来接收数字字符的输入,该事件过程的作用是 Private Sub Text1_Change ( ) TextText=Str(28* Val(Text1 Text) End Sub ( A)将在文本
7、框 Text1输入 的数字变为数值 ( B)将在文本框 Text1输入的数字作为半径,求圆的周长并转换为字符串 ( C)只要 Text1中的内容一改变, Text2中显示的圆周长也随之改变 ( D)事件过程中的 Val函数和 Str函数使用错误,事件过程不能执行 21 用什么语句可以选择指定的表项或取消已选择的表项 ? ( A)列表框 Selected(索引值 ) ( B)列表框名 Selected(索引值 )=True|False ( C)列表框 Selected ( D)列表框名 Selected=True|False 22 用于 将屏幕上的对象分组的控件是 ( A)列表框 ( B)组合框
8、 ( C)标签 ( D)框架 23 以下说法不正确的是 ( A)使用 ReDim语句可以改变数组的维数 ( B)使用 ReDim语句可以改变数组的类型 ( C)使用 ReDim语句可以改变数组的每一维的大小 ( D)使用 ReDim语句可以改变对数组中的所有元素进行初始化 24 有如下事件过程: Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) If(Button And 3)=3 Then Print“OK“ End If End Sub 程序运行后,为了在窗体上输出 “OK”,应当按下的鼠标键是 ( A)左键 (
9、B)右键 ( C)同时按下左键和右键 ( D)按什么都不显示 25 在窗体上画一个名称为 CommonDialog1 的通用对话框,一个名称为 Command1的命令按钮,要求单击命令按钮时,打开一个保存文件的对话框,该窗口的标题为“Save”,缺省文件名称为 “SaveFile”,在 “文件类型 ”栏中显示 *txt,则能够满足上述要求的程序是 ( A) Private Sub Command1_Click ( ) CommonDialog1 FileName=“SaveFile“ CommonDialog1 Filter=“AllFiles|*.*|(*.txt)|*.txt|(*.doC
10、)|*.doc“ CommonDialog1 FilterIndex=2 CommonDialog1 DialogTitle=“Save“ CommonDialog1 Action=2 End Sub ( B) Private Sub Command1_Click ( ) CommonDialog1 FileName=“SaveFile“ CommonDialog1 Filter=“AllFiles|*.*|(*.txt)|*.txt|(*.do C)|*.doc“ CommonDialog1 FilterIndex=1 CommonDialog1 DialogTitle=“Save“ Com
11、monDialog1 Action=2 End Sub ( C) Private Sub Command1 Click ( ) CommonDialog1 FileName=“Save“ CommonDialog1 Filter=“AllFiles|*.*|(*.txt)|*.txt|(*.do C)|*.doc“ CommonDialog1 FilterIndex=2 CommonDialog1 DialogTitle=“SaveFile“ CommonDialog1 Action=2 End Sub ( D) Private Sub Command1 Click ( ) CommonDia
12、log1 FileName=“SaveFile“ CommonDialog1 Filter=“AllFiles|*.*|(*.txt)|*.txt|(*.do C)|*.doc“ CommonDialogl.FilterIndex=1 CommonDialog1.DialogTitle=“Save“ CommonDialog1 Action=1 End Sub 26 阅读下面的程序段: For a=1 To 2 For b=1 To a For C=b To 2 I=I + 1 Next NextNextPrint I执行上面的三重循环后, I的值为 ( A) 4 ( B) 5 ( C) 6
13、( D) 9 27 设有下面的循环: i= While i =1 i=i + 3 Print i Wend则运行后的输出结果是 ( A) 1 ( B) 2 ( C) 3 ( D) 4 28 设有下面的循环: i=1 Do i=i + 3 Print i Loop Until I_ 程序运行后要执行 3次循环体,则条件中 I的最小值为 ( A) 6 ( B) 7 ( C) 8 ( D) 9 29 执行以下语句过程,在窗体上显示的内容是 Option Base 0 Private Sub Command3_Click( ) Dim d d=Array(“a“, “b“, “c“, “d“) Pri
14、nt d(1); d(3) End Sub ( A) ab ( B) bd ( C) ac ( D)出错 30 下列程序段,在运行时最早输出的内容是 a=2 c=1 AAA: c=c + a If c 10 Then Print c GoTo AAA Else Print“10以内的奇数显示完毕。 “ End If ( A) 3 ( B) 7 ( C) 9 ( D) 6 31 有如下程序段: Private Sub Command1_Click( ) Dim a As Integer a=2 For i=1 To 3 Print G(A)Next iEnd SubFunction G(a As
15、 Integer) b=0 Static c b=b + 1 c=c + 1 G=a + b + cEnd Function运行上面的程序后,单击命令按钮,输出结果为 ( A) 1 2 3 ( B) 2 3 4 ( C) 4 5 6 ( D) 1 4 6 32 单击命令按钮时,下列程序的运行结果为 Private Sub Command1_Click( ) Print MyBM(23, 18)End SubPublic Function MyBM(m As Integer, n As Integer)As Integer Do While mn Do While m n: m=m - n: L
16、oop Do While m n: n=n - m: Loop Loop MyBM=mEnd Function ( A) 0 ( B) 1 ( C) 3 ( D) 5 33 有如下的程序: Private Sub Command1_Click( ) Dim k As Integer, m As Integer Dim P As Integer k=4: m=1 P=Pid(k, m) : Print P; P=Pid(k, m) : Print PEnd SubPrivate Function Pid(a As Integer, b As Integer) Static m As Intege
17、r, i As Integer m=5: i=2 i=i + m + 1 m=i + a + b Pid=m2End Function单击命令按钮后,输出结果为 ( A) 2 2 ( B) 4 4 ( C) 5 5 ( D) 6 6 34 下面 4个 CT函数中是用来判断用户输入的数是否为奇数的,是奇数的返回 1,否则返回 0,其中正确的是 ( A) Function CT(ByVal a As Integer) If a Mod 2=0 Then Return 0 ElSe Return 1 End if End Function ( B) Function CT(ByVal a As In
18、teger) If a Mod 2=0 Then CT=0 Else CT=1 End if End Function ( C) Function CT(ByVal a As Integer) If a Mod 2=0 Then CT=1 Else CT=0 End if End Function ( D) Function CT(ByVal a As Integer) If a Mod 2=0 Then Return 1 Else Return 0 End if End Function 35 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Clic
19、k( ) Dim m As Integer, n As Integer, p As Integer m=3: n=5:p=O Call Y(m, n, p) Print Str(p)End SubSub Y(ByVal i As Integer, ByVal j As Integer, k As Integer) k=i + jEnd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是 ( A) 4 ( B) 6 ( C) 8 ( D) 10 36 数据的逻辑结构有线性结构和【 】两大类。 37 顺序存储方法是把逻辑上相邻的结点存储在物理位置【 】的存储单元中。 38 一个类可以从直接
20、或间接的祖先中继承所有属性和方法。采用这个方法提高了软件的【 】。 39 软件工程研究的内容主要包括:【 】技术和软件工程管 理。 40 关系操作的特点是【 】操作。 41 用户可以用【 】语句定义自己的数据类型。 42 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() x=0 Do Until x=-1 a=lnputBox(“请输入第一个数字 a的值 “) a=Val(A0 b=InputBox(“请输入第二个数字 b的值 “) b=Val(B) x=InputBox(“请输入第三个数字 x的值 “) x=Val(x) a=a+b+x
21、 Loop Print a End Sub 在程序运行后,单击命令按钮,在对话框中分别输入 5, 4, 8, 5, 8, -1,输出结果为【 】。 43 下列程序是判断一个整数 (=3)是否为素数,请补充完整。 Dim n As Integer n=InputBox(“请输入一个整数 (=3)“) k=Int(Sqr(n) i=2 swit=0 While i=k And swit=0 If n Mod i=0 Then 【 】 Else 【 】 End If Wend If swit=0 Then Print n; “是一个素数。 “ Else Print n; “不是一个素数。 “ End
22、 If 44 下面程序是用来打印九九乘法表的,请补充完整。 Dim i As Integer, j As Integer, Strl$ Strl=“ “ For i=1 To 9 Forj=1 To 9 If【 】 Then Strl=Strl + Str$(j)+“X“+Str$(i)+“=“+Str$(Val(i * j) Else Strl=Strl & Chr(13) 【 】 End If Next j Next i Print Str 45 下面程序的功能是产生 10个小于 100(不含 100)的随机正整数,并统计其中 5的倍数所 占比例,但程序不完整,请补充完整。 Sub PR(
23、 ) Randomize Dim a(10) For j=1 To 10 a(i)=Int(【 】 ) If【 】 Then k=k+1 Print a(j) Next j Print Print k/10 End Sub 46 请填写下列空白,以实现运行后形成一个主对角线上元素值为 1,其他元素为 0的 66阶 矩阵。 Private Sub Command1 Click() Dim s(6, 6) For i=1 To 6 For j=1 To 6 If i=j Then 【 】 Else 【 】 End If Print【 】 Next j Print Next i End Sub VB
24、 笔试模拟试卷 2答案与解析 1 【正确答案】 A 【试题解析】 线性表是一种线性结构,数据元素在线性表中的位置只取决于它们自己的序号,即数据元素之间的相对位置是线性的;栈、队列、线性链表实际上也是线性表,故也是线性结构;树是一种简单的非线性结构。 2 【正确答案】 C 【试题解析】 循环链表就是将链表的 最后一个结点指向链表头结点 (或第一个结点 ),目 pp- next=head。 3 【正确答案】 B 【试题解析】 当数据表 A中每个元素距其最终位置不远,说明数据表 A按关键字值基本有序,在待排序序列基本有序的情况下,采用插入排序所用时间最少,故答案为选项 B。 4 【正确答案】 A 【
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 VB 笔试 模拟 答案 解析 DOC
