2012年3月VB试卷和答案
2012年3月全国计算机等级考试二级笔试试卷
Visual Basic 语言程序设计
（考试时间90分钟，满分100分）
一、选择题（每小题2分，共70分）
下列各题A ）、B ）、C ）、D ）四个选项中，只有一个选项是正确的。请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。
（1）下列叙述中正确的是
A ）循环队列是队列的一种链式存储结构
B ）循环队列是队列的一种顺序存储结构
C ）循环队列是非线性结构
D ）循环队列是一种逻辑结构
（2）下列叙述中正确的是
A ）栈是一种先进先出的线性表
B ）队列是一种后进先出的线性表
C ）栈与队列都是非线性结构
D ）以上三种说法都不对
（3）一棵二叉树共有25个结点，其中5个是叶子结点，则度为1的结点数为
A ）16
B ）10
C ）6
D ）4
（4）在下列模式中，能够给出数据库物理存储结构与物理存取方法的是
A ）外模式
B ）内模式
C ）概念模式
D ）逻辑模式
（5）在满足实体完整性约束的条件下
A ）一个关系中应该有一个或多个候选关键字
B ）一个关系中只能有一个候选关键字
C ）一个关系中必须有多个候选关键字
D ）一个关系中可以没有候选关键字
（6）有三个关系R 、S 和T 如下：
R S T
则由关系R 和S 得到关系T 的操作是 A ）自然连接 B ）并 C ）交
D ）差 （7）软件生命周期中的活动不包括 A ）市场调研 B ）需求分析
C ）软件测试
D ）软件维护 （8）下面不属于需求分析阶段任务的是
A ）确定软件系统的功能需求
B ）确定软件系统的性能需求
C ）需求规格说明书评审 A B C
a 1 2
b 2 1
c 3 1 A B C a 1 2
d 2 1 A B C b 2 1 c 3 1
D ）制定软件集成测试计划 （9）在黑盒测试方法中，设计测试用例的主要根据是
A ）程序内部逻辑
B ）程序外部功能
C ）程序数据结构
D ）程序流程图
（10）在软件设计中不适用的工具是
A ）系统结构图
B ）PAD 图
C ）数据流图（DF
D 图） D ）程序流程图
（11）以下合法的VB 变量名是
A ）case
B ）name10
C ）t-name
D ）x*y
（12）设x 是小于10的非负数。对此陈述，以下正确的VB 表达式是 A ）0≤x<10 B ）0<=x<10 C ）x ≥0 And x<10 D ）X>=0 Or x<=10
（13）以下关于窗体的叙述中，错误的是
A ）窗体的Name 属性用于标识一个窗体
B ）运行程序时，改变窗体大小，能够触发窗体的Resize 事件
C ）窗体的Enabled 属性为False 时，不能响应单击窗体的事件
D ）程序运行期间，可以改变Name 属性值
（14）下面定义窗体级变量a 的语句中错误的是
A ）Dim a%
B ）Private a%
C ）Private a as Integer
D ）Static a%
（15）表达式 Int(Rnd(0)*50)所产生的随机数范围是
A ）(0,50)
B ）(1,50)
C ）(0,49)
D ）(1,49)
（16）设x=5，执行语句Print x=x+10，窗体上显示的是
A ）15
B ）5
C ）True
D ）False
（17）设有如下数组声明语句：
Dim arr(-2 To 2, 0 To 3) As Integer
该数组所包含的数组元素个数是
A ）20
B ）16
C ）15
D ）12
（18）现有由多个单选按钮构成的控件数组，用于区别该控件数组中各控件的属性是
A ）Name
B ）Index
C ）Caption
D ）Value
（19）设有分段函数：
5 x<0
y= x*2 0≤x ≤5
x*x+1 x>5
以下表示上述分段函数的语句序列中错误的是
A ）Select Case x
B ）If x<0 Then
Case Is<0 y=5
y=5 ElseIf x<=5 Then
Case Is<=5,IS>0 y=2*x
y=2*x Else
Case Else y=x*x+1
y=x*x+1 End If
End Select
C ）y=IIf(x<0,5,IIf(x<=5,2*x,x*x+1)) D
）If x<0 Then y=5
If x<=5 And x>=0 Then y=2*x
If x>5 Then y=x*x+1
（20）设程序中有如下语句：
x=InputBox("输入","数据",100)
Print x
运行程序，执行上述语句，输入5并单击输入对话框上的“取消”按钮，则窗体上输出
A ）0
B ）5
C ）100
D ）空白
（21）现有如下一段程序：
Option Base 1
Private Sub Command1_Click()
Dim a
a = Array(3, 5, 7, 9)
x = 1
For i = 4 To 1 Step -1
s = s + a(i) * x
x = x * 10
Next
Print s
End Sub
执行程序，单击Command1命令按钮，执行上述事件过程，输出结果是
A ）9753
B ）3579
C ）35
D ）79
（22）设有一个命令按钮Command1的事件过程以及一个函数过程。程序如下：
Private Sub Command1_Click()
Static x As Integer
x = f(x + 5)
Cls
Print x
End Sub
Private Function f(x As Integer) As Integer
f = x + x End Function
连续单击命令按钮3次，第3次单击命令按钮后，窗体上显示的计算结果是
A ）10
B ）30
C ）60
D ）70
（23）以下关于菜单设计的叙述中错误的是
A ）各菜单项可以构成控件数组
B ）每个菜单项可以看成是一个控件
C ）设计菜单时，菜单项的“有效”未选，即，表示该菜单项不显示
D ）菜单项只响应单击事件
（24）以下关于多窗体的叙述中，正确的是
A ）任何时刻，只有一个当前窗体
B ）向一个工程添加多个窗体，存盘后生成一个窗体文件
C ）打开一个窗体时，其他窗体自动关闭
D ）只有第一个建立的窗体才是启动窗体
（25）窗体上有一个名称为CommonDialog1的通用对话框，一个名称为Command1的命令按钮，
并有如下事件过程：
Private Sub Command1_Click()
CommonD ialog1.D efaultExt="doc"
CommonD ialog1.FileName="VB.txt"
CommonD ialog1.Filter="All(*.*)|*.*|Word|*.D oc|"
CommonD ialog1.FilterIndex=1
CommonD ialog1.ShowSave
End Sub
运行上述程序，如下叙述中正确的是
A ）打开的对话框中文件“保存类型”框中显示“All(*.*)”
B ）实现保存文件的操作，文件名是VB.txt
C ）DefaultExt 属性FileName 属性所指明的文件类型不一致，程序出错
D ）对话框的Filter 属性没有指出txt 类型，程序运行出错
（26）设程序中有如下数组定义和过程调用语句： Dim a(10) As Integer
……
Call p(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)
（27）若要获得组合框中输入的数据，可使用的属性是
A ）ListIndex
B ）Caption
C ）Text D
）List
（28）在窗体上画两个名称分别为Text1、Text2的文本框，Text1的Text 属性为“DataBase ”
，如图所示。
现有如下事件过程：
Private Sub Text1_Change()
Text2.Text = Mid(Text1, 1, 5)
End Sub
运行程序，在文本框Text1中原有字符之前输入a ，Text2中显示的是
A ）D ataA
B ）D ataB
C ）a
D ata D ）aBase
（29）有如下程序
Option Base 1
Private Sub Command1_Click()
D im arr(10)
arr=Array(10,35,28,90,54,68,72,90)
For Each a In arr
If a>50 Then
Sum=Sum+a
End If
Next a
End Sub
运行上述程序时出现错误，错误之处是
A ）数组定义语句不对，应改为Dim arr
B ）没有指明For 循环的终值
C ）应在For 语句之前增加Sum=0
D ）Next a 应改为 Next
（30）要求产生10个随机整数，存放在数组arr 中。从键盘输入要删除的数组元素的下标，将
该元素中的数据删除，后面元素中的数据依次前移，并显示删除后剩余的数据。现有如下程序：
Option Base 1
Private Sub Command1_Click()
D im arr(10) AS Integer
For i=1 To 10 '循环1
arr(i)=Int(Rnd*100)
Print arr(i);
Next
X=InputBox("输入1-10的一个整数：")
For i=x+1 To 10 '循环2
arr(i-1)=arr(i) Next For i=1 To 10 '循环3
Print arr(i);
Next
End Sub
程序运行后发现显示的结果不正确。应该进行的修改是
A ）产生随机数时不使用Int 函数
B ）循环2的初值应为i=x
C ）数组定义改为Dim a(11) As Integer
D ）循环3的循环终值应改为9
（31）使用驱动器列表框Drive1、目录列表框Dir1、文件列表框File1时，需要设置控件的同步。
以下能够正确设置两个控件同步的命令是
A ）D ir1.Path=D rive1.Path
B ）File1.Path=Dir1.Path
C ）File1.Path=
D rive1.Path D ）Drive1.Drive=Dir1.Path
（32）以下关于弹出式菜单的叙述中，错误的是
A ）一个窗体只能有一个弹出式菜单
B ）弹出式菜单在菜单编辑器中建立
C ）弹出式菜单的菜单名（主菜单项）的“可见”属性通常设置为False
D ）弹出式菜单通过窗体的PopupMenu 方法显示
（33）有如下程序
Private Type stu
X As String
Y As Integer
End Type
Private Sub Command1_Click()
D im a As stu
a.X="ABCD "
a.Y=12345
Print a
End Sub
程序运行时出现错误。错误的原因是
A ）Type 定义语句没有放在标准模块中
B ）变量声明语句有错
C ）赋值语句不对
D ）输出语句Print 不对
（34）在窗体上画两个名称分别为Text1、Text2的文本框，一个名称为Label1的标签，窗体外观如图a所示。要求当改变任一个文本框的内容，就会将该文本框的内容显示在标签中，如图b所示。实现上述功能的程序如下：
图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)
Label1.Caption = "文本框中的内容是：" & t.Text
End Sub
关于上述程序，以下叙述中错误的是
A）ShowText过程的参数类型可以是Control
B）ShowText过程的参数类型可以是Variant
C）两个过程调用语句有错，应分别改为Call ShowText(Text1.Text)、Call ShowText(Text2.Text)
D）ShowText过程中的T是控件变量
（35）设有打开文件的语句如下：
Open "text.dat" For Random As #1
要求把变量a中的数据保存到该文件中，应该使用的语句是
A）Input #1,a B）Write #1,a
C）Put #1,,a D）Get #1,,a
二、填空题（每空2分，共30分）
请将每空的正确答案写在答题卡【1】至【15】序号的横线上，答在试卷上不得分。
（1）在长度为n的顺序存储的线性表中删除一个元素，最坏情况下需要移动表中的元素个数为_____【1】______。
（2）设循环队列的存储空间为Q（1:30），初始状态为front=rear=30。现经过一系列入队与退队运算后，front=16，rear=15，则循环队列中有_____【2】______个元素。
（3）数据库管理系统提供的数据语言中，负责数据的增、删、改和查询的是_____【3】______。（4）在将E-R图转换到关系模式时，实体和联系都可以表示成_____【4】______。
（5）常见的软件工程方法有结构化方法和面向对象方法，类、继承以及多态性等概念属于_____【5】____。
（6）下面的事件过程执行时，可以把Text1文本框中的内容写到文件“file1.txt”中去。请填空。
Private Sub Command1_Click()
Open "file1.txt" For _____【6】____ As #1
Print _____【7】____, Text1.Text
Close #1
End Sub
（7）设窗体上有一个名称为Label1的标签。程序运行时，单击鼠标左键，再移动鼠标，鼠标的位置坐标会实时地显示在Label1标签中；单击鼠标右键则停止实时显示，并将标签中的内容清除。下面的程序可实现这一功能，请填空。
Dim down As Boolean
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Select Case _____【8】____
Case 1
down = True
Case 2
down = False
End Select
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) If _____【9】____ Then
_____【10】____ = "X=" & X & " Y=" & Y
Else
Label1.Caption = ""
End If
End Sub
（8）窗体上有List1、List2两个列表框，程序运行时，在两个列表框中分别选中1个项目，如图a所示，单击名称为Command1的“交换”按钮，则把选中的项目互换，互换后的位置不限，如图b所示。下面的程序可实现这一功能，请填空。
图a 交换前图b 交换后
Private Sub Command1_Click()
If List1.Text = "" Or List2.Text = "" Then
MsgBox "请选择交换的物品！"
Else
List1.AddItem List2.Text
List2.RemoveItem _____【11】____
_____【12】____
List1.RemoveItem List1.ListIndex
End If
End Sub
（9）设窗体上有Text1文本框和Command1命令按钮，并有以下程序：
Private Sub Command1_Click()
temp$ = ""
For k = 1 To Len(Text1)
ch$ = Mid(Text1, k, 1)
If Not found(temp, ch) Then
temp = temp & _____【13】____
End If
Next k
Text1 = _____【14】____
End Sub
Private Function found(str As String, ch As String) As Boolean
For k = 1 To Len(str)
If ch = Mid(str, k, 1) Then
found = _____【15】____
Exit Function
End If
Next k
found = False
End Function
运行时，在文本框中输入若干英文字母，然后单击命令按钮，则可以删去文本框中所有重复的字母。例如，若文本框中原有字符串为“abcddbbc”，则单击命令按钮后文本框中字符串为“abcd”。其中函数found的功能是判断字符串str中是否有字符ch，若有，函数返回True，否则返回False。请填空。
2012年3月全国计算机等级考试二级笔试试卷
Visual Basic参考答案及详解
一、选择题
（1）B）【解析】本题主要考查循环队列的概念，循环队列作为队列的一种也应该是线性结构。队列是一种逻辑结构，而循环队列是一种顺序存储结构的队列。
（2）D）【解析】栈是先进后出的线性表，队列是先进先出的线性表，二者均为线性结构。
（3）A）【解析】根据二叉树的性质，在任意二叉树中，度为0的结点（即叶子结点）总是比度为2的结点多一个，故此度为1的结点个数=总结点数-叶子节点数-度为2的节点数。
（4）B）【解析】数据库有三层模式结构，逻辑模式是数据的全局逻辑结构的描述，外模式也称为子模式，是局部数据的逻辑结构描述，而内模式也称为存储模式，是数据库物理存储结构和存取方法的描述。
（5）A）【解析】在关系数据库中，实体完整性的概念是主属性不能为空。在满足实体完整性的前提下，必须在关系中存在主属性，也就是在关系中应该有候选关键字。一个关系中可以有一个或者多个候选关键字。
（6）D）【解析】由关系T中的数据可以看出，其数据由属于关系R但是不属于关系S的数据组成。所以关系T是由关系R和S通过差运算得到的。
（7）A）【解析】软件的生命周期描述了软件从产生到最终消亡的全过程，生命周期中的活动包括需求分析、软件设计（分为概要设计和详细设计）、软件实现、软件测试和软件维护，不包括市场调研。
（8）D）【解析】在软件开发的过程中，应该尽早的制定测试计划，其中在需求分析阶段制定系统测试计划，在概要设计阶段制定集成测试计划，在详细设计阶段制定单元测试计划。
（9）B）【解析】黑盒测试法指的是根据程序的外部功能，把程序本身看成一个黑盒子，设计测试用例来验证程序外部功能的正确性。
（10）C）【解析】在软件开发的各个阶段经常会使用到一些图形工具，如在需求分析阶段使用数据流图，在概要设计阶段使用系统结构图，在详细设计阶段使用程序流程图、N-S图或者PAD图等。
（11）B）【解析】变量是用一个名称来表示的，给变量命名时应遵循规则：
名称只能由字母、数字和下划线组成；
名称的第一个字符必须是英文字母，最后一个字符可以是类型说明符；
名称的有效字符为255个；不能用VB的保留字作变量名，但变量名中可以包含保留字，如ConstA；
变量名也不能是末尾带有类型说明符的保留字，如Dim!是不合法的变量名；
不区分字母的大小写。
（12）C）【解析】在VB中要表现两个条件，只能使用两个条件表达式使用逻辑运算符连接起来的形式。本题中要求x不但大于等于0而且要小于10，因此两个条件应该是与（AND）的关系。
（13）D）【解析】Name属性用于表示窗体对象的名称，在运行时是只读的。在程序代码中，返回在代码中用于标识窗体、控件或数据访问对象的名字，是唯一的。窗体在运行时改变大小将会触发其Resize事件，当窗体的Enabled属性为False时，窗体本身和窗体上的控件均不能接收事件。
（14）D）【解析】变量的作用域是指变量的有效范围。为了能正确地使用变量的值，VB根据变量的定义位置和所使用的定义语句的不同，将变量可分为局部变量（Local）、模块变量（Module）和全局变量（Public）。模块变量包括窗体模块变量和标准模块变量。各种变量位于不同的层次。局部变量是指在事件过程或通用过程内使用Dim或者Static定义的变量，其作用域是它所在的过程；模块变量在模块的声明部分用Dim或Private定义；全局变量可在工程的每个模块、每个过程中使用，又称全程变量。和标准模块变量一样，全局变量也只能在标准
模块的声明部分定义，但全局变量必须用Public或Global语句定义。
（15）C）【解析】随机数函数Rnd的功能是用于产生一个小于1但大于或等于0的随机数。为了生成某个指定范围内的随机整数，可使用以下公式：
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)，其中upperbound是随机整数范围的上限， lowerbound 是随机整数范围的下限。
（16）A）【解析】赋值语句本身也是有返回值的，该语句将会把的“等号”右边的表达式进行计算后，将计算值赋给“等号”右边的变量，同时用这个值作为返回值。
（17）A）【解析】二维数组定义时对于数组的每一维均给定下标的下界和上界，中间用To连接，即给出下标可取值的变化范围。“数组元素个数”指的是数组中成员的个数，每一维的长度是上界-下界+1，数组元素个数等于各维长度之积。
（18）B）【解析】控件数组是一组具有共同名称和类型的控件，它们拥有共同的事件，数组中的每个控件都有惟一的索引号（Index），即下标，默认索引号从0开始。建立控件数组有两种方法：一是先在窗体上画好一个控件，然后再用“复制”和“粘贴”的方法建立；二是先在窗体上先画出若干相同类型的控件，然后再将它们的名称改为同一个名称，再将其Index属性分别设置为不同值即可。采用第一种方法建立控件数组时，每个数组元素的名称、大小、事件均使用同一个，区别只在于Index属性值不一样。
（19）A）【解析】要想实现分段函数需要用到分支语句，选项B）正确地应用了If…ElseIf…Else…End If 语句实现了分支；选项C）使用IIf函数的嵌套使用，保证x<0时返回5，0<=x<=5时返回2*x，其他情况返回x*x+1；选项D）虽然没有应用If语句的嵌套，但是由于连续的三个If语句中条件没有冲突的地方，因此也能实现分段函数的计算。选项A）在判断0到5之间的地方出现了问题，应该是用语句Case 0 To 5。
（20）D）【解析】InputBox函数的书写格式为：InputBox(prompt[,title][,default][,xpos,ypos] [,helpfile,context])，其中第一个参数为提示信息，第二个参数为标题信息，第三个参数为默认值，该函数会返回用户在输入框中输入的值，但是如果在输入框中单击“取消”按钮，则不会返回任何值。
（21）B）【解析】本题是一个典型的倒序For循环结构，最终结果应该为9*1+7*10+5*100+3*1000=3579。
（22）D）【解析】Static语句在过程级别中使用，用于声明变量并分配存储空间，在整个代码运行期间都能保留使用Static语句声明的变量的值。
本题中，当第1次调用过程时，静态变量x的初值为0，执行调用语句后，静态变量x的值应为10；当第2次调用过程时，静态变量x的初值为10，执行调用语句后，静态变量x的值应为30；当第3次调用过程时，静态变量x的初值为30，执行调用语句后，静态变量x的值应为70。
（23）C）【解析】Visual Basic中的菜单通过菜单编辑器建立，每个菜单项在运行时可以看成是一个控件，程序运行时可以利用菜单项的动态数组实现菜单项的增加或减少，菜单项只能响应单击事件，如果把菜单项的Enable属性置为False，则该菜单项表现为灰色不可用，但是还是会显示出来。
（24）A）【解析】VB支持多窗体程序设计，在任何一个时刻，只能有一个窗体成为当前窗体；如果一个工程含有多个窗体，则这些窗体会分别保存；这些窗体可以同时打开或者关闭，而且在工程属性中可以指定任意一个窗体为启动窗体。
（25）A）【解析】文件对话框有很多属性，其中DefaultExt属性用于设置对话框中默认的文件类型（即扩展名）；FileName属性用于设置或返回要打开或保存的文件的路径及文件名；Filter属性用于指定在对话框中显示的文件类型，可以设置多个文件类型，供用户在对话框的“文件类型”的下拉列表中选择；FilterIndex属性用于指定默认的文件扩展名，其设置值为一整数。用Filter属性设置多个文件扩展名后，每个文件扩展名都有一个索引值，第一个文件扩展名的值为1，第二个文件扩展名的值为2，后面的依次类推，用FilterIndex属性可以指定作为默认显示的文件扩展名。
（26）B）【解析】由主调过程中的定义可以看出，传送给被调过程的实参是一个数组名，故此子过程中的
形参应该是一个不指明长度的数组。
（27）C）【解析】组合框的Text属性值是用户所选择的项目的文本或直接从编辑区输入的文本。当Style 属性值为0或1时，返回或设置编辑域中的文本；Style属性值为2时，返回列表框中选择的项目，此时返回值总与表达式List(ListIndex)的返回值相同。
（28）C）【解析】Mid函数可以实现在任何位置取任何长度的子串，其中长度省略的话将会一直取到串尾。本题中是需要在文本框中第一位开始取连续的5个字符，由于此时已经在DataBase的前面输入了a，因此会取aData。
（29）A）【解析】Array函数用于为数组元素赋值，即把一个数据集读入指定数组中。其格式为：数组变量= Array (数组元素值列表)。其中，“数组变量”是预先定义的数组名，后面不能带括号和下标。
（30）D）【解析】本题中由于数组默认下界从1开始，因此数组的定义语句没有问题；在循环1中向数组中存放随机数；循环2完成数组元素的前移；由于数组元素的前移，造成了arr(9)=arr(10)的情况，由于在数组中删除元素后，数组的长度应该减少为9，故此循环3应该只循环9次。
（31）B）【解析】在实际应用中，驱动器列表框、目录列表框和文件列表框往往需要同步操作，这可以通过Path属性的改变引发Change事件来实现。其语句为Dir1.Path=Drive1.Drive：File1.Path=Dir1.Path。
（32）A）【解析】不管是下拉菜单还是弹出式菜单都需要在菜单编辑器中建立，通常将弹出式菜单的主菜单项设为不可见，通过窗体或者控件的PopupMenu方法显示出来，在一个窗体中可以建立多个弹出式菜单，但是只能有一个下拉菜单。
（33）D）【解析】用户可以利用Type语句定义自己的数据类型，其格式如下：
Type 类型名
元素名As 类型名
元素名As 类型名
……
End Type
自定义类型的定义必须放在模块的声明部分，在程序中可以使用自定义类型来声明变量。为自定义类型变量赋值时需要分别为每个数据成员赋值，同理在输出时也应该逐个成员输出。
（34）C）【解析】控件与窗体一样，也可以作为通用过程的参数。控件参数即将形参表中的类型定义为“Control”的参数，在一个通用过程中设置相同性质控件所需要的属性，然后用不同的控件来调用此过程。本题中由于传送的是控件，因此形参可以为具体的控件类型如TextBox，也可以为Control，也可以为变体类型Variant。根据形参与实参相结合的原则，调用过程时需要传送控件作为实参。
（35）C）【解析】对于顺序文件的读取和写入可以使用Input方法和Write方法，对于随机文件的读取和写入应该分别使用Get方法和Put方法。
二、填空题
（1）【1】n-1
【解析】在长度为n的顺序线性表中删除一个元素，后面的元素要依次前移，最坏情况下也就是删除第一个元素，后面的n-1个元素都需要移动。
（2）【2】29
【解析】循环队列的元素个数计算公式为(rear-front+30) Mod 30。
（3）【3】数据操纵语言或DML
【解析】数据库管理系统是数据库的结构，它需要提供数据定义语言DDL用于实现数据的定义；数据操纵语言DML用于实现对数据的增加、删除、修改和查询；数据控制语言DCL用于实现访问权限的控制等。
（4）【4】关系
【解析】将E-R图转换为关系模式时，实体和联系都可以表示为关系。
（5）【5】面向对象方法
【解析】数据流图、系统结构图等概念属于结构化方法，而类、对象、继承、封装、多态等概念属于面向对象方法。
（6）【6】Output 【7】#1
【解析】可通过Open语句打开或创建一个文件。其格式为：Open <文件名> [For方式][Access存取类型][锁定方式] As [#]文件号 [L en=记录长度]，其中“方式”指文件打开模式， Output用于顺序输出，Append用于顺序追加写入到文件末尾，Input用于顺序读取。根据题目的要求打开方式应该为Output，在输出方法中的第一个参数是打开的文件号也就是1号。
（7）【8】Button 【9】down 或 down=True 【10】Label1.Caption
【解析】鼠标键状态由参数Button来设定，其值为1表示按下了鼠标左键，为2表示按下了鼠标右键，因此在MouseDown事件中需要判断Button参数的值以便进行对全局逻辑变量down的赋值；在鼠标的移动事件中，根据题意如果按下了鼠标左键（即down=True）则输出坐标，否则清空标签，因此进行判断的条件就是down是不是等于True；坐标需要输出到Label1的Caption属性中。
（8）【11】List2.ListIndex 【12】List2.AddItem List1.Text
【解析】列表框的ListIndex属性用于返回或设置控件中当前选择项目的索引，设计时不可用；AddItem方法用于在列表框中指定的位置上插入一行指定的文本，其格式为：列表框.AddItem项目字符串[,索引值]；RemoveItem方法用于删除列表框中指定的项目，每次只能删除一项，其格式为：列表框.RemoveItem索引值。根据本题的要求首先把List2中选中的项目加入到List1中，然后在List2中利用RemoveItem方法移除选中项，方法的参数为List2.ListIndex；接下来应该在List2中使用AddItem方法加入在List1中选中的项目，使用语句List2.AddItem List1.Text；最后在列表框1中移除选定的项目。
（9）【13】ch 【14】temp 【15】True
【解析】在本题的单击事件中，首先利用循环取出文本框中的每一位字符，然后依次进行比较看该字符是否在结果串temp中出现，若未出现则证明该字符尚未重复，所以将该字符ch连接到结果串temp中，当循环结束后temp中的字符必然是没有重复值的，所以要将temp的值放到Text1中进行输出；在found函数中判断在给定字符串str中是否存在子串ch，方法是依次取出str中每一个字符与ch进行比较，若发现相等则证明存在ch子串，此时应该返回True证明找到字串随之退出函数；若循环结束后依然没有退出循环则证明没有找到，返回False。
VB循环结构测试题及答案
循环结构测试题(四) 一：选择题 1：以下（）是正确的for….next结构。 （A）for x=1 to step 10 (B) for x=3 to –3 step -3….. ….. next x next x (C ) for x=1 to 10 (D) for x=3 to step 3 re: …. …… Next x next y If I=10 then goto re 2:下列循环语句能正常结束循环的是（） （A）I=5 (B) I=1 do do I=I+1 I=I+2 Loop until I<0 loop until I=10 (C) I=10 (D) I=6 do do
I=I-1 I=I-2 Loop until I<0 loop until I=1 3:下面程序段的运行结果为（ ） for I=3 to 1 step –1 print spc(5-I); for j=1 to 2*I-1 print “*”; next j print next I 4下列程序在文本框输入“ABCD ”四个字符时，窗体上显示的是（ ） private sub text1_change( ) print ; end sub (A) ABCD (B) ( C ) AABABCABCD * * * * (B) * * * * * * * * (C) * * * * * * * * (D) * * * * * * * * A B C (D) A AB ABC
5哪个程序段不能分别正确显示1!,2!,3!,4!的（ ） 二：填空题 1：要使下列For 语句循环执行20次，循环变量的初值应当是： for k=( ① ) to –5 step –2 2:下面程序段显示（ ② ）个“*” 。 For I=1 to 5 For j=2 to I Print “*”; Next j Next I 3: 下列第40句共执行了（ ③ ）次，第41句共执行（④ ）次。 30 for j=1 to 12 step 3 40 for k=6 to 2 step –2 41 print j,k 42 next k （A ） for I=1 to 4 n=1 for j=1 to I （B ） for I=1 to 4 for j=1 to I n=1 (C) N=1 for j=1 to 4 (D) N=1 J=1 Do while j<=4
vb试题及答案
VB试卷 一、单项选择题(每题2分,共40分) 1. 窗体的标题栏显示内容由窗体对象的属性决定。 A) BackColor B)BackStyle C)Text D)Caption 2. 窗体的示意图标可用属性来设置。 A) Picture B) Image C) Icon D) MouseIcon 3. 窗体的控制菜单的有无由窗体对象的属性决定。 A) ControlBox B) MinButton C) MaxButton D) BorderStyle 4. 若要取消窗体的最大化功能，则可设置属性为False来实现。 A) ControlBox B) MinButton C) MaxButton D) Enabled 5. 以下4个选项，不属于VB的工作模式。 A) 编译 B) 设计 C) 运行 D) 中断 6. 窗体的边框样式由窗体对象的属性来设置。 A) BackStyle B) BorderStyle C) WindowState D) FillStyle 7. 若要以程序代码方式设置在窗体中显示文本的字体大小，则可用窗体对象的属性来实现。 A) FontName B) Font C) FontSize D) FontBold 8. 命令按钮的标题文字由属性来设置。 A) Text B) Caption C) Name D) (名称) 9. VB是面向对象的程序设计，以下4个选项，不属于面向对象的三要素。 A) 变量 B) 属性 C) 事件 D) 方法 10. 若要将某命令按钮设置为默认命令按钮，可设置属性为True来实现。 A) Value B) Cancel C) Default D) Enabled 11. 若要使命令按钮不可见，可设置属性为False来实现。 A) Value B) Enabled C) Visible D) Cancel 12. 运行程序时，系统自动执行窗体的事件。 A) load B) click C) unload D) GotFocus 13. 若要设置文本框最大可接收的字符数，可通过属性来实现。 A) MultiLine B) Length C) Max D) MaxLength 14. 若要使某命令按钮获得控制焦点，可使用方法来设置。 A) Refresh B) SetFocus C) GotFocus D) Value 15. 若要使命令钮可响应事件，可通过设置属性的取值来实现。 A) Visible B) Enabled C) Default D) Value 16. 在运行时，若要调用某命令按钮的Click事件过程，可设置该命令按钮对象的 属性为True来实现。 A) Enabled B) Value C) Default D) Cancel 17. 标签框的边框，由属性的设置值决定。
VB模拟试卷和答案讲解
北京语言大学网络教育学院 《VB》模拟试卷一 注意： 1.试卷保密，考生不得将试卷带出考场或撕页，否则成绩作废。请监考老师负责监督。 2.请各位考生注意考试纪律，考试作弊全部成绩以零分计算。 3.本试卷满分100分，答题时间为90分钟。 4.本试卷分为试题卷和答题卷，所有答案必须答在答题卷上，答在试题卷上不给分。 一、【单项选择题】(本大题共20小题，每小题2分，共40分)在每小题列出的四个选项中只有一个选项是符合题目要求的，请将正确选项前的字母填在答题卷相应题号处。 1、关于VB的特点描述错误的是（）。 [A] VB编程是可视化编程[B] 是面向对象的程序设计 [C]不可以访问数据库[D]采用事件驱动编程机制 2、下面关于鼠标的指针设置说法不正确的是（）。 [A] 可以使用MouseIcon设置鼠标的形状 [B] 可以使用MousePointer设置鼠标的形状 [C] MousePointer设为99时，可用MouseIcon设置鼠标的形状 [D] MouseIcon只能通过属性窗口选择鼠标形状 3、Dim Snow（1 to 12 ，1），As Integer 是大小为（）的二维数组。 [A]13*2 [B] 13*1 [C] 12*2 [D] 12*1 4、在工具箱里的都是（）。 [A] 标准控件[B] 外部控件 [C] ActiveX控件[D] 可插入对象（OLE） 5、一个窗体大小改变时被触发的事件是（）。 [A] Click事件[B] Resize事件 [C] Initialize事件[D] Unload事件 6、下列关于控件说法不正确的是（）。 [A] Agent控件用于设置动画行为 [B] TextBox用于接收用户输入的信息 [C] Frame用于将控件分为若干组，当框架移动时，其中的控件不移动 [D] ListBox向列表中添加一个新的项目 7、关于CheckBox控件描述错误的是（）。 [A] 是复选框按钮，用√表示选中[B] Value用来表示复选框状态。 [C] Value为1表示选中该框[D] Value为0表示该框被禁止，显示灰色 8、关于Shape控件描述正确的是（）。 [A] 用于向窗体添加矩形、圆形等图形[B] Arial取值有7种，FillStyle取值有8种 [C] Arial用于设置显示控件的形状[D] FillStyle用来设置控件填充风格。 9、下面不属于循环控制语句的是（）。
vb试题及答案
一、选择题（1-30 题每小题1分，共30分，31-45题每小题2分,共30分，总计60分）要使窗体Form1的标题栏中显示“正在复制文件…”，正确的语句是：a A．Form1.Caption=“正在复制文件…” B．Form1.Title=“正在复制文件…” C．Form1.Text=“正在复制文件…” D．Form1.名称=“正在复制文件…” 如果要求设置定时器时间间隔为1秒钟，那么它的Interval属性值应该等于：a A．1000 B．100 C．10 D．1 3、下列关于控件的基本操作中，错误的是 A)当控件处于活动状态时，可以对控件进行缩放 B) 在设计阶段不能移动控件 C) Visual Basic 6.0 允许对画好的控件进行复制和删除 D) 可以通过属性窗口改变控件的位置和大小 4、用Visual Basic 开发应用程序的一般步骤有：①设置窗体和控件的属性、②编写代码、③建立用户界面，其中正确的顺序是： A) ①②③B) ①③②C) ③②①D) ③①② 5、为使文本框只能显示不能输入，即只读，应设置文本框的属性是：c A．MaxLength设置为0 B．Cancel设置为True C．Locked设置为True D．Read设置为True 6、InputBox函数返回值的类型为。B A．数值B．字符串C．变体 D．数值或字符串（视输入的数据而定） 7、为了把焦点移到某个指定的控件，所使用的方法是：A A．SetFocus B．Visible C．ReFresh D．GetFocus 8、函数String(3,”str”)的功能是：b A．把数值型数据转换成字符串 B．返回有3个字符串组成的字符串 C．从字符串中第3个字符 D．从字符串中第3个字符的位置开始取字符串 9、双击窗体中的对象后，Visual Basic将显示的窗口是：c A．项目（工程）窗口B．工具箱C．代码窗口D．属性窗口 10、用于获得字符串s最左边4个字符的函数是：a A．Left(s,4) B．Left(1,4) C．LeftStr(s) D．LeftStr(3,4) 11、以下程序段的输出结果是：d a=Sqr(3) b=Sqr(2) c=a>b Print c A．-1 B．0 C．False D．True 12、用下面语句定义的数组的元素个数是：c Dim A (-4 to 6) As Integer A．6 B．7 C．11 D．9
vb试卷答案
<一>界面设计 1、以下有关对象属性的说法中正确的是D 。A、对象所有的属性都罗列在属性窗口列表中B、不同对象不可能有同名属性 C、不同对象的同名属性取值一定相同 D、对象的某些属性即可在属性窗口设置，也可以通过属性代码设置或改变 2、有程序代码：Text1.Text=”Visual Basic”其中的Text1、Text和”Visual Basic”分别代表 C 。 A、对象、值、属性 B、对象、方法、属性 C、对象、属性、值 D、属性、对象、值 3、一个对象可以执行的动作与可被对象识别的动作分别称为B 。A、事件，方法B、方法，事件C、属性，方法D、过程，事件 4、Visual Basic是一种面向D 的程序设计语言。 A、过程 B、用户 C、方法 D、对象5、一只白色的足球踢进球门，则白色、足球、踢、进球门是B 。A、属性、对象、方法、事件B、属性、对象、事件、方法C、对象、属性、方法、事件D、对象、属性、事件、方法6、Visual Basic是用于开发B 环境下的应用程序的工具。A、DOS B、Windows C、DOS和Windows D、UNIX 7、一个可执行的Visual Basic中应用程序至少要包括一个C 。A、标准模块B、类模块C、窗体模块D、辅助模块8、在Visual Basic
最基本的对象是B ，它是应用程序的基石。A、标签B、窗体C、文本框D、命令按钮 9、如果要在两个菜单命令项之间加一条分隔线，可在标题文本框中键入A 。A、- B、+ C、& D、# 10、在使用菜单编辑器创建菜单时，可在菜单名称中某字母前插入B 符号，那么在运行程序时按Alt键和该字母键就可打开该命令菜单。 A、下划线 B、& C、$ D、@ 11、在窗体Form1的Click事件过程中有以下语句： Label1.Caption=”visual basic” 若本语句执行前，标签控件的名称属性和Caption属性取缺省值，则标签控件的名称属性和Caption 属性在执行本语句前的取值分别为 C 。 A、Label, Label B 、Label, Caption C、Label1, Label1 D、Caption, Label 12、同上题，该语句执行后，标签控件的名称属性和caption属性取值分别为B 。 A、Label, visual basic B、Label1, visual basic C、Label1, caption D、Label1, label1 13、如果在窗体上有命令按钮OK，在代码编辑窗口有与之对应的CmdOK_Click()事件，则命令按钮控件的名称属性和Caption属性分别 为C 。 A、OK、Cmd B、Cmd、OK C、CmdOK、OK D、OK、CmdOK 14、窗体Form1的名称属性是frm，它的Load事件过程名是A 。 A、Form_Load B、Form1_Load C、frm_Load D、Me_Load 15、 用窗体的C__属性来设置窗体的标题。
VB程序设计试题及答案(一)
VB程序设计试题及答案（一） 一、单选题 1. 是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。 (A) =“欢迎使用VB” (B) ='欢迎使用VB' (C) =欢迎使用VB (D) ="欢迎使用VB" 3. 若要使命令按钮不可操作，要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5. 下面A 是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6. 以下关系表达式中，其值为False的是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。 (A) If sex="男" And age=4O And InStr(duty，"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty，2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10.下列关于Do…Loop循环结构执行循环次数的描述正确的是D 。 (A) Do While…Loop循环和Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环和Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次和Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行和Do…Loop Until循环至少执行一次 11.以下B 是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3 … … Next x Next x
VB期末试卷(A卷带答案 )
高级语言程序设计（VB）试卷（A卷） 注意事项：1、本试卷共页，满分为 100 分，考试时间为 110 分钟。 2、标准答题卡使用2B铅笔涂写；文字题答题时请使用蓝、黑钢笔或圆珠笔， 不得使用红颜色墨水笔。 一、单项选择题（每空1分，共 30分） （请将答案按照题干上【】内的序号涂写“标准答题卡”，否则不得分） 1．在VB 6.0中，扩展名为.vbp的文件称为【1】。 A) 工程文件B) 窗体文件C) 类模块文件D) 标准模块文件 2．在VB 6.0集成开发环境的设计模式下，用鼠标双击窗体上的某个对象后，打开的窗口是【2】。 A) 代码窗口B) 窗体设计窗口 C) 属性窗口D) 工程资源管理器窗口 3．设有变量定义语句Dim a%，则变量a的数据类型是【3】。 A) 整型B) 单精度类型C) 双精度类型D) 字符串类型4．下列表达式中，值为False的是【4】。 A) "AB"<"abc"B) "ABC" = UCase("abc") C) "ABCD"<"abc"D) Mid("ABCD",3,1)=Left("ABCD",3) 5．函数InStr("ABCDEF", "CD")的值是【5】。 A) 2B) 3C) True D) CDEF 6．下列程序运行后，单击窗体，输出结果是【6】。 Private Sub Form_Click() Dim a As Integer, b As Integer a = 3 b = 5
Print a + b; a & b End Sub A) 8 8 B) 35 35 C) 8 35 D) 35 8 7．下列程序运行后，单击窗体，输出结果是 【7】 。 Private Sub Form_Click() a = 3: b = 7 a = a + b : b = a – b : a = a - b Print a; b End Sub A) 4 3 B) 7 3 C) 3 7 D) 10 7 8．下面程序段所表示的数学关系式是 【8】 。 If (a < b) Then If d = c Then x = 1 Else x = 2 End If A) ? ??≠≥=<=)(2) c (1 d c b a d b a x 且且 B) ? ??≠<=<=)(2) c (1 d c b a d b a x 且且 C) ?? ?≥=<=)(2) c (1b a d b a x 且 D) ?? ?≠=<=) (2) c (1 d c d b a x 且 9．下列程序运行后，单击窗体，输出结果是 【9】 。 Private Sub Form_Click() s = 0: k = 1 Do s = s + k: k = k + 1 Loop Until k <= 5 Print s End Sub A) 15 B) 10 C) 1 D) 0 10．下列程序段的输出结果是 【10】 。 For k = 4 To 2 Step -2 m = k Next k Print m; k;
VB考试试题及答案
VB考试试题及答案
卷1 一、填空题 1、VB程序设计的主要特点是可视化设计和事 件编程。2、在VB中，最主要的两种对象是窗体 （form）和控件。 3、工程是构成应用程序文件的集合。 4、方法是VB提供的一种特殊子程序，用来完成一定的操作。 5、浮点类型数据包括单精度型和___双精度__数据。 6、事件是窗体或控件对象识别的__动作____。 7、可用窗体的__print_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____选中___或禁止状态(暗淡的)中的某一种。 9、在VB中，修改窗体的高度（height）和宽度（width）属性值，可改变窗体的大小。 10、双击工具箱中的控件图标，可在窗体的中央出现一个尺寸为缺省值的控件。 11、在MsgBox函数中，如果缺省title参数，则使用工程1 作为消息框的标题。 12、设x＝34.58，语句Print Format(x,“000.0”)的输出结果是34.6 。 13、在VB 中，数值型变量的初值为0 ，Varant型变量的初值 为空，布尔型变量的初值为FALSE 。 14、设置窗体的picture 属性，可在窗体上显示图片。 15、程序运行工程中，清除MP图片框中的图片应使用语句cls 。 二、选择题 1、菜单控件只包括一个事件，即 C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、 Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句Select * Form student 中的*表 示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对
VB测试卷及答案
VB期中测试卷 班级：学号：姓名： 一、判断题（1×10分） （1）VB是可视化的、面向对象的、采用事件驱动的结构化高级程序设计语言。 （2）VB的Double类型数据可以精确表示其数值范围内的所有实数。 （3）要使文本框出现垂直滚动条，只要将该文本框的ScrollBars属性设置为2就可以了。（4）执行“Unload Form1”语句后，窗体Form1消失，而且释放其所占的内存。 （5）同一个窗体文件只能用于一个工程中。 （6）xxx.vbp文件是用来管理构成应用程序xxx的所有文件和对象的清单。 （7）决定对象是否可见的属性是Visible属性，决定对象可用性的属性是Enabled属性。（8）在逻辑运算符Not、Or、And中，运算优先级由高到低依次为Not、Or、And。 （9）过程中的静态变量是局部变量，当过程再次被执行时，它的值是上一次过程调用后的值。（10）使用On Error GoTo语句并编写相应程序，可以捕获程序中的编译错误。 二、选择题（2×10分） 第1题：在设计模式双击窗体中的对象后，Visual Basic将显示的窗口是。 A、属性窗口 B、代码窗口 C、工具箱 D、工程窗口 第2题：Integer类型的变量可存的最大整数为______。 A、255 B、256 C、32768 D、32767 第3题：下列哪个函数返回值为Ascii码值？ A、Chr(x) B、Str(x) C、Space(n) D、Asc(x) 第4题：下列关于Select Case之测试表达式的叙述中，错误的是______。 A、只能是变量名 B、可以是整型 C、可以是字符型 D、可以是浮点类型 第5题：执行___语句后，执行语句“Text1.SelStart = 0 : Text1.SelLength = Len(Text1)”，可以使文本框控件Text1中的文本突出显示。 A、Text1.Enabled=True B、Text1.SetFocus C、Text1.Locked = False D、Text1.Move 第6题：设置命令按钮cm1的背景色为红色，可以执行语句。 A、cm1.BackColor=vbred B、cm1.BackColor = vbred: cm1.style=1
VB期末考试试题及答案
二、选择题 1、菜单控件只包括一个事件，即 C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是 C 。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是 A 。 A、Caption B、Name C、Text D、Label
6、设置一个单选按钮(OptionButton)所代表选项的选中状态，应当在属性窗口中改变的属性是 D 。 A、Caption B、Name C、Text D、Value 7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的？ D 。 A、在标题项中输入&，然后打勾 B、在索引项中打 勾 C、在有效项中打勾 D、在复选项中打勾 8、当执行以下过程时，在窗体上将显示 A 。 Private Sub Command1_Click( ) Print "VB"; Print "Hello! "; Print "VB" End Sub A、 VBHello!VB B、 VB Hello!VB C、 VB D、 VB Hello! VB Hello! VB 9、语句Print "The answer is:";20/4-2的结果为 B 。 A、The answer is 20/4-2 B、The answer is 3 C、The answer is "20/4-2" D、非法语句 10、下列哪个控件是容器控件 B 。 A、Image B、Picture C、ComboBox D、FileListBox 11、若要将窗体从内存中卸载出去，其实现的方法是 D 。 A.Show B.Hide C.Load D.UnLoad 12、以下选项中，不是 Visual Basic控件的是 A 。 A.窗体 B.定时器 C.单选框 D.命令按钮 13、双击窗体中的对象后，Visual Basic将显示的窗口是 A 。 A.代码窗口 B．工具箱 C．项目（工程）窗口 D．属性窗口 14、可决定窗体的左上角是否有控制菜单的属性是 A 。 A.ControlBox B.MinButton C.MaxButton D.BorderStyle 15、设有如下语句： Strl＝InputBox（"输人"，""，"练习"） 从键盘上输人字符“示例”后，Strl的值是 D 。 A．“输入” B．“” C．“练习” D．“示例” 16、窗体Form1的Name属性是Frm1,它的单击事件过程名是 C 。 A. Form1_Click B.Form_Click C. Frm1_Click D. Me_Click
VB程序设计考试试题及答案
月考上机试题 一．选择题：(10*2) 1由单精度浮点型的数据组成的字节数是 A.2 B.4 C.8 D.16 2.可以同时删除字符串前导和尾部空白的函数是 A．Ltrim B．Rtrim C．Trim D．Mid 3.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是 A.工程资源管理器窗口 B.工具箱窗口 C.代码窗口 D.属性窗口 4.在窗体上添加如下命令按钮，然后编写如下事件过程：C Private Sub Command1 _ Click() Dim a(10)As Integer Dim p(3)As Integer k=5 For i=1 To 10 a(i)=i Next i For i=1 To 3 p(i)=a(i*i) Next i For i=1 To 3 k=k+p(i)*2 Next i Print k End Sub 该过程的运行结果为: A.35 B.33 C.31 D.29 5.VB表达式Cos(0)+Abs(1)+Int(Rnd(1))的值是 A.1 B. -1 C. 0 D. 2 6.若m，x，y，均为Integer型变量，则执行下面语句后m值是m=1：X=2：Y=3 m=IIf(X＞Y，X+Y，X-Y) A.-1 B.0 C.1 D. 2 7.设a=″Visual Basic″，下面使b=″Basic″的语句是 A.b=Left(a，8，12) B.b=Mid(a，8，5) C.b=Right(a，5，5) D.b=Left(a，8,5) 8.以下不能运行工程的操作是 A..执行"运行"菜单中的"启动"命令 B.单击工具栏中的"启动"命令 D.按下F5键 C.按下Ctrl+F5键 9.下列关于面向对象程序设计的叙述不正确的是 A.对象具有属性、方法等特性 B.对象之间的通信产生了消息 C.一个对象是一个软件构造块，它包含数据与相关的操作 D.对象的属性不能被改变 10.在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Private Sub Command1 _ Click（） Static X As Integer Static Y As Integer Cls Y=l Y=Y+5 X=5+X Print X，Y End Sub 程序运行时，三次单击命令按钮Command1后，窗体上显示的结果为: A.15 16 B.15 6 C.15 15 D.5 6 二．填空题（3*4） 1.计算1*2*3*...*3000，当积大于3000时停止计算。请在_______处将程序补充完整。 Private Sub FormClick() Dim t As Single,j As Integer J=1 For j=1 To 3000 ____t=t*j______________ If t＞3000 Then Exit For Next j Debug.Print j,t End Sub 2.下面程序运行后，输出的结果是_BBBB______。 For J= 1 To 10 A(J)=2*J B(J)=A(J)*2 Next J Print B(J/2+0.1) End 3.设有如下程序：程序运行后，单击窗体，则在窗体上显示的是6 5 4 3，请在_______处将程序补充完整。 Option Base 0 Private Sub Form _ Click（） Dim a Dim i As Integer a=Array(1，2，3，4，5，6，7，8，9) For i=0 To 3 Print a(5-i) Next i End Sub 三．编程题：（34*2） 1. 用随机函数产生10个不大于100的整数存入一维数组a中，并找出这组数中能被3整除余2的数赋值于数组b。点击开始按钮在窗体中显示数组a和数组b。
VB考试试题及答案分解
VB考试试题及答案分解
卷1 一、填空题 1、VB程序设计的主要特点是可视化设计和事 件编程。2、在VB中，最主要的两种对象是窗体 （form）和控件。 3、工程是构成应用程序文件的集合。 4、方法是VB提供的一种特殊子程序，用来完成一定的操作。 5、浮点类型数据包括单精度型和___双精度__数据。 6、事件是窗体或控件对象识别的__动作____。 7、可用窗体的__print_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____选中___或禁止状态(暗淡的)中的某一种。 9、在VB中，修改窗体的高度（height）和宽度（width）属性值，可改变窗体的大小。 10、双击工具箱中的控件图标，可在窗体的中央出现一个尺寸为缺省值的控件。 11、在MsgBox函数中，如果缺省title参数，则使用工程1 作为消息框的标题。 12、设x＝34.58，语句Print Format(x,“000.0”)的输出结果是34.6 。 13、在VB 中，数值型变量的初值为0 ，Varant型变量的初值 为空，布尔型变量的初值为FALSE 。 14、设置窗体的picture 属性，可在窗体上显示图片。 15、程序运行工程中，清除MP图片框中的图片应使用语句cls 。 二、选择题 1、菜单控件只包括一个事件，即 C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、 Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句Select * Form student 中的*表 示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对
VB期末考试考卷及答案
VB期末考试试卷及答案 一·选择题 1.Visual Basic是一种面向对象的程序设计语言，构成对象的三要素是（ B ） A属性、控件和方法 B属性、事件和方法 C窗体、控件和过程 D控件、过程和模块 2. 所有控件都有一个共同的属性，这个属性是（ C ） A text B font C name D caption 3. 下列叙述中错误的是（ A ） A 工程文件扩展名是.vbg B 标准模块文件的扩展名是.bas C 窗体模块的扩展名是.frm D 类模块的扩展名是.cls 4. 当要编写一个新的Visual Basic程序时，所做的第一件事是（ A ） A 新建一个工程 B 编写代码 C 设置属性 D 添加Active X控件 5. 下面控件中，没有caption属性的是（ B ） A 框架 B 组合框
C 命令按钮 D 复选按钮 6. 在文件框中输入字符时，若只显示某个字符，如（*），应设置属性是（ B ） A MultiLine B PasswordChar C Text D selText 7. 若要将窗体从内存中卸载出去，其实现的方法是（ D ） A Show B Hide C Load D UnLoad 8. 下列关于过程叙述不正确的是（ D ） A 过程的传值调用是将实参的具体值传值传递给形参 B 过程的传址调用是将实参在内存的地址传递给形参 C 过程的传值调用参数是单向传递的，过程的传址调用参数是双向传递的 D 无论过程传值调用还是传地址调用，参数传递都是双向的 9. 某人创建1个工程，其中的窗体名为Form1，之后又添加了1个名为Form2的窗 体，并希望程序执行时先显示Form2窗体，那么，他需要做的工作是（ C ） A 在Form1的Load事件过程中加入语句Load Form2 B 在Form2的Load事件过程中加入语句Form2.Show C 在“过程属性”对话框中把“启动对象”设置为Form2
VB试题(附带答案)
VB试题 一、基本概念及基本操作 1、如果要向工具箱中加入控件和部件，可以利用"工程"菜单中的______命令。 A、引用 B、部件 C、工程属性 D、添加窗体 2、VB一共有设计、运行和中断三种模式，要使用调试工具应该______。 A、进入设计模式 B、进入运行模式 C、进入中断模式 D、不用进入任何模式 3、系统符号常量的定义可以通过______获得。 A、对象浏览器 B、代码窗口 C、属性窗口 D、工具箱 4、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是______。 A、工程资源管理器窗口 B、工具箱窗口 C、代码窗口 D、属性窗口 5、以下叙述中错误的是______。 A、用Shell函数可以调用能够在Windows下运行的程序
B、用Shell函数可以调用可执行文件，也可调用Visual Basic 的内部函数 C、调用Shell函数的格式应为：<变量名>=Shell(......) D、用Shell函数不能执行DOS命令 6、以下叙述中错误的是______。 A、在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件 B、以.BAS为扩展名的文件是标准模块文件 C、窗体文件包含该窗体及其控件的属性 D、一个工程中可以含有多个标准模块文件 以下不属于Visual Basic系统的文件类型是______。 A、.frm B、.bat C、.vbg D、.vbp 7、VB中窗体文件的扩展名是______。 A、VBP B、FRM C、VBW D、PDM 8、以下叙述中错误的是______。 A、打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件 B、保存Visual Basic程序时，应分别保存窗体文件及工程文件 C、Visual Basic应用程序只能以解释方式执行 D、事件可以由用户引发，也可以由系统引发 9、以下叙述中错误的是______。 A、一个工程可以包括多种类型的文件
VB试题及答案
一、选择题（将答案写在答题卡内） 1．在Visual Basic中， Len("ABab河北")的值是（） A．4 B. 6 C. 8 D.12 2．在Visual Basic中，当窗体被装载时触发的事件是（） A．Unload B.ClickC.LoadD.DblClick 3．Visual Basic中决定对象是否可见的属性是（） A．Enabled B．See C. Name D.Visible 4．在Visual Basic中，语句Mid("ABCDEFG", 2, 3) = "123"的输出结果是（） A. False B. True C．A123EFG D. 123 5．下面Visual Basic表达式不合法的是（） A. "12"+12 B. "ab"+"12" C."ab"+12 D.Now+1 6．若要使命令按钮不可操作，要对()属性进行设制。 A.Enabled B.Visible C.BackColor D.Caption 7．VisualBasic是一种面向对象的可视化程序设计语言，采取了()的编程机制。 A.事件驱动 B.按过程顺序执行 C.从主程序开始执行 D.按模块顺序执行 8．在设计阶段，当双击窗体上的某个控件时，所打开的窗口是()。 A.工程资源管理器窗口 B.工具箱窗口 C.代码窗口 D.属性窗口 9．语句Abs(-6^2)+Int(-6^2)的输出结果是()。 A.0 B.1 C.-1 D.-72 10．String(6,"124abc")的值是()。 A.124abc B.111111 C.124 D.abc 11．设a=2,b=3,c=4,d=5，表达式a>bAND c<=d的值是()。 A.True B.False C.-1 D.1 12．函数CINT(4.5)的值是（） A.1 B.2 C.3 D.4 13．用于去掉字符串右边的空格的函数是 A.Ltrim( ) B.Rtrim( ) C.Left( ) D.Instr( ) 14．设置控件背景颜色的属性名称是（） A.Ltrim B.Backcolor C.Caption D.Load 15．应用程序设计完成后，应将程序保存，保存的过程是（） A．只保存窗体文件即可 B．只保存工程文件即可 C．先保存工程文件，之后保存窗体文件 D．先保存窗体文件（或标准模块文件），之后还要保存工程文件 16．任何控件都具有的属性是（） A．TextB．CaptionC．NameD．Forecolor 17．决定控件上文字的字体、字形、大小及效果的属性是（） A．TextB．CaptionC．NameD．Font
vb期末试卷及答案
Vb 选择题精选版（试题加答案） 一、选择题（1分×50=50分） 1. 下面正确的赋值语句是__（1）_____。 A. X + Y = 10 B. Y = π *R*R C. Y = X + 10 D. 2y = X 2. 当一个命令按钮的 （2） 属性设置为False 时，该按钮为灰白显示(不可用)。 A. Visible B. Enabled C. Backcolor D. default 3. 执行下列语句时，会出现出错提示的是 （3） 。 A. Print 32765+3 B. Print 32768+3 C. Print "56" + 56 D. Print 5+7=14 4. 如果要在菜单的两个菜单命令项之间加一条分隔线，可在标题文本框中键入一个 （4） 符号。 A.下划线 B.@ C .连字符（-） D.& 5. 下面哪一个是日期型常量 (5) 。 A ．"02/25/2005" B. #January 1,1993# C. "02/25/2005# D. #02/25/2005" 6. 要声明一个长度为8个字符的定长字符串变量str ，以下 (6) 语句是正确的。 （A ）Dim str As String （B ）Dim str As String (8) （C ）Dim str As String [8] （D ）Dim str As String *8 7. 在窗体的通用声明中可以用 （7） 语句定义变量。 A. Dim 、Private B. Dim 、Static C.Dim 、Public D . Dim 、Public 、Private 8. （8） 语句是专门用来为数组或对象集合中的每个元素重复执行一组语句而设置的。 A. Select-Case-End Select B. Do-Loop C. For-Next D. For Each-Next 9. 若希望在离开某过程后，还能保存该过程中局部变量的值，则应使用__(9)___关键字在 该过程中定义局部变量。 A 、Dim B 、Private C 、Public D 、Static 10. 代数表达式y x e x +++327sin 对应的VB 表达式是 （10） 。 A. Sin(27)+Sqr(x+Exp3)/(x+y) B . Sin(27*3.14159/180)+Sqr(x+Exp(3))/Abs(x+y) C. Sin(27*3.14159/180)+Sqr(x+e^3)/Abs(x+y) D. Sin(27*π/180)+Sqr(x+Exp(3))/Abs(x+y) 11. 下列语句中，正确的是 （11） 。 A ． Text1.SetFocus B ．Form1.Clear C ．Label1. SetFocus D ．List1.Cls 12. 计时器控件表示时间间隔的属性是 （12） ，其单位为千分之一秒。 A. I nterval B. Click C. Timer D. Load 13. 如果选定列表框中的第三项，它的ListIndex 属性值是 （13） 。 A. 0 B. 1 C. 2 D. 3 14、在VB 中最基本的对象是__（14）__，它是应用程序的基石，是其它控件的容器。
兰州理工大学VB试卷的答案
试卷编号：8075 所属语言：Visual Basic 试卷方案：vb期末模拟练习 试卷总分：100分 共有题型：4种 一、程序填空共1题（共计20分） 第1题（20.0分）题号:530 '------------------------------------------------------- '【程序填空】 '------------------------------------------------------- '功能：有数列 1/5 + 1/9 + 1/13 + 1 / (1 + k * 4) (k<=100) ' 求前 100 项之和 '------------------------------------------------------- Private Sub Command1_Click() Dim s As Double Dim k As Integer '**********SPACE********** s = 【?】 '**********SPACE********** For k = 1 To 【?】 '**********SPACE********** s = s + 1 / (1 +【?】) Next k Print s End Sub 答案： =======(答案1)======= =======(答案2)======= 100 =======(答案3)======= k*4 =========或========= 4*k
二、程序改错共1题（共计20分） 第1题（20.0分）题号:480 '------------------------------------------------ '【程序改错】 '------------------------------------------------ '题目:下面函数的功能是：求变量s(s=a+aa+aaa+aaaa+……) ' 的值。其中，a是一个0-9的数字，总共累加a项。' 例如，当a=3时,s=3+33+333 (共累加3项)。 '------------------------------------------------ Option Explicit Public Sub Calc(a As Integer) Dim s As Long Dim t As Long Dim i As Integer s = a '**********FOUND********** t = 1 For i = 2 To a '**********FOUND********** t = t + a s = s + t Next i Calc = s Print s End Function Private Sub Command1_Click() Dim i As Integer i = InputBox("请输入数字（0-9）:") '**********FOUND********** Calc call i End Sub 答案： =======(答案1)======= t = a =======(答案2)======= t = t * 10 + a