【计算机类职业资格】二级VISUAL+BASIC笔试-62及答案解析.doc
《【计算机类职业资格】二级VISUAL+BASIC笔试-62及答案解析.doc》由会员分享,可在线阅读,更多相关《【计算机类职业资格】二级VISUAL+BASIC笔试-62及答案解析.doc(21页珍藏版)》请在麦多课文档分享上搜索。
1、二级 VISUAL+BASIC 笔试-62 及答案解析(总分:74.00,做题时间:90 分钟)一、选择题(总题数:30,分数:60.00)1.下列程序段的执行结果为X=5Y=-20If Not X0 Then X=Y-3 Else Y=X+3Print X-Y;(分数:2.00)A.-3B.5C.3D.252.设一个工程由两个窗体组成,其名称分别为 Form1 和 Form2,在 Form1 上有一个名称为 Command1 的命令按钮。窗体 Form1 的程序代码如下:Private Sub Command1_Click()Dim a As Integera=10Call g(Form2,
2、(分数:2.00)A.End SubPrivate Sub g(f As Form,3.以下叙述中错误的是(分数:2.00)A.用 Shell 函数可以调用能够在 Windows 下运行的应用程序B.用 Shell 函数可以调用可执行文件,也可以调用 Visual Basic 的内部函数C.调用 Shell 函数的格式应为;变量名Shell()D.用 Shell 函数不能执行 DOS 命令4.在窗体中添加一个命令按钮,名称为 Command1;添加一个文本框,名称为 Text1,然后编写如下程序:Private Sub Commandl Click()Dim a(5), b(5)For j =
3、 1 To 4a(j) = 3 ( jb(j) = a(j) ( 3Next jText1.Text = b(j/2)End Sub程序运行后,单击命令按钮,在文本框中显示(分数:2.00)A.25B.18C.36D.355.以下能够正确计算 n!的程序是(分数:2.00)A.Privas Sub Command1_Click()n=5:x=1Dox=x*ii=i+1Loop While inPrint xEnd SubB.Private Sub Command1_Click()n=5:x=1:i=1Dox=x*ii=i+1Loop While inPrint xEnd SubC.Privat
4、e Sub Command1_Click()n=5:x=1:i=1Dox=x*ii=i+1Loop while i=nPrint xEnd SubD.Private Sub Command1_Click()n=5:x=1:i=1Dox=x*ii=i+1Loop While inPrint xEnd Sub6.以下关于图片框控件的说法中,错误的是(分数:2.00)A.可以通过 Print 方法在图片框中输出文本B.清空图片框控件中图形的方法之一是加载一个空图形C.图片框控件可以作为容器使用D.用 Stretch 属性可以自动调整图片框中图形的大小7.在窗体上画一个名称为 CommonDialog
5、l 的通用对话框,一个名称为 Commandl 的命令按钮。然后编写如下事件过程:Private Command1_Click()CommonDialogl.FileName=“ “CommonDialogl.Filter=“All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt“CommonDialoql.Filterlndex=2CommonDialogl.DialoqTitle=“VBTest“CommonDialoql.Action=1End Sub对于这个程序,似下叙述中错误的是(分数:2.00)A.该对话框被设置为“打开”对话框B.在该对话框中指定的默认文
6、件名为空C.该对话框的标题为 VBTestD.在该对话框中指定的默认文件类型为文本文件(*.Txt)8.在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim arrayl(10;10)As IntegerDim i As Integer,j As IntegerFor i=1 To 3For j=2:To 4arrayl(i,j)=i+jNext jNext iText1.Text=arrayl(2,3)+arrayl(3,4)End Sub程序运行后,单击命令按钮,在文本框中
7、显示的值是(分数:2.00)A.15B.14C.13D.129.设有如下通用过程:Public Function f(x As Integer)Dim y As Integerx = 20y = 2f = x * yEnd Function在窗体上画一个名称为 Command1 的命令按钮,然后编写如下事件过程:Private Sub Commandl Click()Static x As Integerx = 10y = 5y = f(x)Print x;yEnd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是(分数:2.00)A.10 5B.20 5C.20 40D.10 40
8、10.在窗体上画一个名称为 Commandl 的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()a$=“VisualBasic“Print String(3,a$)End Sub程序运行后,单击命令按钮,在窗体上显示的内容是(分数:2.00)A.VVVB.VisC.sicD.1111.执行以下程序段a$ =“abbacddcba“For i = 6 To 2 Step - 2X = Mid(a, i,i)Y=Left(a, i)z=Right(a,i)z=UCase(X & Y &Z)Next iPrint z输出结果为(分数:2.00)A.ABCB.B
9、BABBAC.ABBABAD.AABAAB12.以下声明语句中错误的是(分数:2.00)A.Constvar1=123B.Dim var2=ABCC.DefInt a-zD.Static var3 As Integer13.在设计阶段,当双击窗体上的某个控件时,所打开的窗口是(分数:2.00)A.工程资源管理器窗口B.工具箱窗口C.代码窗口D.属性窗口14.单击一次命令按钮之后,下列程序代码的执行结果为private Sub Command1_Click()S=P(1) +P(1)+P(2)+P(3)+P(4)Print S:End Sub Public Function P(N As Int
10、eger)Static SumFor I=1 To nSum=Sum+INext 1 P=SumEnd Function(分数:2.00)A.20B.35C.115D.13515.下列数据结构中,能用二分法进行查找的是(分数:2.00)A.顺序存储的有序线性表B.线性链表C.二叉链表D.有序线性链表16.下列叙述中正确的是(分数:2.00)A.一个逻辑数据结构只能有一种存储结构B.数据的逻辑结构属于线性结构,存储结构属于非线性结构C.一个逻辑数据结构可以有多种存储结构,且各种存储结构不影响数据处理的效率D.一个逻辑数据结构可以有多种存储结构,且各种存储结构影响数据处理的效率17.为了在按下 E
11、sc 键时执行某个命令按钮的 Click 事件过程,需要把该命令按钮的一个属性设置为True,这个属性是(分数:2.00)A.ValueB.DefaultC.CalicelD.Enabled18.以下关于过程及过程参数的描述中,错误的是(分数:2.00)A.过程的参数可以是控件名称B.用数组作为过程的参数时,使用的是“传地址”方式C.只有函数过程能够将过程中处理的信息传回到调用的程序中D.窗体可以作为过程的参数19.下面关于数据库系统的叙述正确的是(分数:2.00)A.数据库系统减少了数据冗余B.数据库系统避免了一切冗余C.数据库系统中数据的一致性是指数据类型的一致D.数据库系统比文件系统能管
12、理更多的数据20.下面概念中,不属于面向对象方法的是(分数:2.00)A.对象B.继承C.类D.过程调用21.以下能够触发文本框 Change 事件的操作是(分数:2.00)A.文本框失去焦点B.文本框获得焦点C.设置文本框的焦点D.改变文本框的内容22.有如下的程序段,该程序段的执行完后,共执行循环的次数是Private Sub Command1_Click()total=0Counter=lDoPrint Countertotal=total+CounterPrint totalCounter=Counter+1If total=10 ThenExit DoEnd IfLoop While
13、 Counter=10End Sub(分数:2.00)A.5B.10C.12D.2023.设有下列二叉树:(分数:2.00)A.B.C.D.24.以下关系表达式中,其值为 False 的是(分数:2.00)A.“ABC“AbC“B.“the“they“C.“VISUAL“UCase(“Visual“)D.“Integer“Int“25.在窗体上画一个名称为 Command1 的命令按钮,然后编写如下事件过程:Option Base 1Private Sub Command1_Click()Dim aa=Array(1,2,3,4,5)For i=1 To UBound((分数:2.00)A.&
14、n26.下列不能打开菜单编辑器的操作是(分数:2.00)A.按组合键 Ctrl+EB.单击工具栏中的“菜单编辑器”按钮C.执行“工具”菜单中的“菜单编辑器”命令D.按组合键 Shift+Alt+M27.设 a=10,b=5,c=1,执行语句 Print abc 后,窗体上显示的是(分数:2.00)A.TrueB.FalseC.1D.出错信息28.有如下程序:Private Sub Command1_Click()s = 0Dos=(s+1) ( (s+2)N=N+1Loop Until s=10Print N;sEnd Sub运行后的输出结果是(分数:2.00)A.0 1B.30 30C.4
15、30D.2 1229.在数据库管理技术的发展过程中,经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是(分数:2.00)A.数据库系统阶段B.文件系统阶段C.人工管理阶段D.数据项管理30.设在窗体上有一个名称为 Command1 的命令按钮,并有以下事件过程:Private Sub Commandl Click()StatiC b As Variantb=Array(1,3,5,7,9).End Sub此过程的功能是把数组 b 中的 5 个数逆序存放(即排列为 9,7,5,3,1)。为实现此功能,省略号处的程序段应该是(分数:2.00)A.For i=0 To 5-
16、1/2tmp=b(i)b(i)=b(5-i-1)b(5-i-1)=tmpNextB.For i=0 To 5tmp=b(i)b(i)=b(5-i-1)b(5-i-1)=tmpNextC.For i-0 To 5/2tmp=b(i)b(i)=b(5-i-1)b(5-i-1)=tmpNextD.For i=1 To 5/2tmp=b(i)b(i)=b(5-i-1)b(5-i-1)=tmpNext二、填空题(总题数:7,分数:14.00)31.在算法的 5 个特性中,算法必须能在执行有限个步骤之后终止指的是算法的 1 性。(分数:2.00)填空项 1:_32.Visual Basic 提供的对数据文
17、件的三种访问方式为随机访问方式、 1 和二进制访问方式。(分数:2.00)填空项 1:_33.窗体上有一个名称为 List1 的列表框,一个名称为 Text1 的文本框,一个名称为 Label1、 Caption 属性为“Sum”的标签,一个名称为 Command1、标题为“计算”的命令按钮。程序运行后,将把 1100 之间能够被 7 整除的数添加到列表框中。如果单击“计算”按钮,则对 listl中的数进行累加求和,并在文本框中显示计算结果,如图所示。以下是实现上述功能的程序,请填空。(分数:2.00)填空项 1:_34.以下程序的功能是:生成 20 个 200300 之间的随机整数,输出其中
18、能被 5 整除的数并求出它们的和。请填空。Prirate Sub Command1_Click()For i=1 To 20x=Int(_*100+200)If_=0 ThenPrint xS=S+ _End IfNext iPrint “Sum=“;SEnd Sub(分数:2.00)填空项 1:_35.在 n 个运动员中选出任意 r 个人参加比赛,有很多种不同的选法,选法的个数可以用公式 计算。下图窗体中 3 个文本框的名称依次是 Text1、Text2、Text3。程序运行时在 Text1、Text2 中分别输入 n和 r 的值,单击 Command1 按钮即可求出选法的个数,并显示在 T
19、ext3 文本框中(见下图)。请填空。(分数:2.00)填空项 1:_36.以下是一个比赛评分程序。在窗体上建立一个名为 Text1 的文本框数组,然后画一个名为 Text2 的文本框和名为 Command1 的命令按钮。运行时在文本框数组中输入 7 个分数,单击“计算得分”命令按钮,则最后得分显示在 Text2 文本框中(去掉一个最高分和一个最低分后的平均分即为最后得分),如图所示。请填空。(分数:2.00)填空项 1:_37.以下程序的功能是:把当前目录下的顺序文件 smtext1.txt 的内容读入内存,并在文本框 Text1 中显示出来。请填空。Private Sub Command1
20、_Click()Dim inData As StringTextl.Text=“ “Open “./smtext1._ As #1Do While _Input #1,inDataText1.Text=Text1.Text&inDataLoopClose #1End Sub(分数:2.00)填空项 1:_二级 VISUAL+BASIC 笔试-62 答案解析(总分:74.00,做题时间:90 分钟)一、选择题(总题数:30,分数:60.00)1.下列程序段的执行结果为X=5Y=-20If Not X0 Then X=Y-3 Else Y=X+3Print X-Y;(分数:2.00)A.-3 B.
21、5C.3D.25解析:解析 本题考查 If 控制语句。根据题意,当 X0 为非真时,执行 Then 后面的语句,否则执行Else 后面的语句。据此,Y 的值为 8,X 的值仍为 5。Print 语句先计算 X-Y 的值,再输出,答案为 A。2.设一个工程由两个窗体组成,其名称分别为 Form1 和 Form2,在 Form1 上有一个名称为 Command1 的命令按钮。窗体 Form1 的程序代码如下:Private Sub Command1_Click()Dim a As Integera=10Call g(Form2,(分数:2.00)A.End SubPrivate Sub g(f A
22、s Form,解析:解析 本题考查了窗体参数在 Sub 过程中的使用。根据定义的 g Sub 过程,当参数 x 值大于 10 时,y 取值 100,否则取值-100,然后再把 y 值赋给窗体 f 的 Caption 属性。在事件过程中调用此过程的实参分别为 Form2 与 a(其中 a 被赋值为 10)。由于 a=10,故 y=-100,所以正确的结果为:Form2 的 Caption属性为-100。B 项正确。3.以下叙述中错误的是(分数:2.00)A.用 Shell 函数可以调用能够在 Windows 下运行的应用程序B.用 Shell 函数可以调用可执行文件,也可以调用 Visual B
23、asic 的内部函数 C.调用 Shell 函数的格式应为;变量名Shell()D.用 Shell 函数不能执行 DOS 命令解析:解析 本题主要考查 Shell 函数的用法。Shell 函数只能调用可执行文件,即在 Windows 下运行的应用程序,不能调用 Visual Basic 的内部函数。故 B 项是错误的。同时应注意 Shell 是一函数,调用、时一定要有一变量接收 Shell 的返回值。故 C 项是正确的。4.在窗体中添加一个命令按钮,名称为 Command1;添加一个文本框,名称为 Text1,然后编写如下程序:Private Sub Commandl Click()Dim a
24、(5), b(5)For j = 1 To 4a(j) = 3 ( jb(j) = a(j) ( 3Next jText1.Text = b(j/2)End Sub程序运行后,单击命令按钮,在文本框中显示(分数:2.00)A.25B.18 C.36D.35解析:解析 本题主要考查数组的赋值以及考生对 For 循环结构的理解。本题,i 值经过 4 次赋值之后,最后一次。i 值为 5,此时 For 循环中止,故 b(j/2)=b(2)。根据 For 循环对 a(5)与 b(5)的赋值,不难看出,b(2)的值为 1,8,故本题选 B。5.以下能够正确计算 n!的程序是(分数:2.00)A.Priva
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
5000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 职业资格 二级 VISUALBASIC 笔试 62 答案 解析 DOC
