二级VISUALBASIC-92_真题-无答案
二级VISUAL BASIC-92
(总分100,考试时间90分钟)
选择题
1. 阅读程序：
Option Base 1
Private Sub Form_Click()
Dim Arr(3, 3) As Integer
For i=1 To 3
For i=1 To 3
If j=i Or j=3-i+1 Then
Arr(i, j)=1
Else
Arr(i, j)=0
End If
Next j
Next i
For i=1 To 3
For j=1 To 3
Print Arr(i, j);
Next j
Next i
End Sub
程序运行后，如果单击窗体，则输出结果为
A. 1 1 11 1 11 1 1 B. 0 0 00 0 00 0 0
C. 1 0 00 1 00 0 1 D. 1 0 11 0 10 1 0
2. 有下面程序代码：
Private Sub Command1_Click()i=1
Do While i＜5
j=1
Do j=j+1
Print "*";
Loop Until i+j＞10
Print i=i+2
Loop
End Sub
程序运行时输出字符“*”的个数是
A. 50 B. 20
C. 16 D. 15
3. 以下数组定义语句中，错误的是
A. Static a(10) As Integer
B. Dim c(3，1 To 4)
C. Dim d(-10)
D. Dim b (0 To 5，1 To 3) As Integer
4. 语句Dim a(-3 To 4，3 To 6)As Integer定义的数组的元素个数是
A. 18 B. 28
C. 21 D. 32
5. 下面正确使用动态数组的是
A. Dim arr () AsInteger…ReDim arr(3, 5)
B. Dim arr() As Integer…ReDim arr (50) As String
C. Dim arr()…ReDim arr(50) As Integer
D. Dim arr(50) As Integer…ReDim arr(20)
6. 设有如下数组定义语句：
Dim a(-1 To 4，3)As Integer
以下叙述中正确的是
A. a数组有18个数组元素 B. a数组有20个数组元素
C. a数组有24个数组元素 D. 语法有错
7. 语句DimArr(-2 To 4) As Integer所定义的数组的元素个数为
A. 7个 B. 6个
C. 5个 D. 4个
8. 下列数组定义中错误的是
A. Dim a(-5 To -3) B. Dim a(3 To 5)
C. Dim a(-3 To -5) D. Dim a(-3 To 3)
9. 以下关于数组的叙述中，错误的是
A. Variant类型的数组中各数组元素的类型可以不同
B. 各数组元素可以是不同类型的控件
C. 各数组元素通过下标进行区别
D. 各数组元素具有相同的名称
10. 设有如下声明语句
Option Base 1
Dim arr(2, -1 To 5)As Integer
则数组arr中数组元素的个数是
A. 10 B. 12
C. 14 D. 21
11. 以下叙述中错误的是
A. 用ReDim语句可以改变数组的维数
B. 用ReDim语句可以改变数组的类型
C. 用ReDim语句可以改变数组每一维的大小
D. 用ReDim语句可以对数组中的所有元素置0或空字符串
12. 设有下面的程序段：
x=InputBox("请输入一个整数")
ReDim a(x)
For k=x To 0 Step -1
a(k)=k
Next k
一般，在这段程序之前应先进行数组a的定义。下面定义语句中正确的是
A. Dim a(100)As Integer
B. Dim a()As Integer
C. Dim a As Integer
D. Dim a(0 To 100) As Integer
13. 如果要在语句：a=Array(1，2，3，4，5)的前面声明变量a，则正确的声明是
A. Dim a(4)As Integer
B. Dim a(5)As Variant
C. Dim a(1 To 5)As Integer
D. Dim a As Variant
14. 设有如下一段程序：
Private Sub Command1_Click()
Static a As Variant
a=Array("one", "two", "three", "four", "five")
Print a(3)
End Sub
针对上述事件过程，以下叙述中正确的是
A. 变量声明语句有错，应改为Static a(5)As Variant
B. 变量声明语句有错，应改为Static a
C. 可以正常运行，在窗体上显示three
D. 可以正常运行，在窗体上显示four
15. 在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码：
Private Sub Command1_Click()
Dim n() As Integer
Dim a, b As Integer
a=InputBox("Enter the first number")
b=InputBox("Enter the second number")
ReDim n(a To b)
For k=LBound(n) To UBound(n)
n(k)=k
Print n(k);
Next k
End Sub
程序运行后，单击命令按钮，在输入对话框中分别输入2和3，输出结果为
A. 1 2 B. 2 3
C. 3 4 D. 4 5
16. 在程序中要使用Array函数给数组arr赋初值，则以下数组变量定义语句中错误的是
A. Static arr B. Dim arr(5)
C. Dim arr() D. Dim arr As Variant
17. 有下面程序代码：
Private Sub Command1_Click()
a=Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10):n=UBound(a)
For k=0 To UBound(a)/2
Print a(k)*a(n); :n=n-1
Next k
End Sub
程序运行后，单击命令按钮Command1，输出结果是
A. 2 6 12 20 30 B. 2 12 20 56 90
C. 30 28 24 18 10 D. 10 18 24 28 30
18. 有下面程序代码：
Option Base 1
Private Sub Command1_Click()
Dim a(10)As Integer, x, b
x=InputBox("请输入一个多位整数")
For k=1 To Len(x)
b=Mid(x, k, 1)
a(Val(b)+1)=a(Val(b)+1)+1
Next k
For k=1 To 10
Print a(k);
Next k
End Sub
程序运行时，单击命令按钮Command1，输入2355270224，则输出是
A. 1 0 4 1 1 2 0 1 0 0
B. 0 4 1 1 2 0 1 0 0 0
C. 2 3 5 5 2 7 0 2 2 4
D. 4 2 2 0 7 2 5 5 3 2
19. 窗体上有Command1、Command2两个命令按钮。现编写以下程序：
Option Base 0 Dim
a() As Integer, m As Integer
Private Sub Command1_Click()
m=InputBox("请输入一个正整数")
ReDim a(m)
End Sub
Private Sub Command2_Click()
m=InputBox("请输入一个正整数")
ReDim a(m)
End Sub
运行程序时，单击Command1后输入整数10，再单击Command2后输入整数5，则数组a中元素的个数是
A. 5 B. 6
C. 10 D. 11
20. 在窗体上画一个名为Command1的命令按钮，然后编写以下程序：
Private Sub Command1_Click()
Dim M(10) As Integer
For k=1 To 10
M(k)=12-k
Next k
x=8
Print M(2+M(x))
End Sub
运行程序，单击命令按钮，在窗体上显示的是
A. 6 B. 5
C. 7 D. 8
21. 在窗体上画一个命令按钮和一个标签，其名称分别为Command1和Label1，然后编写如下事件过程：
Private Sub Command1_Click()
Dim arr(10)
For i=6 To 10
arr(i)=i-5
Next i
Label1.Caption=arr(0)+arr(arr(10)/arr(6))
End Sub
运行程序，单击命令按钮，则在标签中显示的是
A. 0 B. 1
C. 2 D. 3
22. 在窗体上画一个名称为Text1的文本框，并编写如下程序：
Option Base 1
Private Sub Form_Click()
Dim arr
Dim Start As Integer, Finish As Integer Sum As Integer
arr=Array(12, 4, 8, 16)
Start=LBound(arr):Finish=UBound(arr):Sum=0
For i=Start To Finish
Sum=Sum+arr(i)
Next i
c=Sum/Finish
Text1.Text=c
End Sub
运行程序，单击窗体，则在文本框中显示的是
A. 40 B. 10
C. 12 D. 16
23. 以下过程的功能是从数组中寻找最大值：
Private Sub FindMax(a() As Integer, ByRef Max As Integer)
Dim s As Integer, f As Integer Dim i As Integer
S=LBound(a):f=UBound(a)
Max=a(s)
2005年9月全国计算机等级考试《二级Visual Basic语言程序设计》真题及答案
二级Visual Basic语言程序设计试卷 第1页（共11页） 2005年9月全国计算机等级考试二级笔试试卷 公共基础知识和Visual Basic语言程序设计 （考试时间90分钟，满分100分） 一、选择题（每小题2分，共70分） （1）下列叙述中正确的是（ ）。 A）程序设计就是编制程序 B）程序的测试必须由程序员自己去完成 C）程序经调试改错后还应进行再测试 D）程序经调试改错后不必进行再测试 （2）下列数据结构中，能用二分法进行查找的是（ ）。 A）顺序存储的有序线性表 B）线性链表 C）二叉链表 D）有序线性链表 （3）下列关于栈的描述正确的是（ ）。 A）在栈中只能插入元素而不能删除元素 B）在栈中只能删除元素而不能插入元素 C）栈是特殊的线性表，只能在一端插入或删除元素 D）栈是特殊的线性表，只能在一端插入元素，而在另一端删除元素 （4）下列叙述中正确的是（ ）。 A）一个逻辑数据结构只能有一种存储结构 B）数据的逻辑结构属于线性结构，存储结构属于非线性结构 C）一个逻辑数据结构可以有多种存储结构，且各种存储结构不影响数据处理的效率 D）一个逻辑数据结构可以有多种存储结构，且各种存储结构影响数据处理的效率 （5）下列描述中正确的是（ ）。 A）软件工程只是解决软件项目的管理问题 B）软件工程主要解决软件产品的生产率问题 C）软件工程的主要思想是强调在软件开发过程中需要应用工程化原则 D）软件工程只是解决软件开发中的技术问题 （6）在软件设计中，不属于过程设计工具的是（ ）。A）PDL（过程设计语言）B）PAD图 C）N-S图D）DFD图 （7）下列叙述中正确的是（ ）。 A）软件交付使用后还需要再进行维护 B）软件一旦交付使用就不需要再进行维护 C）软件交付使用后其生命周期就结束 D）软件维护是指修复程序中被破坏的指令 （8）数据库设计的根本目标是要解决（ ）。 A）数据共享问题 B）数据安全问题 C）大量数据存储问题 D）简化数据维护 （9）设有下列关系表： 整理：陈远跃
Visual Basic程序—考试题库及答案
已知：Option Base 1，Dim a() As Integer, Dim b(-1 to 2) As Integer，Dim c(4) As Single，则下列赋值操作中，正确的赋值是( )。
收藏
A.
a=b
B.
b=a
C.
c=a
D.
a=c
回答错误!正确答案： A
a为数组名，合法的数组元素是＿＿＿＿＿＿。
收藏
A.
a[2]
B.
a(a)
C.
a
D.
a(a(2))
回答错误!正确答案： D 如果变量nop的值为2，则执行完语句“op = Choose(nop, "+", "-", "*", "/")”后，op的值为( )。
收藏
A.
*
B.
/
C.
+
D.
-
回答错误!正确答案： D
VB采用的数据访问技术为：
收藏
A.
ADO
B.
SQL
C.
WHERE
D.
selecｔ
回答错误!正确答案： A 下列关于“Do While 条件 : 循环体 : Loop”这种循环结构的叙述中，正确的叙述为( )。
收藏
A.
如果“条件”为常数0，则执行无限次循环体
B.
如果“条件”为常数-1，则只执行一次循环体
C.
如果“条件”为常数-1，则一次循环体也不执行
D.
如果“条件”为常数0，则一次循环体也不执行
回答错误!正确答案： D
下列标识符中，属于合法变量名的标识符是( )。
收藏
A.
bAC
B.
X-3
C.
n$1
D.
4y
回答错误!正确答案： A 用Append方式打开文件时，文件指针被定位在
收藏
A.
文件末尾减1
B.
文件开始加1
C.
文件开始
D.
文件末尾
回答错误!正确答案： D
x,y均为整数，下列正确的条件语句是( )。
收藏
A.
if 3*y>x>y then y=x^3
B.
if x<3*y : x>y then y=x^3
二级VISUALBASIC笔试-320_真题-无答案
二级VISUAL BASIC笔试-320
(总分100,考试时间90分钟)
一、选择题
下列各题A)、B)、C)、D)四个选项中，只有一个选项是正确的，请选出正确选项。
1. 有如下程序：
Function F(a As Integer)
b = 0
Static C
b = b + 1
c = c + 2
F = a + b + c
End Function
Private Sub Command1_Click()
Dim a As Integer
a = 2
For i=1 To 3
Print F(
A. ；
Next i
End Sub
2. 下列关于队列的叙述正确的是
A. 在队列中只能插入数据 B. 在队列中只能删除数据
C. 队列是先进先出的线性表 D. 队列是先进后出的线性表
3. 假定窗体的名称(Name属性)为Form1，则将窗体的标题设置为“等级考试”的语句为
A. Form1="等级考试" B. Caption="等级考试"
C. Form1．Text="等级考试" D. Form1．Name="等级考试"
4. 将E-R图转换到关系模式时，实体与联系都可以表示成
A. 属性 B. 关系
C. 键 D. 域
5. 算法指的是
A. 计算机程序 B. 解决问题的计算方法
C. 排序算法 D. 解题方案准确而完整的描述
6. 在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1)，然后编写如下两个事件过程：
Private Sub Command1_Click()
2007年4月全国计算机等级考试《二级Visual Basic语言程序设计》真题及答案
二级Visual Basic语言程序设计试卷 第1页（共11页） 2007年4月全国计算机等级考试二级笔试试卷 公共基础知识和Visual Basic语言程序设计 （考试时间90分钟，满分100分） 一、选择题（每小题2分，共70分） （1）下列叙述中正确的是（ ）。 A）算法的效率只与问题的规模有关，而与数据的存储结构无关 B）算法的时间复杂度是指执行算法所需要的计算工作量 C）数据的逻辑结构与存储结构是一一对应的 D）算法的时间复杂度与空间复杂度一定相关 （2）在结构化程序设计中，模块划分的原则是（ ）。 A）各模块应包括尽量多的功能 B）各模块的规模应尽量大 C）各模块之间的联系应尽量紧密 D）模块内具有高内聚度、模块间具有低耦合度 （3）下列叙述中正确的是（ ）。 A）软件测试的主要目的是发现程序中的错误 B）软件测试的主要目的是确定程序中错误的位置 C）为了提高软件测试的效率，最好由程序编制者自己来完成软件测试的工作 D）软件测试是证明软件没有错误 （4）下列选项中不属于面向对象程序设计特征的是（ ）。A）继承性 B）多态性 C）类比性 D）封装性 （5）下列对队列的叙述正确的是（ ）。 A）队列属于非线性表B）队列按“先进后出”原则组织数据 C）队列在队尾删除数据D）队列按“先进先出”原则组织数据 （6）对下列二叉树： 进行前序遍历的结果为（ ）。A）DYBEAFCZX B）YDEBFZXCA C）ABDEYCFXZ D）ABCDEFXYZ （7）某二叉树中有n个度为2的结点，则该二叉树中的叶子结点数为（ ）。A）n+1 B）n-1 C）2nD）n/2 （8）在下列关系运算中，不改变关系表中的属性个数但能减少元组个数的是（ ）。A）并 B）交C）投影D）笛卡尔乘积 （9）在E-R图中，用来表示实体之间联系的图形是（ ）。A）矩形 B）椭圆形C）菱形D）平行四边形 （10）下列叙述中错误的是（ ）。 A）在数据库系统中，数据的物理结构必须与逻辑结构一致 整理：陈远跃
全国计算机等级考试二级VISUALBASIC题库12015年9月_真题-无答案
全国计算机等级考试二级VISUAL BASIC题库1 2015年9月
(总分100,考试时间120分钟)
一、选择题
1. 窗体上有多个控件，在Form_Activate()事件过程中添加__________语句，就可确保每次运行程序时，都将光标定位在文本框Text1上。
A. Text1．Text="" B. Text1．SetFocus
C. Form1．SetFocus D. Text1．Visible=True
2. 语句Print "5*20"输出的结果是__________。
A. "5*20" B. 出现错误信息
C. 5*20 D. 100
3. 不能打开代码窗口的操作是__________。
A. 双击窗体设计器的任何地方 B. 按下F4键
C. 单击工程窗口中的“查看代码”按钮 D. 选择“视图”下拉菜单中的“代码窗口”
4. 在VB中可以作为容器的是__________。
A. Form、TextBox、PictureBox
B. Form、PictureBox、Frame
C. Form、TextBox、Label
D. PictureBox、TextBox、ListBox
5. 能被对象所识别的动作与对象可执行的活动分别称为对象的__________。
A. 方法、事件 B. 过程、方法
C. 事件、属性 D. 事件、方法
6. 计算下面的表达式，其值是__________。CInt(4.5) * Fix(-3.81) + Int(4.1) * (5 Mod 3) 4
-3 4 2
A. -7 B. -4
C. -8 D. 6
7. 以下有关对象属性的说法中正确的是__________。
A. 对象所有的属性都罗列在属性窗口列表中
B. 不同对象不可能有同名属性
C. 不同对象的同名属性取值一定相同
二级VISUAL+BASIC笔试-98
二级VISUAL BASIC笔试-98
(总分：100.00，做题时间：90分钟)
一、选择题(总题数：35，分数：70.00)
1.在面向对象方法中，一个对象请求另一对象为其服务的方式是通过发送________。
（分数：2.00）
A.调用语句
B.命令
C.口令
D.消息 √
解析：
2.数据库技术处于数据库系统阶段的时间段是________。
（分数：2.00）
A.60年代后期到现在 √
B.60年代到80年代中期
C.80年代以前
D.70年代以前
解析：
3.以下关于多重窗体程序的叙述中，错误的是________。
（分数：2.00）
A.用Hide方法不但可以隐藏窗体，而且能清除内存中的窗体 √
B.在多重窗口程序中，各窗体的菜单是彼此独立的
C.在多重窗口程序中，可以根据需要指定启动窗体
D.对于多重窗口程序，需要单独保存每个窗体
解析：
4.数据库设计包括两个方面的设计内容，它们是________。
（分数：2.00）
A.概念设计和逻辑设计 √
B.模式设计和内模式设计
C.内模式设计和物理设计
D.结构特性设计和行为特性设计
解析：
5.窗体文件的扩展名是________。
（分数：2.00）
A..frm √
B..vbp
C..bas
D..frx 解析：
6.为了提高测试的效率，应该________。
（分数：2.00）
A.随机地选取测试数据
B.取一切可能的输入数据作为测试数据
C.在完成编码以后制定软件的测试计划
D.选择发现错误可能性大的数据作为测试数据 √
解析：
7.运行下列程序：
Private Sub Command1_Click( )
x = 0
Do While x ＜ 10
x = x * x + 1
y = y + x
Loop
MsgBox y
End Sub
计算机程序设计-VisualBasic【VB】考试试题(2)
（2）《计算机程序设计-VB》-摸底(2)
一、 单选题（共100题，50分）
1、VB6.0 集成开发环境中，不能完成的功能是（ ）。
A、 编译生成可执行程序
B、 输入编辑源程序
C、 调试运行程序
D、 自动查找并改正程序中的错误
正确答案： D
解析：
2、VB 窗体设计器的主要功能是（ ）。
A、 显示文字
B、 建立用户界面
C、 画图
D、 编写源程序代码
正确答案： B
解析：
3、将调试通过的工程，经"文件"菜单的"生成.exe文件"编译成.exe文件后，该可执行文件到其他机器上不能运行的主要原因是（ ）。
A、 运行的机器上无VB系统
B、 该可执行文件有病毒
C、 以上原因都不对
D、 缺少.frm窗体文件
正确答案： A
解析：
4、VB6.0 集成开发环境可以（ ）。
A、 编辑、调试、运行程序，但不能生成可执行程序
B、 编辑、生成可执行程序、运行程序，但不能调试
C、 编辑、调试、生成可执行程序，但不能运行程序
D、 编辑、调试、运行程序，也能生成可执行程序
正确答案： D
解析：
5、在 Visual Basic 中最基本的对象是（ ），它是应用程序的基石，是其他控件的容器。
A、 文本框
B、 窗体
C、 标签
D、 命令按钮
正确答案： B
解析：
6、VB 是一种面向对象的可视化程序设计语言，采取了（ ）的编程机制。
A、 从主程序开始执行
B、 按模块顺序执行
C、 事件驱动
D、 按过程顺序执行
正确答案： C
解析：
7、英文缩写"OOP"的含义是（ ）。
A、 事件驱动的编程机制
B、 结构化程序设计语言
C、 面向对象程序设计
D、 可视化程序设计
正确答案： C
解析：
8、VB6.0 是一种面向（ ）的编程环境。
A、 过程
B、 机器
C、 应用
D、 对象
正确答案： D
解析：
9、下面所列符号中，_________不是数据类型说明符。
2006年4月全国计算机等级考试《二级Visual Basic语言程序设计》真题及答案
二级Visual Basic语言程序设计试卷 第1页（共11页） 2006年4月全国计算机等级考试二级笔试试卷 公共基础知识和Visual Basic语言程序设计 （考试时间90分钟，满分100分） 一、选择题（每小题2分，共70分） （1）下列选项中不属于结构化程序设计方法的是（ ）。A）自顶向下 B）逐步求精 C）模块化 D）可复用 （2）两个或两个以上模块之间关联的紧密程度称为（ ）。A）耦合度 B）内聚度 C）复杂度 D）数据传输特性 （3）下列叙述中正确的是（ ）。 A）软件测试应该由程序开发者来完成 B）程序经调试后一般不需要再测试 C）软件维护只包括对程序代码的维护 D）以上3种说法都不对 （4）按照“后进先出”原则组织数据的数据结构是（ ）。A）队列 B）栈 C）双向链表 D）二叉树 （5）下列叙述中正确的是（ ）。 A）线性链表是线性表的链式存储结构 B）栈与队列是非线性结构 C）双向链表是非线性结构 D）只有根结点的二叉树是线性结构 （6）对下列二叉树： 进行后序遍历的结果为（）。A）ABCDEF B）DBEAFC C）ABDECF D）DEBFCA 整理：陈远跃
二级Visual Basic语言程序设计试卷 第2页（共11页） （7）在深度为7的满二叉树中，叶子结点的个数为（ ）。 A）32 B）31 C）64 D）63 （8）“商品”与“顾客”两个实体集之间的联系一般是（ ）。 A）一对一 B）一对多 C）多对一 D）多对多 （9）在E-R图中，用来表示实体的图形是（ ）。 A）矩形 B）椭圆形 C）菱形 D）三角形 （10）数据库DB、数据库系统DBS、数据库管理系统DBMS之间的关系是（ ）。 A）DB包含DBS和DBMS B）DBMS包含DB和DBS C）DBS包含DB和DBMS D）没有任何关系 （11）下列关于Visual Basic特点的叙述中，错误的是（ ）。 A）Visual Basic是采用事件驱动编程机制的语言 B）Visual Basic程序既可以编译运行，也可以解释运行 C）构成Visual Basic程序的多个过程没有固定的执行顺序 D）Visual Basic程序不是结构化程序，不具备结构化程序的3种基本结构 （12）下列叙述中错误的是（ ）。 A）一个Visual Basic应用程序可以含有多个标准模块文件 B）一个Visual Basic工程可以含有多个窗体文件 C）标准模块文件可以属于某个指定的窗体文件 D）标准模块文件的扩展名是.bas （13）下列叙述中错误的是（ ）。 A）在Visual Basic中，对象所能响应的事件是由系统定义的 B）对象的任何属性既可以通过属性窗口设定，也可以通过程序语句设定 C）Visual Basic中允许不同对象使用相同名称的方法 D）Visual Basic中的对象具有自己的属性和方法 （14）有下列语句： Dim a,b As Integer c="VisualBasic" d=#7/20/2005# 下列关于这段代码的叙述中错误的是（ ）。 A）a被定义为Integer类型变量 B）b被定义为Integer类型变量 C）c中的数据是字符串 D）d中的数据是日期类型 （15）下列能从字符串"VisualBasic"中直接取出子字符串"Basic"的函数是（ ）。 A）Left
二级VISUALBASIC-25-2_真题-无答案
二级VISUAL BASIC-25-2
(总分71,考试时间90分钟)
一、选择题
1. 以下程序运行后，输出结果是____。
For i=1 To 3
Print Tab(3*j);2*(j-1)
Next j
A. 1325 B. 19 25
C. 024 D. 135
2. 下列选项，不属于模块间耦合的是
A. 数据耦合 B. 同构耦合
C. 异构耦合 D. 公用耦合
3. 设用复制、粘贴的方法建立了一个命令按钮数组Command1，以下对该数组的说法错误的是
A. 命令按钮的所有Caption属性都是Command1
B. 在代码中访问任意一个命令按钮只需使用名称Command1
C. 命令按钮的大小都相同
D. 命令按钮共享相同的事件过程
4. 下列不属于软件工程三要素的是
A. 工具 B. 过程
C. 方法 D. 环境
5. 一个工程中含有窗体Form1、Form2和标准模块Model1，如果在Form1中有语句Public X
As Integer，在Model1中有语句Public Y As Integer，则以下叙述中正确的是____。
A. 变量X、Y的作用域相同 B. Y的作用域是Model1
C. 在Form1中可以直接使用X D. 在Form2中可以直接使用X和Y
6. 窗体上有一个名称为Text1的文本框，一个名称为Command1的命令按钮。窗体文件的程序如下：
Private Type x
a As Integer:b As Integer
End Type
Private Sub Command1_Click()
Dim y As x
y.a=InputBox("")
If y.a\2=y.a/2 Then
y.b=y.a*y.a
Else
y.b=Fix(y.a/2)
End If
Text1.Text=y.b
二级VISUALBASIC笔试-394_真题-无答案
二级VISUAL BASIC笔试-394
(总分104,考试时间90分钟)
一、选择题下列各题A、B、C、D四个选项中，只有一个选项是正确的
1. 下面叙述中正确的是( )。
A. SW函数只能用于Print方法中
B. Space函数既可以用于Print方法中，也能用于表达式
C. Spc函数与Space函数均生成空格，没有区别
D. 以上说法均不对
2. 设有如下语句： Dim a，b As Integer c="VisualBasic" d=#7/20/2005# 以下关于这段代码的叙述中，错误的是( )。
A. a被定义为Integer类型变量 B. b被定义为Integer类型变量
C. c中的数据是字符串 D. d中的数据是日期类型
3. 在VisualBasic中，要使标签的标题居中显示，则将其Alignment属性设置为( )。
A. 0 B. 2
C. 1 D. 3
4. 下面程序运行后的结果是( )。 Private Sub Form_Click() Dim s As Integer，k As
Integer,i As Integer，n As Integer s=1 fori=1 to 3 forj=i to 3 for k=j to istep-1
s=s*k nextk,J,i print s End Sub
A. 6 B. 72
C. 144 D. 432
5. 当对命令按钮的Picture属性装入.bmp图形文件后，命令按钮上并没有显示所需的图形，原因是没有对某个属性设置为1，该属性是( )。
A. MousePicture B. Style
C. DownPicture D. DisabledPicture
6. 任何控件都具有( )属性。
A. Text B. Caption