计算机二级(VB)41
(总分100,考试时间120分钟)
选择题(每小题2分，共70分)  下列各题四个选项中，有一个是正确的，请选择正确答案。
1. 单击命令按钮时，下列程序的执行结果为（  ）。  Private Sub Command1_Click()    Dim x As Integer，y As Integer    x=50：y=78    Call PPP(x，y)    Print x；y  End Sub  Public Sub PPP(ByVal n As Integer，ByValm As Integer)    n=n\10    m=m\10  End Sub
A. 0  8        B. 50  78
C. 4  50        D. 78  50
2. 数据库系统的核心是______。
A. 数据模型          B. 数据库管理系统
C. 数据库        D. 数据库管理员
3. Sub过程与Function过程最根本的区别是（  ）。
A. 12 12        B. 12 21
C. 21 12        D. 21 21
4. 下列程和序段的执行结果为（  ）。  x=Int(Rnd()+9)  Select Case X    Case 10      　Print "excellent"    Case 9      　Print "good"    Case 8      　Print "pass"    Case Else      　Print "fail"  End Select
A.  派生类一般都用公有派生
B.  对基类成员的访问必须是无两义性的
C.  赋值兼容规则也适用于多重继承的组合
D.  基类的公有成员在派生类中仍然是公有的
5. 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：　Private Sub
Command1_Click()  x = -5  If Sgn(x) Then  　y = Sgn(x ^ 2)  Else  　y = Sgn(x)  End If  Print y　End Sub　程序运行后，单击命令按钮，窗体上显示的是（  ）。 
A. -5        B. 25
C. 1        D. -1
6. 为了使模块尽可能独立，要求______。 
A. 模块的内聚程度要尽量高，且各模块间的耦合程度要尽量强 
B. 模块的内聚程度要尽量高，且各模块间的耦合程度要尽量弱 
C. 模块的内聚程度要尽量低，且各模块间的耦合程度要尽量弱 
D. 模块的内聚程度要尽量低，且各模块间的耦合程度要尽量强
7. 关于货币型数据的说明，正确的是（  ）。
A. 货币型数据有时可以表示成整型数据
B. 货币型数据与浮点型数据完全一样
C. 货币型数据是由数字和小数点组成的字符串
D. 货币型数据是小数点位置固定的实型数
8. 在窗体上画一个命令按钮，然后编写如下事件过程：  Sub BTC(old Copy( ) As Integer，new Copy( ) As Integer)    Dim i AS Integer    For i=LBound(oldCopy( ))To UBound(oldCopy( ))    　newCopy(i)=oldCopy(i)    Next i  End Sub  Private Sub Command1 _ Click( )    Dimm(10) As Integer，n(10)As Integer    For i=1 To 10    　m(i) =i*i    　Next i    Call BTC(m，n)    Print n(5)  End Sub  程序运行后，单击命令按钮输出结果为(    )。
会议记录范文A. '65+13'        B. ["电脑商情"]
C. [[中国]]        D. '[x=y]'
9. 下列描述中正确的是______。
A. 程序就是软件          B. 软件开发不受计算机系统的限制 
二级VB
C. 软件既是逻辑实体，又是物理实体          D. 软件是程序、数据与相关文档的集合
广播明星>藏戏的主要特点
10. 下面语句正确的是（  ）。
A. If x<3 * y And x>y Then y=x^3
B. If x<3 * y And x>y Then y=3x
C. If x<3 * y：x>y Then y=x^3
D. If x<3 * y And x>y Then y=x * * 3
11. 以下叙述中错误的是【  】
A. 打开一个工程文件时,系统自动装入与该工程有关的窗体文件
B. 保存Visual Basic程序时,应分别保存窗体文件及工程文件
C. Visual Basic应用程序只能以解释方式执行
D. 窗体文件包含该窗体及其控件的属性
12.  以下语句的输出结果是(    )。  a = Sqr(26)  Print Formats ＄(a，"＄####．###")
A. ＄5.099        B. 5.099
C. 5099        D. ＄0005．099
13. 设有声明语句  Dim b(-1 To 10，2 To 9，20)As Integer  则数组b中全部元素的个数是（  ）。
A. “设计”视图        B. “打印预览”视图
C. “报表预览”视图        D. “版面预览”视图
14. 如果要将窗体中的某个命令按钮设置成无效状态，应该动命令按钮的何种属性？
A.  Value        B.  Visible
C.  Default        D.  Enabled
陈乔恩老公 个人资料15. 下列程序执行的结果为（  ）。  x=25：y=20：z=7  Print "S"；x+z*y；")"
A. !a=b        B. a!=b
C. a=：b        D. a=b
16. 下列关于栈的描述中错误的是______。 
A. 栈是先进后出的线性表          B. 栈只能顺序存储
C. 栈具有记忆作用          D. 对栈的插入与删除操作中，不需要改变栈底指针
17. 有如下程序：  Private Sub Command1_Click()Dim k As Integer，m As Integer  　Dim op As Integer  　k=4：m=1  　op：PPC(k，m)：Print op；  　op：PPC(k，m)：Print op  End Sub  Private Function，PPC(a As Integer，b As Integer)  　Static m As Integer，i As Integer  　m=0：i=2  　i=i+m+1  　m=i+a+b  　PPC=m  End Function  程序运行后，输出的结果为(    )。
A. 4  6        B. 6  6
C. 8  8        D. 10  12
18. 下列说法正确的是（  ）。
A.  对象的可见性可设为True或False
B.  标题的属性值不可设为任何文本
C.  属性窗口中属性只能按字母顺序排列
D.  某些属性的值可以跳过不设置，自动设为空值
19. 使“计算机技术”在当前窗体上输出的语句是（  ）。
A. MenuOne．Visible=Tree
B. MenuOne．Visible=False
C. MenuOne．Enabled=True
D. MenuOne．Enabled=False
20. 为了使命令按钮（名称为Command1）右移200，应使用的语句是______。 机动车辆交强险
A. Command1.Move -200
B. Command1.Move 200
C. Command1.Left = Command1.Left + 200
D. Command1.Left = Command1.Left -  200
21.  以下程序运行后，单击按钮输出结果是(    )。  Private Sub Commandl_Click( )    Dim x As Integer，y As Integer，z As Integer    X=4：y=2： Z=3    Call Gopd(x，x，z)    Print x；X；Z    Call Gopd(x，y，y)    Print x；y；y  End Sub  Private Sub Gopd(x As Integer，y As Integer，z As Integer)    X=3 * Z + 1    y=2 * z    z=x + y  End Sub
A. 6　6　12 7  11 11
B. 8　5　105  11 11
C. 9　6　129  10 15
D. 8　10　105  9  10
22. 下列程序的执行结果为(    )。  a=10  b=20  If a ＜ ＞ b Then a=a + b Else b=b-a  Print a，b
A.  ．，．* ，- > * ，：：，?：
B.  ++，--，new，delete，==
C.  sizeof，new，delete，++，--
D.  sizeof，new，delete，+，-
23. 以下叙述中正确的是【  】
A. 窗体的Name属性指定窗体的名称,用来标识一个窗体
B. 窗体的Name属性值是显示在窗体标题栏中的文本
C. 可以在运行期间改变窗体的Name属性的值
D. 窗体的Name属性值可以为空
24. 在窗体上有1个名称为Text1的文本框和1个名称为Command1的命令按钮,要求在程序执行时,每单击命令按钮一次,文本框向右移动一定距离。下面能够正确实现上述功能的程序是【  】
A. Private Sub Command1_Click()  Text1.Left=100    End Sub
B. Private Sub Command1.Click() Text1.Left=Text1l.Left-100  End Sub 
C. Private Sub Cornmand1_Click()Text1.Move Text1.Left+100    End Sub
D. Private Sub Command1_Click()Text1.Move Text1.Left    End Sub
25. 在窗体上添加标签控件Label1之后，标签控件的默认的名称Name是（  ）。
A.  Label        B.  Label1
C.  Text        D.  Text1
26. 在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下事件过程：  Private Sub Command1_Click()  　n = Val(Text1.Text)  　For i = 2 To n    For j = 2 To sqr(i)    　If i Mod j = 0 Then Exit For    Next j    If j > Sqr(i) Then Print i  　Next i  End Sub  该事件过程的功能是（  ）。