【计算机类职业资格】二级VISUAL+BASIC笔试46及答案解析.doc
《【计算机类职业资格】二级VISUAL+BASIC笔试46及答案解析.doc》由会员分享,可在线阅读,更多相关《【计算机类职业资格】二级VISUAL+BASIC笔试46及答案解析.doc(16页珍藏版)》请在麦多课文档分享上搜索。
1、二级 VISUAL+BASIC 笔试 46 及答案解析(总分:98.00,做题时间:90 分钟)一、B选择题/B(总题数:35,分数:70.00)1.“年龄在 18-25 之间”这种约束是属于数据库当中的(分数:2.00)A.原子性措施B.一致性措施C.完整性措施D.安全性措施2.有如下的程序。 Private Sub Commandl_Click( ) Dim k As Integer, m As Integer Dim P As Integer k=4: m=1 P=Fun(k, m) : Print P; P = Fun ( k, m) : Print P End Sub Private
2、 Function Fun( a As Integer, b As Integer) Static m As Integer, i As Integer m=5:i=2 i=i+m+1 m=i + a + b Fun=m/2 End Function 单击命令按钮后,输出结果为(分数:2.00)A.2 2B.4 4C.5 5D.63.在 Visual Basic 的立即窗口内输入以下语句 X=65 CR Print Chr$(X) CR 在窗口中显示的结果是(分数:2.00)A.65B.AC.aD.X4.下列数据结构中,按先进后出原则组织数据的是(分数:2.00)A.线性链表B.栈C.循环链表
3、D.顺序表5.下列叙述中,正确的是(分数:2.00)A.用 E-R 图能够表示实体集间一对一的联系、一对多的联系和多对多的联系B.用 E-R 图只能表示实体集之间一对一的联系C.用 E-R 图只能表示实体集之间一对多的联系D.用 E-R 图表示的概念数据模型只能转换为关系数据模型6.单击命令按钮时,下列程序的执行结果是 Private Sub Book( x As Integer) x=x*2+1 If x6 Then Call Book(x) End If x=x * 2 + 1 Print x; End Sub Private Sub Command2_Click( ) Book 2 En
4、d Sub(分数:2.00)A.23 47B.10 36C.22 44D.24 507.下列说法错误的是(分数:2.00)A.方法是对象的一部分B.在调用方法时,对象名是不可缺少的C.方法是一种特殊的过程和函数D.方法的调用格式和对象属性的使用格式相同8.执行下面的程序段后,变量 c 的值为 a=14 b=30 Select Case b/10 Case 0 c=a*10 + b Case 1 To 9 c=a* 100 +b Case 10 To 99 c=a * 1000 + b End Select Print c(分数:2.00)A.363B.2548C.1430D.98759.下列叙
5、述中,不属于测试的特征的是(分数:2.00)A.测试的挑剔性B.完全测试的不可能性C.测试的可靠性D.测试的经济性10.以下说法不正确的是(分数:2.00)A.使用 ReDim 语句可以改变数组的维数B.使用 ReDim 语句可以改变数组的类型C.使用 ReDim 语句可以改变数组的每一维的大小D.使用 ReDim 语句可以改变对数组中的所有元素进行初始化11.程序的 3 种基本控制结构是(分数:2.00)A.过程、子过程和分程序B.顺序、选择和重复C.递归、堆栈和队列D.调用、返回和转移12.如果要将窗体中的某个命令按钮设置成无效状态,应该设置命令按钮的那个属性(分数:2.00)A.Valu
6、eB.VisibleC.EnabledD.Default13.执行以下语句过程,在窗体上显示的内容是 Option Base 0 Private Sub Command3_Click( ) Dim d d=Array(“a“, “b“, “c“, “d“ Print d(1) ; d(3) End Sub(分数:2.00)A.abB.bdC.acD.出错14.可以在常量的后面加上类型说明符以显示常量的类型,可以表示整型常量的是(分数:2.00)A.%B.#C.!D.$15.在代码编辑器中,续行符是用来换行书写同个语句的符号,用以表示续行符的是(分数:2.00)A.一个空格加一个下划线“-”B.
7、一个下划线“-”C.一个造字符“-”D.一个空格加一个连字符“-”16.具有 3 个结点的二叉树有(分数:2.00)A.2 种形态B.4 种形态C.7 种形态D.5 种形态17.以下关于 Visual Basic 数据类型的说法,不恰当的是(分数:2.00)A.Visual Basic 6.0 提供的数据类型主要有字符串型和数值型,此外还有字节、货币、对象、日期、布尔和变体数据类型等B.目前 Decimal 数据类型只能在变体类型中使用C.用户不能定义自己的数据类型D.布尔型数据只能取两种值,用两个字节存储18.在窗体上画一个名称为 Labell 的标签,然后编写如下事件过程。 Private
8、 Sub Form_Click( ) Dim arr(10, I0) As Integer Dim i As Integer, j As Integer For i = 2 To 4 For j =2 To 4 arr(i,j) =i*j Next Next Labell. Caption = Str(arr(2,2) + arr(3,3) ) End Sub 程序运行后,单击窗体,在标签中显示的内容是(分数:2.00)A.12B.13C.14D.1519.要触发组合框的 DblClick 事件,只有将组合框的 Style 属性设置为(分数:2.00)A.0B.1C.2D.320.要使文本框获
9、得输入焦点,则应采用文本框控件的方法是(分数:2.00)A.GotFocusB.LostFocousC.KeyPressD.SetFocus21.在窗体上画一个命令按钮,然后编写如下事件过程。 Private Sub Command1_Click( ) Dim m As Integer, n As Integer, p As Integer m=3: n=5:p=0 Call Y(m, n, p) Print Str(p) End Sub Sub Y(ByVal i As Integer, ByVal j As Integer, k As Integer) k=i+j End Sub 程序运行
10、后,如果单击命令按钮,则在窗体上显示的内容是(分数:2.00)A.4B.6C.8D.1022.随机文件用于读数据的语句是(分数:2.00)A.GetB.WritC.printD.Input23.结构化程序设计主要强调的是(分数:2.00)A.程序的规模B.程序的效率C.程序设计语言的先进性D.程序易读性24.需求分析中开发人员要从用户那里了解(分数:2.00)A.软件做什么B.用户使用界面C.输入的信息D.软件的规模25.以下能够正确计算 n!的程序是(分数:2.00)A.Private Sub Command1_Click( ) n=5: x=1 Do x=x*i i=i+1 Loop Wh
11、ile in Print x End SubB.Private Sub Command1_Click( ) n=5: x=1: i=1 Do x=x*i i=i+1 Loop While in Print x End SubC.Private Sub Command1_Click( ) n=5:x=1:i=1 Do x=x*i i=i+1 Loop While i= n Print x End SubD.Private Sub Command1_Click( ) n=5:x=1:i=1 Do x=x*i i=i+1 Loop While in Print x End Sub26.下列说法正确的
12、是(分数:2.00)A.在 Visual Basic 中的对话框分为两种类型:预定义对话框和自定义对话框B.自定义对话框由用户根据自己需要定义的C.预定义对话框是用户在设置程序代码后定义的D.MsgBox 函数是用户的自定义对话框的函数27.下列关系模型中,能使经运算后得到的新关系中属性个数多于原来关系中属性个数的是(分数:2.00)A.选择B.连接C.投影D.并28.在 Visual Basic 中,组合框是文本框和下列哪一项的特性的组合(分数:2.00)A.复选框B.标签C.列表框D.目录列表框29.表达式(3/2+1)*(5/2+2)的值是(分数:2.00)A.11.25B.3C.6.1
13、25D.430.向顺序文件 Temp.txt 中写入 1,2,3 这 3 个数。在程序中加入以下语句的那项可以使程序功能完整。 Private Sub Command1_Click() Open“c:/Temp.txt“,Output As #1 For i=0 To 3 _ Next Close #1 End Sub(分数:2.00)A.Print #1,TemtxtB.Get #1,iC.Print #1,iD.Unit #1,i31.下面程序段的运行结果是 a=1 b=1 Do a=a+1 b=b+1 Loop Until b5 Print“k=“; a; Spc(4) ; “b=“;
14、b + a(分数:2.00)A.k=7 b=14B.k=6 b=6C.k=4 b=8D.k=6 b=1232.有如下程序。 Private Sub Commandl_Click() Dim a As Single Dim b As Single a=5:b=4 Call Sub1 ( a, b) End Sub Sub Subl(x As Single, y As Single) t=x x=t/y y = t Mod y End Sub 在调用运行上述程序后,a 和 b 的值分别为(分数:2.00)A.0 0B.1 1C.2D.1 233.设有下列二叉树: (分数:2.00)A.ZBTYCP
15、XAB.ATBZXCYPC.ZBTACYXPD.ATBZXCPY34.下列方法中不能退出 Visual Basic 的是(分数:2.00)A.按 Alt+Q 组合键B.按下 Alt+F 组合键,然后按 Esc 键C.打开“文件”菜单,执行“退出”命令D.按 F10 键,然后按 F 键,再按 X 键35.下列程序段的执行结果为 m=1 n=1 Select Case m Case 1 Select Case n Case 0 Print“ * * 0 * *“ Case 1 Print“ * *1* *“ End Select Case 2 Print“ * * 2 * *“ End Selec
16、t(分数:2.00)A.*0*B.*1*C.*2*D.0二、B填空题/B(总题数:14,分数:28.00)36.排序是计算机程序设计中的一种重要操作,常见的排序方法有插入排序、U 【1】 /U和选择排序等。(分数:2.00)填空项 1:_37.当循环队列非空且队尾指针等于队头指针时,说明循环队列已满,不能进行人队运算。这种情况称为U 【2】 /U。(分数:2.00)填空项 1:_38.U【3】 /U是一种信息隐蔽技术,目的在于将对象的使用者和对象的设计者分开。(分数:2.00)填空项 1:_39.为了便于对照检查,测试用例应由输人数据和预期的U 【4】 /U两部分组成。(分数:2.00)填空项
17、 1:_40.U【5】 /U是从二维表列的方向进行的运算。(分数:2.00)填空项 1:_41.在用菜单编辑器设计菜单时,必须输入数据的项目是U 【6】 /U。(分数:2.00)填空项 1:_42.在 Visual Basic 中,将一个窗体加载到内存进行预处理但不显示所使用的语句是U 【7】 /U。(分数:2.00)填空项 1:_43.如果不指明函数过程参数的类型,则该参数的数据类型为U 【8】 /U。(分数:2.00)填空项 1:_44.在 Visual Basic 中按文件的访问方式不同,可将文件分为U 【9】 /U。(分数:2.00)填空项 1:_45.语句 Form2.Show0 表
18、示U 【10】 /U; 语句 Form3.Show1 表示U 【11】 /U;(分数:2.00)填空项 1:_46.下面程序运行后,单击命令按钮,输出的结果是U 【12】 /U Private Sub Command1_Click() Dim a%(1 To 4),b%(2 To 6),i%,str1#,str2# For i=1 To 4 a(i)=i Next For i=2 To 6 b(i) =i Next str1 = YAG(a) str2 = YAG(b) Print “str1 =“; str1; “str2 =“; str2 End Sub Function YAG (a (
19、 ) As Integer) Dim t#, i% t=1 For i = LBound(a) To UBound(a) t=t * a(i) Next YAG = t End Function(分数:2.00)填空项 1:_47.在 n 个运动员中选出任意 r 个人参加比赛,有很多种不同的选法,选法的个数可以用公式 计算,下图窗体中 3 个文本框的名称依次是 Text1、Text2、Text3。程序运行时在 Text1、Text2 中分别输入 n和 r 的值,单击 Command1 按钮即可求出选法的个数,并显示在 Text3 文本框中(见下图)。请填空。 (分数:2.00)填空项 1:_4
20、8.下面程序是由鼠标事件在窗体上画图,如果按下鼠标将可以画图,双击窗体可以清除所画图形。补充完整下面的程序。 首先在窗体层定义如下变量: Dim PaintStart As Boolean 编写如下事件过程: Private Sub Form_Load ( ) DrawWidth = 2 ForeColor = vbGreen End Sub Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _ X As Single, Y As Single) PaintStart = True End Sub Private S
21、ub Form_MouseMove(Button As Integer, Shift As Integer, _ X As Single, Y As Single) If PaintStart Then PSet (X, Y) End If End Sub Private Sub Form_MouseUp (Button As Integer, Shift As Integer, _ X As Single, Y As Single) U 【14】 /U End Sub Private Sub Form_DblClick( ) Cls End Sub(分数:2.00)填空项 1:_49.在窗体
22、上画一个命令按钮,然后编写如下代码: Private Type Record R_ID As Integer R_Name As String * 20 Ene Type Private Sub Commandl_Click( ) Dim M _Sise, N_Char, M_Char Open“ c: /file. txt“ For Input As #1 M_sise=LOF(1) For N_Char = M_Sise To 1 Step - 1 Seek#1, Next Char M_char = Input(1 ,#1) Next Print EOF(1) Close#1 End S
23、ub 程序运行后,单击命令按钮,其输出结果为U 【15】 /U。(分数:2.00)填空项 1:_二级 VISUAL+BASIC 笔试 46 答案解析(总分:98.00,做题时间:90 分钟)一、B选择题/B(总题数:35,分数:70.00)1.“年龄在 18-25 之间”这种约束是属于数据库当中的(分数:2.00)A.原子性措施B.一致性措施C.完整性措施 D.安全性措施解析:命题目的 对数据库各种特性必须有正确的理解。 解题要点 数据库的完整性是指数据的正确性和相容性(如学生的学号必须惟一,性别只能是女或男等),数据库是否具备完整性关系到数据库系统能否真实反映现实世界,因此维护数据库的完整性
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
5000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 职业资格 二级 VISUALBASIC 笔试 46 答案 解析 DOC
