[计算机类试卷]VB笔试模拟试卷93及答案与解析.doc

上传人:ideacase155 文档编号:494283 上传时间:2018-11-30 格式:DOC 页数:16 大小:58.50KB
下载 相关 举报
[计算机类试卷]VB笔试模拟试卷93及答案与解析.doc_第1页
第1页 / 共16页
[计算机类试卷]VB笔试模拟试卷93及答案与解析.doc_第2页
第2页 / 共16页
[计算机类试卷]VB笔试模拟试卷93及答案与解析.doc_第3页
第3页 / 共16页
[计算机类试卷]VB笔试模拟试卷93及答案与解析.doc_第4页
第4页 / 共16页
[计算机类试卷]VB笔试模拟试卷93及答案与解析.doc_第5页
第5页 / 共16页
点击查看更多>>
资源描述

1、VB笔试模拟试卷 93及答案与解析 1 算法指的是 _。 ( A) 计算机程序 ( B)解决问题的计算方法 ( C)解决问题的有限运算序列 ( D)排序算法 2 下列关于线性表的叙述中,不正确的是 _。 ( A)线性表是 n个结点的有穷序列 ( B)线性表可以为空表 ( C)线性表的每一个结点有且仅有一个前趋和一个后继 ( D)线性表结点间的逻辑关系是 1:1的联系 3 栈和队列 _。 ( A)共同之处在于二者都是先进先出的特殊的线性表 ( B)共同之处在于二者 都是先进后出的特殊的线性表 ( C)共同之处在于二者都只允许在顶端执行删除操作 ( D)没有共同之处 4 若二叉树中度为 2的结点有

2、 15个,度为 1的结点有 10个,则有 _个叶结点。 ( A) 25 ( B) 30 ( C) 31 ( D) 16 5 已知二叉树的前序序列为 ABDCEFG,中序序列为 DBCAFEG,则后序序列为_。 ( A) DCBAFGE ( B) DCBFGEA ( C) DCBFEGA ( D) DCBGFEA 6 软件调试方法中的静态调试方法之一为 _。 ( A)计算机辅助静态分析 ( B)黑盒法 ( C)因果图 ( D)路径覆盖 7 为了克服软件危机,人们提出了用 _的原理来设计软件,这就是软件工程诞生的基础。 ( A)数学 ( B)软件学 ( C)运筹学 ( D)工程学 8 为了防止一个

3、用户的工作不适当地影响另一个用户,应该采取 _。 ( A)完整性控制 ( B)安全性控制 ( C)并发控制 ( D)访问控制 9 在数据库设计中,数据流图表达的是 _。 ( A) 数据和数据结构的关系 ( B)数据和算法的 关系 ( C)数据和处理的关系 ( D)数据和通信的关系 10 关于数据库系统的特点,下列说法中错误的是数据 _。 ( A)结构化 ( B)共享性高 ( C)独立性差 ( D)统一管理和控制 11 若要使用户不能修改文本框 TextBox1中内容,应修改 _ 属性。 ( A) Locked ( B) MultiLine ( C) PassWordChar ( D) Sero

4、llBar 12 命令按钮 Command1的 Caption属性为 “退出 (x)”,要将命令按钮的快捷键设为Alt+x,应修改 Caption属性为 _ 。 ( A) 在 x前插入 ( B)在 x后插入 ( C)在 x前插入 # ( D)在 x后插入 # 13 Label控件中内容能垂直方向变化而宽度保持不变则应设置 _ 属性。 ( A) Wordwrap ( B) Enabled ( C) Locked ( D) AutoSize 14 使用 CoamonDialog 控件的 _ 方法可显示 ”打印 ”对话框。 ( A) ShowOpen ( B) ShowSave ( C) ShowC

5、olor ( D) Showprinter 15 确定复选框是否选中,可访问的属性是 _ 。 ( A) Value ( B) Checked在 ( C) Selected ( D) Caption 16 只能用来显示字符信息的控件是 _ 。 ( A) 文本框 ( B)标签框 ( C)图片框 ( D)图像框 17 在窗体上添加一个文本框,名为 text1,然后编写如下的 load事件过程,则程序的运行结果是 _ 。 private sub form_ load text1.text=“” text1.setfocus for k=1 to 5 t=t*k next k text1.text=t

6、end sub ( A) 在文本框中显示 120 ( B)文本框中仍为空 ( C)在文本框中显示 1 ( D)出错 18 以下语句错误的是: _ 。 ( A) Do while(Condition) Statements Loop ( B) Do Statements Loop while(condition) ( C) Do until(condition) Statements Loop ( D) Do until(condition) Statements end do 19 下列程序运行后,输出的结果为 _ 。 B=1Do while b 40 b=*(b+1)LoopPrint B

7、( A) 42 ( B) 39 ( C) 6 ( D) 1 20 在窗体上添加一个命令按纽,名为 command1,其事件过程如下,程序运行后,其输出的结果为 _ 。 Private sub_command1_ click () Dim a a=array(1, 2, 3, 4, 5) For k=1 to 4 S=s+ a(k) Next k Print s End sub ( A) 10 ( B) 14 ( C) 15 ( D) 120 21 设执行以下程序段时依次输入 1、 3、 5,执行结果为 _ 。 Dim a(4)As Integer Dim b(4) As Integer For

8、 K=0 To 2 a(K+1)=Val(1nputBox(“请输入数据: ”) b(3-K)=a(K+1) Next K Print b(K) ( A) 1 ( B) 3 ( C) 5 ( D) 0 22 下列程序执行后,变量 S的值为 _ 。 Dim s As Long, X As Integer s=0 X=1 Do While x 10 s= s+ x x=x+2 Loop Print s ( A) 10 ( B) 25 ( C) 50 ( D) 100 23 下列程序段的执行结果为 _ 。 Dim A(4) N= 3 A(1) =1 For K=0 To N-1 For L=1 To

9、 K+1 X=K+2 -L A(X)=A(X)+A(X-1) If K N-1 Then Exit For Print A(X); Next L Next K ( A) 1 2 1 ( B) 1 2 3 ( C) 2 4 6 ( D) 1 3 1 24 下列命令按纽事件过程执行后,输出的结果是 _ 。 private sub command_ click() for m+1 to 10 step 2 a=10 for n=1 to 10 step 2 a+a+2 next n next m print a end sub ( A) 60 ( B) 50 ( C) 30 ( D) 20 25 当

10、执行以下过程时,在名为 1blResult的标签框内将显示 _。 Private Sub cmdlt_ click() Dim I, R R=0 For I=1 To 5 Step 1 R=R+I Next i 1blResult Caption=Str (R) End Sub ( A) 字符串 15 ( B)整数 15 ( C)字符串 5 ( D)整数 5 26 下面程序执行的结果是 _。 Private Sub Form_ Click() A =“123”: B =“456” C=Val(A )+Val(B ) Print C100 End Sub ( A) 123 ( B) 3 ( C)

11、 5 ( D) 579 27 每个 ActiveX控件都是扩展名为 _的独立文件。 ( A) .OCX ( B) .c ( C) .act ( D) .bmp 28 控件 _ 属性的设置,可使该控件不能通过 Tab键得到焦点。 ( A) TabStop ( B) Tablndex ( C) GotFocus ( D) SetFocus 29 在窗体上画一个名称为 Command1的命令按钮,然后编写如下程序: Private Sub Command1-Click() Static X Am Integer Static Y As Integer Cls Y=1 Y=Y+5 X=5+X Prin

12、t X, Y End Sub程序运行时,三次单击命令按钮 Comand1后,窗体上显示的结果为 _。 ( A) 15 16 ( B) 15 6 ( C) 15 15 ( D) 5 6 30 下列表达式中, _的值为 false。 ( A) “BCD” “BCE” ( B) “12345” “12345”旷 “ABC” ( C) Not 2*5=10 ( D) 4=4 and 5 2+2 31 用如下语句所定义的数组的元素个数是 _个。 Dim b(-2 to 4)as string ( A) 2 ( B) 4 ( C) S ( D) 7 32 先在 窗体上添加一个命令按纽,然后编写如下程序:

13、Function fun(ByVal nm As Long)As Long Dim k As Long k=1 num=Abs(num) Do While num k=k*(num Mod 10) num=num10 Loop fun=k End Function Private Sub Command1_Click() Dim n As Long Dim r As Long n=InputBox(“请输入一个数 ”) n=CLng(n) r=fun(n) Print r End Sub 则在程序运行后,单击命令按纽,在对话框 中输入 “100”,输出结果是 _。 ( A) 0 ( B) 10

14、0 ( C) 200 ( D) 300 33 单击命令按钮时,下列程序代码的执行结果为 _。 Private Function PickMid(xStr As String) As String Dim tempStr As String Dim strLen As Integer tempStr=“” strLen=Len(xStr) i=1 Do While i =strLen/2 tempStr=tempStr+Mid(xStr, i, 1)+Hid(xStr,strLen-i+1, 1) i=i + 1 Loop PickMid=tempStr End Function Private

15、 Sub Command1_Click() Dim FirstStr As String FirstStr=“abcdef” Print PickMid(FirstStr) End Sub ( A) abcdef ( B) afbecd ( C) fedcba ( D) defabc 34 下面叙述中不正确的是 _。 ( A) 若使用 Write #语句将数据输出到文件,则各数据项之间自动插入逗号,并且将字符串加上双引号。 ( B)若使用 Print #语句将数据输出到文件,则各数据项之间没有逗号分隔,且字符串不加双引号。 ( C) Write #语句和 Print #语句建立的顺序文件格式完

16、成一样。 ( D) Write #语句和 Print #语句均实现向文件中写入数据。 35 在窗体上添加一个命令按钮,名为 command1,一文本框,名为 text1,则执行如下事件过程后,文本框中的输出为 _。 For i=1 To 4 x=3 For j=1 To 3 For k=1 To 2 x= x + 3 Next k Next j Next i Text1.Text=str(x) ( A) 6 ( B) 12 ( C) 18 ( D) 21 36 深度为 n(n 0)的二叉树最多有【 】个结点。 37 目前,有两种重要的高级语 言,分别是结构化程序和【 】。 38 对象还有操作,

17、用于改变对象的状态,对象及其操作就是对象的【 】。 39 结构化分析方法的基本思想是采用【 】方法,分析整个系统,有效的控制系统开发的复杂性。 40 数据库管理系统 (DBMS)是数据库的机构,通常由数据定义语言、数据控制语言,【 】和一些实用程序四部分组成。 41 DIM a(3, -3 to 0, 3 to 6)AS STRING语句定义的数组元素有【 】个。 42 已知在窗体上有一个文本框控件,它的名称为 Text1,且输入 的字符全部为数字,现在要把该字符转换为整数送给整型变量 C,所用到的语句是【 】。 43 在 C盘当前文件夹下建立一个名为 StuData. txt的顺序文件。要求

18、用 InputBox函数输入 5名学生的学号 (StuNo)、姓名 (StuName)和英语成绩 (StuEng)。 Private Sub Form Click() Open“C: StuData. txt“For OutPut As#1 Fori=1 To 5 StuNo=InpuzztBox(“请输入学号 ”) StuName=InputBox(“请输入姓名 ”) StuEng=Val(InputBox(“请输入英语成绩 ”) 【 】 Next i Close#1 End Sub 44 假定建立了一个工程,该工程包括两个窗体,其名称 (Name属性 )分别为 Form1和 Form2,启

19、动窗体为 Form1。在 Form1画一个命令按钮 Command1,程序运行后,要求当单击该命令按钮时, Form1窗体消失,显示窗体 Form2,请在【 】和【 】处将程序补充完整。 Private Sub Command1_Click() 【 】 Form1 Form2.【 】 End Sub 45 一下程序的作用是生成一个 1010的矩阵该矩阵主对角线上的数据为 1,其余数据为 0(程序运行结果如下图所示 )。该程序不完整,请补充完改程序。Private Sub Command1_Click() Dim a(10, 10)As Integer For i=1 To【 】 For j=1

20、 To 10 If【 】 Then 【 】 =1 Else a(i, j)=0 End If Next j Next i For i =1 To 10 For j=1 To 10 Print a(i, j); Next j Print Next i End Sub VB笔试模拟试卷 93答案与解析 1 【正确答案】 C 2 【正确答案】 C 3 【正确答案】 C 4 【正确答案】 D 5 【正确答案】 B 6 【正确答案】 A 7 【正确答案】 D 8 【正确答案】 C 9 【正确答案】 C 10 【正确答案】 C 11 【正确答案】 A 12 【正确答案】 A 13 【正确答案】 A 14

21、【正确答案】 D 15 【正确答案】 A 16 【正确答案】 B 17 【正确答案】 D 18 【正确答案】 D 19 【正确答案】 A 20 【正确答案】 B 21 【正确答案】 A 22 【正确答案】 B 23 【正确答案】 A 24 【正确答案】 D 25 【正确答案】 A 26 【正确答案】 C 27 【正确答案】 A 28 【正确答案】 A 29 【正确答案】 B 30 【正确 答案】 C 31 【正确答案】 D 32 【正确答案】 A 33 【正确答案】 B 34 【正确答案】 C 35 【正确答案】 D 36 【正确答案】 2n-1 37 【正确答案】 面向对象程序设计 38 【

22、正确答案】 行为 39 【正确答案】 面向数据流 40 【正确答案】 数据操纵 41 【正确答案】 48 【试题解析】 DIM 9(3, -3 to 0, 3 to 6)AS STRING语句定义的数组元素的计算式为: 3*(0-(-3)+1)*(6-3+1) 故元素个数为 48。 42 【正确答案】 c=Val(Text1. Text) 【试题解析】 Text属性的内容就是显示在文本框控件上的内容。其类型为字符类型。要将它转换成数值类型,需用到转换函数 Val。根据以上知识点分析题意可知所用到的语句为: c Val(Textl. Text)。 43 【正确答案】 Write #1, StuNo, StuName, StuEng或 Print#1, StuNo, StuName, Stu- Eng 【试题解析】 顺序文件的写操作可以 使用 Print#或 Write#语句。其格式为: Print #文件号,表达式表 Write#文件号,表达式表 题中要将学生的学号、姓名、英语成绩写入文件 1,故可以用语句 Write #1, StuNo, StuName, StuEng或 Print#1, StuNo, Stu- Name, StuEng 44 【正确答案】 Unload,Show 45 【正确答案】 10 , i=j , a(i, j)

展开阅读全文
相关资源
猜你喜欢
相关搜索

当前位置:首页 > 考试资料 > 职业资格

copyright@ 2008-2019 麦多课文库(www.mydoc123.com)网站版权所有
备案/许可证编号:苏ICP备17064731号-1