无忧首页企业系统我的无忧
无忧服务:
兼职活动培训
娱乐交友:
交友社区资讯
全职实习:
实习暑假寒假
微信号:school51
扫一下,立即关注
加关注
在线支付,立省10元
下载新版APP
===大学生成长生活平台===

2013年9月全国计算机等级《二级VB》上机模考试卷(1) - 233网校计算机二级题库:在线全真模

2013-12-20来源/作者:管理员点击次数:1679

一、选择题(每小题1分,共40小题,共40分。)
1、 下列叙述中正确的是(  )。
A.算法就是程片
B.设计算法时只需要考虑数据结构的设计
C.设计算法时只需要考虑结果的可靠性
D.以上三种说法都不对

2、在文本框中输人字符时,通过(  )事件过程可以得到字符的ASCII码值。
A.Change
B.GotFocus
C.KeyPress
D.LostFocus

3、 在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后如果在文本框中输入文本,则标签中立即显示相同的内容。以下可以实现上述操作的事件过程是(  )。
A.Private Sub Text1 Change(  )
      Label1.Caption=Text1.Text
    End Sub
B.Private Sub Label1 Change(  )
      Label1.Caption=Text1.Text
    End Sub
C.Private Sub Text1 Click(  )
      Label1.Capnon=Text1.text
    End Sub
D.Private Sub Label1 Click(  )
      Label1.Caption=Text1.Text
    End sot

4、 在窗体上画一个命令按钮,其名称为Command1。程序运行后,单击命令按钮,输出结果是(  )。
Private S.b p1(n As Integer)
    For i=n To 1 Step=1
      x=String(i,"*")
     Print x
    Next i
End Sub
Private Sub Command1 Click(  )
    pl(3)
EndSub
A.***
    **
    *
B.***
    ***
C.*
    *
    *
D.******

5、 目录列表框Path属性所表示的含义是( )。
A.当前驱动器或指定驱动器上的路径
B.当前驱动器或指定驱动器上的某目录下的文件列表
C.根目录下的文件列表
D.指定路径下的文件列表

6、 设有如下程序:
Option Base 1
Private Sub Form Click( )
Dim a(5)As String,i As Integer
For i=1 To 5
a(i)=Chr(Asc("A")+i)
Call f(a,i)
Next i
End Sub
Sub f(ta( )As String,n As.Integer)
Dim i As Integer
For i=1 To n
Print ta(i);
Next i
Print
End Sub
对上述程序.以下叙述中正确的是( )。
A.程序有错,因为在过程f的定义中数组参数格式不正确
B.程序可正常运行,输出内容的第一行是一个字母“A”
C.程序可正常运行,输出内容的第一行是一个字母“B”
D.程序可正常运行,输出内容的第一行是数字65
7、 下面程序的执行结果是(  )。
Private Sub Command1Click(  )
a=10
For k=1 To 5 Step-I
a=a-k
Next k  
Print a;k
End Sub
A.-5 6
B.-5 -5
C.10 0
D.10 1

8、 下列程序的运行结果是(  )。
Private Function myfun(m,n)
Do while m>n
  Do While m>n:m=m-n:Loop
  Do Wllile n>m:n=n-m:Loop
Loop
myfun=m
End Function
Private Sub Command1_Click(  )
print myfun(9,8)
End Sub
A.2
B.1
C.4
D.3

9、 现有以下程序:
Private Sub Command1 Click(  )
c1=0
c2=0
For i=1 To 100
If i Mod 3=0 Then
c1=c1+1
Else If i Mod 7=0 Then
c2=c2+1
End If
Next i
Print c1+c2
End Sub
此程序运行后输出的是在1~100范围内(  )。
A.同时能被3和7整除的整数个数
B.能被3或7整除的整数个数(同时被3和7整除的数只记一次)
C.能被3整除,而不能被7整除的整数个数
D.能被7整除,而不能被3整除的整数个数

10、 在利用菜单编辑设计菜单时,为了把组合键"Alt+X"设置为”退出(X)”菜单项的访问键,可以将该菜单项的标题设置为(  )。
A.退出(X&)
B.退出(&X)
C.退出(X#)
D.退出(#X)

11、 某二叉树有5个度为2的结点,则该二叉树中的叶子结点数是( )。
A.10
B.8
C.6
D.4

12、 设窗体上有一个名称为HSI的水平滚动条,如果执行了语句:HS1.Value=(HS1.Max·HS1.Min)2+HS1.Min,则(  )。
A.滚动块处于最左端
B.滚动块处于最右端
C.滚动块处于中间位置
D.滚动块可能处于任何位置。具体位置取决于Max、Min属性的值

13、 以下变量名中合法的是(  )。
A.x2-1
B.print
C.str_n
D.2x

14、 在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1),然后编写下列事件过程:
Private Sub Command1 Click( )
x=0
DO While x<50
x=(x+2)*(x4.3)
n=n+1
Loop
Text1.Text=Str(n)
Text2.Text=Str(x)
End Sub
程序运行后,单击命令按钮,在两个文本框中显示的值分别为( )。
A.1和0
B.2和72
C.3和50
D.4和168

15、 标准模块中有如下程序代码:
Public x As Integer,y As Integer
Sub var pub(  )
x=10:y=20
End Sub
在窗体上有1个命令按钮,并有如事件过程:
Private Sub Command1 Click(  )
Dim x As Integer
Call var pub
x=x+100
y=y+100
Print x;y
End Sub
运行程序后单击命令按钮,窗体上显示的是(  )。
A.100 100
B.100 120
C.110 100
D.110 120

16、 假定有以下程序:
Private Sub Form Click(  )
  a=1:b=a
  Do Until a>=5
x=a*b
Print b;X
a=a+b
b=b+a
  Loop
End Sub
程序运行后,单击窗体,输出结果是(  )。
A.1 1
    2 3
B.1 1
    2 4
C.1 1
    3 8
D.1 1
    3 6

17、 下列说法正确的是(  )。
A.任何时候都可以使用标准工具栏的“菜单编辑器”按钮打开菜单编辑器
B.只有当代码窗口为当前活动窗口时,才能打开菜单编辑器
C.只有当某个窗体为当前活动窗体时,才能打开菜单编辑器
D.任何时候都可以使用“工具”菜单下的“菜单编辑器”命令,打开菜单编辑器

18、 数据库设计中,用E—R图来描述信息结构但不涉及信息在计算机中的表示,它属于。数据库设计的(  )。
A.需求分析阶段
B.逻辑设计阶段
C.概念设计阶段
D.物理设计阶段

19、 设窗体上有1个水平滚动条,已经通过属性窗V1把它的Max属性设置为1,Min属性设置为100。下面叙述中正确的是(  )。
A.程序运行时,若使滚动块向左移动,滚动条的Value属性值就增加
B.程序运行时,若使滚动块向左移动,滚动条的Value属性值就减少
C.由于滚动条的Max属性值小于Min属性值,程序会出错
D.由于滚动条的Max属性值小于Min属性值,程序运行时滚动条的长度会缩为一点,滚动块无法移动

20、 下面函数的功能应该是:删除字符串str中所有与变量ch相同的字符,并返回删除后的结果。例如:若str="ABCDABCD",ch="B",则函数的返回值为:"ACDACD"
Function delchar(str As String,ch As String)As String
Dim k As Inlegcr,temp As String,ret As String
ret=""
For k=1 To Len(str)
temp=Mid(str,k,1)
If temp=ch Then
ret=ret&temp
End If
Next k
delchar=ret
En d Function
但实际上函数有错误,需要修改,下面的修改方案中正确的是(  )。
A.把ret=ret&temp改为ret=temp
B.把If temp=ch Then改为If temp<>ch Then
C.把delchar=ret改为delchar=temp
D.把ret=""改为temp=""

21、 数据流程图(DFD图)是(  )。
A.软件概要设计的工具
B.软件详细设计的工具
C.结构化方法的需求分析工具
D.面向对象方法的需求分析工具

22、 设有以下函数过程:
Function fun(a As Integer,b As Integer)
Dim c As Integer
If a c=a:a=b:b=C
End IF
c=0
Do
c=c+a
Loop Until c Mod b=0
fun=c
End Function
若调用函数fun时的实际参数都是自然数,则函数返回的是(  )。
A.a、b的最大公约数
B.a、b的最小公倍数
C.a除以b的余数
D.a除以b的商的整数部分

23、 阅读程序:
Private Sub Command1_Click(  )
Dim arr
Dim i As Integer
arr=Array(0,1,2,3,4,5,6,7,8,9,10)
For i=0 To 2
Print arr(7-i);
Next
End Sub
程序运行后,窗体上显示的是(  )。
A.8 7 6
B.7 6 5
C.6 5 4
D.5 4 3

24、 下面程序计算并输出的是(  )。
Private Sub Command1 Click(  )
a=10
s=0
Do
s=s+a*a*a
a=a-1
Loop Until a<=0
Print s
End Sub
A.13+23+33+…+103的值
B.10!+…+3!+2!+1!的值
C.(1+2+3+…+10)3的值
D.10个103的和

25、 软件设计中划分模块的一个准则是(  )。
A.低内聚低耦合
B.高内聚低耦合
C.低内聚高耦合
D.高内聚高耦合

26、 有三个关系R,S和T如下:

其中关系T由关系R和S通过某种操作得到,该操作为(  )。
A.选择
B.投影
C.交
D.并

27、 下面的语句用 Array函数组变量a的各元素赋整数值:
a=Array(1,2,3.4,5,6,7,8,9)
针对a的声名语句应该是(  )。
A.Dim a
B.Dim a As Integer
C.Dim a(9)As Integer
D.Dim a(  )As Integer

28、 软件详细设计产生的图如下:
该图是(  )。


A.N—S图
B.PAD图
C.程序流程图
D.E—R图

29、 在Visual Basic中,要将一个窗体加载到内存进行预处理但不显示,应使用的语句是(  )。
A.Load
B.Show
C.Hide
D.Unload

30、 假定一个滚动条的LargeChange属性值为100,则100表示(  )。
A.单击滚动条箭头和滚动框之间某位置时滚动框位置的变化量
B.滚动框位置的最大值
C.拖动滚动框位置的变化量
D.单击滚动条箭头时滚动框位置的变化量

31、 设在窗体中有一个名称为List1的列表框,其中有若干个项目(如图)。要求选中某一项后单击Command1按钮,就删除选中的项,则正确的事件过程是(  )。

A.Private Sub Command1 Click(  )
    List1,Clear
End Sub
B.Private Sub Command1 Click(  )
    List1.Clear List1.ListIndex
End Sub
C.Private Sub Command1 Click(  )
    List1 Removeltem List1.ListIndex
End Sub
D.Private Sub Command1 Click(  )
    List1.Removeltem
End Sub

32、 下列叙述中中正确的是(  )。
A.线性表的链式存储结构与顺序存储结构所需要的存储空间是相同的
B.线性表的链式存储结构所需要的存储空间一般要多于顺序存储结构
C.线性表的链式存储结构所需要的存储空间一般要少于顺序存储结构
D.上述三种说法都不对

33、设a、b都是自然数,为求a除以b的余数,某人编写了以下函数:
Eunction fun(a As Integer,b As Integer)
While a>b
a=a—b
Wend
fun=a
End Function
在调试时发现函数是错误的。为使函数能产生正确的返回值,应做的修改是(  )。
A.把a=a-b改为a=b-a
B.把a=a-b改为a=a\b
C.把While a>b改为While a%b
D.把While a>b改为While a>=b

34、
数据库管理系统是(  )。
A.操作系统的一部分
B.在操作系统支持下的系统软件
C.一种编译系统
D.一种操作系统

35、 在窗体上画两个名称分别为Text1、Text2的文本框,一个名称为Label1标签,窗体外观如图a所示,要求当改变任一个文本框的内容,就会将该文本框的内容显示在标签中,如图b所示。实现上述功能的程序如下:

Private Sub Text1_Change(  )
Call ShowText(Text1)
End Sub
Private Sub Text2_Change(  )
Call ShowText(Text2)
End Sub
Private Sub ShowText(T As TextBox)
Labell.Caption="文本框中的内容是:"&T.Text

End Sub
关于上述程序,以下叙述中错误的是(  )。
A.ShowText过程的参数类型可以是Control
B.ShowText过程的参数类型可以是Variant
C.两个过程调用语句有错,应分别改为Call ShowText(Text1,Text)、Call Show Text
(Text2,Text)
D.ShowText过程中的T是控件变量

36、 数据库设计中反映用户对数据要求的模式是(  )。
A.内模式
B.概念模式
C.外模式
D.设计模式

37、 设程序中有如下数组定义和过程调用语句:
Dim a(10)As Integer

Call D(a)
如下过程定义巾,正确的是(  )。
A.Private Sub p(a As Integer)
B.Private Sub p(a(  )As Integer)
C.Private Sub p(a(10)As Integer)
D.Private Sub p(a(n)As Integer)

38、 窗体上有一个名称为Label1的标签和一个名称为Command1的命令按钮。命令按钮的单击事件过程如下:
Private Sub Command1 Click(  )
XzInputBox("输入X:",,0)
y=InputBox("输入y:",,0)
Label1.Caption=x+y
End Sub
运行程序,单击命令按钮,在输入对话框中分别输入2、3,运行的结果是(  )。
A.程序运行有错误,数据类型不匹配
B.程序运行有错误,InputBox函数的格式不对
C.在Label1中显示5
D.在Label1中显示23

39、 下面描述中错误的是(  )。
A.系统总体结构图支持软件系统的详细设计
B.软件设计是将软件需求转换为软件表示的过程
C.数据结构与数据库设计是软件设计的任务之一
D.PAD图是软件详细设计的表示工具

40、 在窗体上画1个命令按钮,并编写如下事件过程:
Private Sub Command1 Click(  )
Dim a(3,3)
For m=1 To 3
For n=1 To 3
If n=m or n=4—m Then
a(m.n)=m+n
Else
a(m,n)=0
End If
Print a(m,n);
Next n
Print
Next m
End Sub
运行程序,单击命令按钮,窗体上显示的内容为(  )。
A.2 0 0
0 4 0
0 0 6
B.2 0 4
0 4 0
4 0 6
C.2 3 0
3 4 0
0 0 6
D.2 0 0
0 4 5
0 5 6

二、基本操作题(共18分)
41、 在名为Form1的窗体上绘制一个名为Cmd1、标题为“显示”的命令按钮。编写适当的事件过程,使程序运行后,若单击“显示”命令按钮,则在窗体上显示“计算机等级考试Vis—ual Basic课程”。程序运行情况如图4-2所示。
注意:不要使用任何变量,直接显示字符串;文件必须存放在考生文件夹中,窗体文件名为sj2.frm,工程文件名为sj2.vbp。


42、

在窗体上绘制一个名称为Text1的文本框,然后建立一个主菜单,标题为“操作”,名
称为0p。该菜单有两个子菜单,其标题分别为“显示”和“退出”,其名称分别为Dis和Exit,
编写适当的事件过程。程序运行后,如果单击“操作”菜单中的“显示”命令,则在文本框中显示“计算机考试”;如果单击“退出”命令,则程序结束。程序的运行情况如图4—1所示。

注意:保存时必须存放在考生文件夹下,窗体文件名为sjl.frm,工程文件名为sjl.vbp。

三、简单应用题(共24分)
43、 在考生文件夹下有一个工程文件sj4.vbp,要求程序运行后,如果多次单击列表框List1中的项,则可同时选择这些项。而如果单击“导出”按钮,则在列表框List2中输出所有选中的列表项,如图1—4所示。

注意:修改列表框List1的适当属性,使得运行时单击可以多选,并去掉程序中的注释符“b’,把程序中的“?”改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的程序以原来的文件名存盘。



44、 在考生文件起下有工程文件sj3.vbp及窗体文件sj3.frm,在窗体上画一个名称为
Text1的文本框和两个名称分别为Command1和Command2、标题分别为“大写A”和“小写a”的命令按钮。要求程序运行后,如果单击“大写A”命令按钮,则弹出对话框,输入要显示的个数,根据输入的故值在文本框中显示相应数量的大写字符串A;如果单击“小写a”命令按钮,也弹出对话框.输入要显示的个数,根据输入的数值在文本框中显示相应数量的小写字符串a。
程序运行时的窗体界面如图5-3所示。

注意:该程序是不完整的,请在有“?”的地方添入正确的内容,然后删除“?”及代码前的所有注释符(即“'”号),但不能修改其他部分。存盘时不得改变文件名和文件夹。

四、综合应用题(共18分)
45、 在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的。在窗体上有一个支本框、两个单选按钮及两个命令按钮。文本框的名称为Text1,内空;两个命令按钮的名称分别为Command1与Command2、标题分别为“读取”与“加密”;单选按钮的名称分别为Option1和Option2,标题分别为“3”和“5”。单击“读取”,程序将读入考生文件夹下的文本支件in5.txt,单击“加密”,加密过的文本显示在Text1中。根据单选按钮中的不同的数字,加密的方法不同。例如,选择Option1,则逐一把读入的字符串改为它前面的第3 个字母。程序运行时效果如图5-5所示。


注意:请在有“?”号的地方填入正确内容,然后删除“?”及代码前的所有注释符(即“'”号),但不能修改其他部分。存盘时不得改变文件名和文件夹。


只看不练,假把式······
进入233题库【模拟考场】,在线做题测试,在线查看成绩及详细答案解析!
马上进入

题库优势

更好的做题体验
233计算机二级题库有四种做题模式,可选择自己的喜欢和当前适合的做题模式进行训练。
更多的习题、真题
233计算机二级题库题量储备百万道,包含历年真题,模拟试题等题型,题题结合考试大纲贴近考试 考点。
更专业的试题解析
233计算机二级题库结合考试大纲,将各试题划分了详细的章节知识,更全面的详细的展示答案解析。
进入计算机二级模拟考场>>




相关阅读



关于我们 | 联系我们 | 用户指南 | 网站地图 | 意见建议 | 会员注册 | 用户协议 | 隐私政策