欢迎来到麦多课文档分享! | 帮助中心 海量文档,免费浏览,给你所需,享你所想!
麦多课文档分享
全部分类
  • 标准规范>
  • 教学课件>
  • 考试资料>
  • 办公文档>
  • 学术论文>
  • 行业资料>
  • 易语言源码>
  • ImageVerifierCode 换一换
    首页 麦多课文档分享 > 资源分类 > DOC文档下载
    分享到微信 分享到微博 分享到QQ空间

    【计算机类职业资格】二级VISUAL+BASIC-35及答案解析.doc

    • 资源ID:1327394       资源大小:126KB        全文页数:22页
    • 资源格式: DOC        下载积分:5000积分
    快捷下载 游客一键下载
    账号登录下载
    微信登录下载
    二维码
    微信扫一扫登录
    下载资源需要5000积分(如需开发票,请勿充值!)
    邮箱/手机:
    温馨提示:
    如需开发票,请勿充值!快捷下载时,用户名和密码都是您填写的邮箱或者手机号,方便查询和重复下载(系统自动生成)。
    如需开发票,请勿充值!如填写123,账号就是123,密码也是123。
    支付方式: 支付宝扫码支付    微信扫码支付   
    验证码:   换一换

    加入VIP,交流精品资源
     
    账号:
    密码:
    验证码:   换一换
      忘记密码?
        
    友情提示
    2、PDF文件下载后,可能会被浏览器默认打开,此种情况可以点击浏览器菜单,保存网页到桌面,就可以正常下载了。
    3、本站不支持迅雷下载,请使用电脑自带的IE浏览器,或者360浏览器、谷歌浏览器下载即可。
    4、本站资源下载后的文档和图纸-无水印,预览文档经过压缩,下载后原文更清晰。
    5、试题试卷类文档,如果标题没有明确说明有答案则都视为没有答案,请知晓。

    【计算机类职业资格】二级VISUAL+BASIC-35及答案解析.doc

    1、二级 VISUAL+BASIC-35 及答案解析(总分:100.00,做题时间:90 分钟)一、选择题(总题数:40,分数:100.00)1.下列叙述中正确的是_。(分数:2.50)A.循环队列是队列的一种链式存储结构B.循环队列是队列的一种顺序存储结构C.循环队列是非线性结构D.循环队列是一种逻辑结构2.下列关于线性链表的叙述中,正确的是_。(分数:2.50)A.各数据结点的存储空间可以不连续,但它们的存储顺序与逻辑顺序必须一致B.各数据结点的存储顺序与逻辑顺序可以不一致,但它们的存储空间必须连续C.进行插入与删除时,不需要移动表中的元素D.各数据结点的存储顺序与逻辑顺序可以不一致,它们的存

    2、储空间也可以不一致3.一棵二叉树共有 25 个结点,其中 5 个是叶子结点,则度为 1 的结点数为_。(分数:2.50)A.16B.10C.6D.44.在下列模式中,能够给出数据库物理存储结构与物理存取方法的是_。(分数:2.50)A.外模式B.内模式C.概念模式D.逻辑模式5.在满足实体完整性约束的条件下_。(分数:2.50)A.一个关系中应该有一个或多个候选关键字B.一个关系中只能有一个候选关键字C.一个关系中必须有多个候选关键字D.一个关系中可以没有候选关键字6.有三个关系 R,S 和 T 如下: R A B C a 1 2 b 2 1 c 3 1 S A B c 3 T C 1 则由关

    3、系 R 和 S 得到关系 T 的操作是_。(分数:2.50)A.自然连接B交C除D并7.下面描述中,不属于软件危机表现的是_。(分数:2.50)A.软件过程不规范B.软件开发生产率低C.软件质量难以控制D.软件成本不断提高8.下面不属于需求分析阶段任务的是_。(分数:2.50)A.确定软件系统的功能需求B.确定软件系统的性能需求C.需求规格说明书评审D.制定软件集成测试计划9.在黑盒测试方法中,设计测试用例的主要根据是_。(分数:2.50)A.程序内部逻辑B.程序外部功能C.程序数据结构D.程序流程图10.在软件设计中不使用的工具是_。(分数:2.50)A.系统结构图B.PAD 图C.数据流图

    4、(DFD 图)D.程序流程图11.在窗体上添加“控件”的正确的操作方式是_。(分数:2.50)A.先单击工具箱中的控件图标,再单击窗体上适当位置B.先单击工具箱中的控件图标,再双击窗体上适当位置C.直接双击工具箱中的控件图标,该控件将出现在窗体上D.直接将工具箱中的控件图标拖动到窗体上适当位置12.为了使标签控件在显示其内容时不覆盖其背景内容,需进行设置的属性为_。(分数:2.50)A.BackColorB.BorderStyleC.ForeColorD.BackStyle13.Visual Basic 控件一般都规定一个默认属性,在引用这样的属性时,只写对象名而不必给出属性名。默认属性为 C

    5、aption 的控件是_。(分数:2.50)A.列表框(ListBox)B.标签(Label)C.文本框(TextBox)D.组合框(ComboBox)14.下列说法中,错误的是_。(分数:2.50)A.将焦点移至命令按钮上,按 Enter 键,则引发命令按钮的 Click 事件B.单击命令按钮,将引发命令按钮的 Click 事件C.命令按钮没有 Picture 属性D.命令按钮不支持 DblClick 事件15.为了将“联想电脑”作为数据项添加到列表框 List1 的最前面,可以使用语句_。(分数:2.50)A.List1.AddItem“联想电脑“,0B.List1.AddItem“联想电

    6、脑“,1C.List1.AddItem 0,“联想电脑“D.List1.AddItem1,“联想电脑“16.下列关于利用通用对话框产生的文件对话框的相关属性的描述中,错误的是_。(分数:2.50)A.InitDir 属性用于设置对话框中显示的起始目录B.Filter 属性用于设置对话框默认的过滤器C.DefaultExt 属性用于设置对话框中默认的文件类型D.FileTitle 属性用于存放对话框中所选择的文件名17.下列事件的事件过程中,参数是输入字符 ASCII 码的是_。(分数:2.50)A.KeyDown 事件B.KeyUp 事件C.KeyPress 事件D.Change 事件18.已

    7、知图片框 Picture1 中已装入一个图形,为了在不删除图片框的前提下,清除该图形,应采取的正确操作是_。(分数:2.50)A.在设计阶段选择图片框 Picture1,并按 Delete 键B.在运行期间执行语句 Picture1.Picture=LoadPicture(“)C.在运行期间执行语句 Picture1.Piclure=“D.在设计阶段先选中图片框 Picture1,再在属性窗口中选择 Picture 属性,最后按 Enter 键19.窗体上有一个名称为 Text1 的文本框,一个名称为 Timer1 的计时器,且已在属性窗口将 Timer1 的Interval 属性设置为 20

    8、00、Enabled 属性设置为 False。以下程序的功能是单击窗体时,则每隔 2 秒钟在Text1 中显示一次当前时间。 Private Sub Form_Click() Timer1_ End Sub Private Sub Timer1_Timer() Text1.Text=Time() End Sub 为了实现上述功能,应该在_处填入的内容为_。 (分数:2.50)A.B.C.D.20.窗体上已有的 3 个单选按钮组成了一个名为 ChkOpt1 的控件数组。用于区分控件数组 ChkOpt1 中每个元素的属性是_.(分数:2.50)A.CaptionB.ListCountC.ListI

    9、ndexD.Index21.编写如下程序: Private sub Command1_Click() m=1:n=0 Do While m20 n=m+n m=3*m+1 Loop Print m,n End Sub 程序运行后,单击命令按钮 Command1,输出结果为_。(分数:2.50)A.40 18B.40 19C.20 64D.21 6422.下列循环中,可以正常结束的是_。 A B C D (分数:2.50)A.B.C.D.23.编写如下程序: Private Sub Command1_Click() Dim x As Integer,y As Integer x=InputBox

    10、(“输入第一个数“) y=InputBox(“输入第二个数“) Call f(x,y) Print x,y End Sub Sub f(a As Integer,ByVal b As Integer) a=a*2 x=a+b b=b+100 End Sub 程序运行后,单击命令按钮 Command1,并输入数值 10 和 15,则输出结果为_。(分数:2.50)A.10 115B.20 115C.35 15D.20 1524.编写如下程序: Private Sub Command1_Click() Dim str1 As String,str2 As String str1=InputBox(

    11、“输入一个字符串“) subf str1,str2 Print str2 End Sub Sub subf(s1 As String,s2 As String) Dim temp As String Static i As Integer i=i+1 temp=Mid(s1,i,1) If temp“Then subf s1.s2 s2=s2 Next m End Sub Function proc(i As Integer) Dim a As Integer Static b As Integer a=a+1 b=b+1 proc=a*b+i End Function 程序运行后,单击命令按

    12、钮 Command1,输出结果为_。(分数:2.50)A.3 3 3B.3 4 5C.3 5 6D.1 2 328.编写如下程序: Private Sub Form_Click() Print“Welcome!“ End Sub Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) Print “欢迎!“ End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As S

    13、ingle) Print“热烈欢迎!“ End Sub 程序运行后,单击窗体,输出结果为_。 A B C D (分数:2.50)A.B.C.D.29.编写如下程序: Private Sub Command1_Click() Dim i As Integer,j As Integer n=InputBox(“输入一个大于 1 的正整数“) For i=2 To n For j=2 To Sqr(i) If i Mod j=0 Then Exit For Next j If jSqr(i)Then Print i Next i End Sub 该程序的功能是_。(分数:2.50)A.判断 n 是否

    14、为素数B.输出 n 以内所有的奇数C.输出 n 以内所有的偶数D.输出 n 以内所有的素数30.以下程序的功能是随机产生 10 个两位的整数: Option Base 1 Private Sub Command1_Click() Dim a(10)As Integer Dim i As Integer Randomize For i=1 To 10 a(i)=Int(Rnd*100)+1 Print a(i) Next i End Sub 运行以上程序,发现有错误,需要对产生随机数的语句进行修改。以下正确的修改是_。(分数:2.50)A.a(i)=Int(Rnd*100)B.a(i)=Int(

    15、Rnd*90)+10C.a(i)=Int(Rnd*100)+10D.a(i)=Int(Rnd*101)31.设有数组定义语句:Dim a(5)As Integer,List1 为列表框控件。下列给数组元素赋值的语句错误的是_。(分数:2.50)A.a(3)=3B.a(3)=Inputbox(“inputdata“)C.a(3)=List1.ListIndexD.a=Array(1,2,3,4,5,6)32.在窗体上画一个命令按钮(其 Name 属性为 Command1),然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a s=0

    16、:j=1 a=Array(1,2,3,4) For i=4 To 1 Step-1 s=s+a(i)*j j=j*10 Next Print s End Sub 运行上面的程序并单击命令按钮,其输出结果是_。(分数:2.50)A.4321B.1234C.34D.1233.下面程序运行后,单击命令按钮,输出的结果是_。 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

    17、(B) Print“str1=“;str1;“str2=“;str2 End Sub Function YAG(a()As Integer) Dim t#,i% For i=LBound(A)To UBound(A) t=t*a(i) Next YAG=t End Function(分数:2.50)A.str1=24 str2=720B.str1=12 str2=360C.str1=24 sir2=180D.str1=36 str2=72034.有如下一个函数过程: Function Fun(a As Integer) Static c b=0:b=b+1:c=c+1 Fun=a+b+c En

    18、d Function 在窗体上添加一个命令按钮,事件过程如下: Private Sub Command1_Click() Dim a As Integer a=2 For i=1 To 3 Print Fun(a); Next End Sub 运行该程序,单击命令按钮,输出结果是_。(分数:2.50)A.4 4 4B.4 5 6C.6 7 8D.4 7 935.在窗体上画一个命令按钮 Command1 和两个文本框,名称分别为 Text1 和 Text2。编写如下两个事件过程: Dim Str1 As String,str2 As String Private Sub form_load()

    19、Text1.Text=“ Text2.Text=“ Text1.Enabled=False Text2.Enabled=False End Sub Private Suh Form_KeyPress(KeyAscii As Integer) str1=str1 Next m End Sub Function proc(i As Integer) Dim a As Integer Static b As Integer a=a+1 b=b+1 proc=a*b+i End Function 程序运行后,单击命令按钮 Command1,输出结果为_。(分数:2.50)A.3 3 3B.3 4 5

    20、C.3 5 6D.1 2 3解析:解析 变量 b 定义成 Static 即静态变量,特点是每次调用都会保留上次的值。程序 Click 事件中执行了 3 次 proc(n),即 proc(2): 第一次,a=a+1=0+1=1,b=b+1=0+1=1,proc=a*b+i=1*1+2=3; 第二次,a=a+1=0+1=1,b=b+1=1+1=2,proc=a*b+i=1*2+2=4; 第三次,a=a+1=0+1=1,b=b+1=2+1=3,proc=a*b+i=1*3+2=5; 输出的结果为 3 4 5。因此本题答案为 B。28.编写如下程序: Private Sub Form_Click()

    21、Print“Welcome!“ End Sub Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) Print “欢迎!“ End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single) Print“热烈欢迎!“ End Sub 程序运行后,单击窗体,输出结果为_。 A B C D (分数:2.50)A. B.C.D.解析:解析 在窗体事件中,鼠标按键按

    22、下将触发 MouseDown 事件,鼠标按钮松开将触发 MouseUp 事件,当鼠标按下并松开后会触发 Click 事件,因此这 3 个事件的顺序应是 MouseDown,MouseUp,Click,所以输出文字的顺序是“欢迎!”、“热烈欢迎!”、“Welcome!”。因此本题答案应为 A。29.编写如下程序: Private Sub Command1_Click() Dim i As Integer,j As Integer n=InputBox(“输入一个大于 1 的正整数“) For i=2 To n For j=2 To Sqr(i) If i Mod j=0 Then Exit Fo

    23、r Next j If jSqr(i)Then Print i Next i End Sub 该程序的功能是_。(分数:2.50)A.判断 n 是否为素数B.输出 n 以内所有的奇数C.输出 n 以内所有的偶数D.输出 n 以内所有的素数 解析:解析 假设输入 2,4,9 进行验证,当输入 2 时程序会输出 2,而输入 4 时,程序会输出 2,3,因此程序不是判断 n 是否为素数,所以 A 不对。由前面验证可知,程序也不是输出 n 以内的所有奇数或偶数,因此 B,C 也不对。如果输入 9 时,程序会输出 2,3,5,7,说明程序是输出 n 以内的所有素数,所以 D 正确。本题答案应为 D。30

    24、.以下程序的功能是随机产生 10 个两位的整数: Option Base 1 Private Sub Command1_Click() Dim a(10)As Integer Dim i As Integer Randomize For i=1 To 10 a(i)=Int(Rnd*100)+1 Print a(i) Next i End Sub 运行以上程序,发现有错误,需要对产生随机数的语句进行修改。以下正确的修改是_。(分数:2.50)A.a(i)=Int(Rnd*100)B.a(i)=Int(Rnd*90)+10 C.a(i)=Int(Rnd*100)+10D.a(i)=Int(Rnd

    25、*101)解析:解析 由于 Rnd 函数生成的随机数在 01 之间,包括 0 但不包括 1,因此有可能产生 0,与题目两位整数的要求不相符。所以语句 a(i)=Int(Rnd*100)+1 需要修改为 a(i)=Int(Rnd*90)+10,这样才能正确产生两位的整数。因此本题答案应为 B。31.设有数组定义语句:Dim a(5)As Integer,List1 为列表框控件。下列给数组元素赋值的语句错误的是_。(分数:2.50)A.a(3)=3B.a(3)=Inputbox(“inputdata“)C.a(3)=List1.ListIndexD.a=Array(1,2,3,4,5,6) 解析

    26、:解析 使用 Array()为数组初始化时,定义数组不应写明长度和类型,如下便是错误的定义: Dim a a=Array(.)32.在窗体上画一个命令按钮(其 Name 属性为 Command1),然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a s=0:j=1 a=Array(1,2,3,4) For i=4 To 1 Step-1 s=s+a(i)*j j=j*10 Next Print s End Sub 运行上面的程序并单击命令按钮,其输出结果是_。(分数:2.50)A.4321B.1234 C.34D.12解析:解析

    27、 数组名 a 为变体型变量,用 Array 函数对其进行初始化,得到 a(1)=1,a(2)=2,a(3)=3和 a(4)=4。变量 j 在循环中每次计算后扩大 10 倍,变量 s 的计算过程为s=41+310+2100+11000=1234。33.下面程序运行后,单击命令按钮,输出的结果是_。 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“s

    28、tr1=“;str1;“str2=“;str2 End Sub Function YAG(a()As Integer) Dim t#,i% For i=LBound(A)To UBound(A) t=t*a(i) Next YAG=t End Function(分数:2.50)A.str1=24 str2=720 B.str1=12 str2=360C.str1=24 sir2=180D.str1=36 str2=720解析:解析 程序首先调用循环语句为数组 a,b 赋值,其中 a(i)=i;b(i)=i,且数组 a 的上下界分别为 1 和 4,数组 b 的上下界分别为 2 和 6,接着将数组

    29、 a 作为参数调用 YAG 过程。在 YAG 过程中,定义了两个变量 t 及 i,i 作为循环语句 For 的变量,它的初始值和终值分别为数组的上下界,循环体为t=t*a(i),即将 a(i)的值乘以 t,然后再赋给 t,当循环结束后,程序返回的就是数组 a 中的各元素的积。同理程序将数组 b 作为参数传递给 YAG 过程后返回数组 b 中各元素的积,运行程序结束后,输出结果为:str1=24 str2=720。34.有如下一个函数过程: Function Fun(a As Integer) Static c b=0:b=b+1:c=c+1 Fun=a+b+c End Function 在窗体

    30、上添加一个命令按钮,事件过程如下: Private Sub Command1_Click() Dim a As Integer a=2 For i=1 To 3 Print Fun(a); Next End Sub 运行该程序,单击命令按钮,输出结果是_。(分数:2.50)A.4 4 4B.4 5 6 C.6 7 8D.4 7 9解析:解析 题中 c 为静态变量,在每次对子过程进行调用时,其值始终保持原值。计算过程为Fun=2+1+1=4,Fun=2+2+1=5,Fun=2+3+1=6。35.在窗体上画一个命令按钮 Command1 和两个文本框,名称分别为 Text1 和 Text2。编写如

    31、下两个事件过程: Dim Str1 As String,str2 As String Private Sub form_load() Text1.Text=“ Text2.Text=“ Text1.Enabled=False Text2.Enabled=False End Sub Private Suh Form_KeyPress(KeyAscii As Integer) str1=str1&Chr(KeyAscii) End Sub Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) str2=str2&Chr(KeyC

    32、ode) End Sub Private Sub Command1_Click() Text1.Text=str1 Text2.Text=str2 str1=“ str2=“ End Sub 当在设计阶段的窗体的 KeyPreview 属性设置为 True 时,程序运行过程中,在键盘上输入小写字母 abc,然后单击命令按钮,则文本框 Text1 中显示的内容为_。(分数:2.50)A.abc B.不显示任何信息C.ABCD.出错解析:解析 在 Command1 的 Click 事件中将字符串变量 str 赋给 Text1,str 变量是在 KeyPress 事件中被赋值的,语句 str=str

    33、&Chr(KeyAscii)将输入的字符存储并连接起来,此处是通过参数 KeyAscii 来得到输入字符的(因此要区分字母的大小写),又因为在 Form 的 Load 事件中将 Text1 和 Text2 的 Enabled 属性设置成 False,所以当前拥有输入焦点的对象是窗体,为了使窗体能接收键盘事件,已经将窗体的KeyPreview 属性设置为 True,所以在输入小写字母 abe 后,单击 Command1,触发其 Click 事件,使得Text1 文体控件的值等于 str 字符串的值,即 abc。36.编写如下两个事件过程: Private Sub Form_keyDown(Key

    34、Code As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii) End Sub 在一般情况下(即不按住 Shift 键和锁定大写键时)运行程序,如果按 a 键,则程序输出的结果是_。 A B C D (分数:2.50)A.B.C. D.解析:解析 KeyCode 是按键的实际的字符(不区分大小写),KeyAscii 是以字符为准,是所按键的ASCII 码。37.鼠标移动经过控件时,将触发控件的_。(分数:

    35、2.50)A.MouseDown 事件B.MouseUp 事件C.MouseMove 事件 D.Click 事件解析:解析 当鼠标指针在屏幕上移动时,就会发生 MouseMove 事件。当鼠标指针处在窗体和控件的边框内时,窗体和控件均能识别 MouseMove 事件。38.下列事件过程运行后输出结果是_。 Private Sub Command1_Click() Print Format$(123.456,“#.#%“) End Sub(分数:2.50)A.123.46%B.123.45%C.123.456%D.12345.6% 解析:解析 Format$(数值表达式,格式字符串)的功能是按“

    36、格式字符串”指定的格式输出数值表达式的值,将多余位数舍去。39.在用通用对话框控件建立“打开”或“保存”文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即.txt 文件),则正确的描述格式是_。(分数:2.50)A.“text(.txt)(*.txt)“ B.“文本文件(.txt)(.txt)“C.“text(.txt)FFFFF|(*.txt)“D.“text(.txt)(*.text)“解析:解析 Filter 属性用来指定在对话框中显示的文件类型,Filter 的属性值由一对或多对文本字符串组成,每对字符串用管道符“|”隔开,在“|”前面的部分称为描述符,后面的部分一般为

    37、通配符和文件扩展名,称为“过滤器”,如*.txt 等。40.如果准备读文件,打开顺序文件“text.dat”的正确语句是_。(分数:2.50)A.Open “text.dat“ For Write As #1B.Open “text.dat“ For Binary As #1C.Open “text.dat“ For Input As #1 D.Open “text.dat“ For Random As #1解析:解析 Open 语句对文件进行输入输出操作,语法为“Open文件名For模式As#文件号input 模式”表示从打开文件时,文件必须存在。顺序文件的读操作由 Input 语句来实现。


    注意事项

    本文(【计算机类职业资格】二级VISUAL+BASIC-35及答案解析.doc)为本站会员(feelhesitate105)主动上传,麦多课文档分享仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。 若此文所含内容侵犯了您的版权或隐私,请立即通知麦多课文档分享(点击联系客服),我们立即给予删除!




    关于我们 - 网站声明 - 网站地图 - 资源地图 - 友情链接 - 网站客服 - 联系我们

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

    收起
    展开