【简介】下面小编给大家整理的计算机二级vb试题（共8篇），欢迎阅读!在此，感谢网友“duo”投稿本文！
一、选择题((1)~(35)每小题2分，共70分)
下列各题A)、B)、C)、D)四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上，答在试卷上不得分。
(1)数据的存储结构是指______。
A)存储在外存中的数据 B)数据所占的存储空间量
C)数据在计算机中的顺序存储方式 D)数据的逻辑结构在计算机中的表示
(2)下列关于栈的描述中错误的是______。
A) 栈是先进后出的线性表
B) 栈只能顺序存储
C) 栈具有记忆作用
D)对栈的插入与删除操作中，不需要改变栈底指针
(3)对于长度为n的线性表，在最坏情况下，下列各排序法所对应的比较次数中正确的是______。
A)冒泡排序为n/2 B)冒泡排序为n
C)快速排序为n D)快速排序为n(n-1)/2
(4)对长度为n的线性表进行顺序查找，在最坏情况下所需要的比较次数为______。
A)log2n B)n/2 C)n D)n+1
(5)下列对于线性链表的描述中正确的是______。
A) 存储空间不一定是连续，且各元素的存储顺序是任意的
B) 存储空间不一定是连续，且前件元素一定存储在后件元素的前面
C) 存储空间必须连续，且前件元素一定存储在后件元素的前面
D) 存储空间必须连续，且各元素的存储顺序是任意的
(6)下列对于软件测试的描述中正确的是______。
A) 软件测试的目的是证明程序是否正确
B) 软件测试的目的是使程序运行结果正确
C) 软件测试的目的是尽可能多地发现程序中的错误
D) 软件测试的目的是使程序符合结构化原则
(7)为了使模块尽可能独立，要求______。
A) 模块的内聚程度要尽量高，且各模块间的耦合程度要尽量强
B) 模块的内聚程度要尽量高，且各模块间的耦合程度要尽量弱
C) 模块的内聚程度要尽量低，且各模块间的耦合程度要尽量弱
D) 模块的内聚程度要尽量低，且各模块间的耦合程度要尽量强
(8)下列描述中正确的是______。
A)程序就是软件 B)软件开发不受计算机系统的限制
C)软件既是逻辑实体，又是物理实体
D)软件是程序、数据与相关文档的集合
(9)数据独立性是数据库技术的重要特点之一。所谓数据独立性是指______。
A)数据与程序独立存放
B)不同的数据被存放在不同的文件中
C)不同的数据只能被对应的应用程序所使用
D)以上三种说法都不对
(10)用树形结构表示实体之间联系的模型是______。
A)关系模型 B)网状模型 C)层次模型 D)以上三个都是
(11)在窗体(名称为Form1)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是______。
A) Private Sub Text1_Change
Command1.Caption = “计算机等级考试”
End Sub
B) Private Sub Command1_ Click ()
Caption = “计算机等级考试”
End Sub
C) Private Sub Form1_ Click ()
Text1.Caption = “计算机等级考试”
End Sub
D) Private Sub Command1_ Click ()
Text1.Text = “计算机等级考试”
End Sub
(12)设a=5，b=4，c=3，d=2下列表达式的值是______。
3 >2 * b Or a = c And b c Or c >d
A)1 B)True C) False D)2
(13)设a = “MicrosoftVisualBasic” ，则以下使变量b的值为“VisualBasic”的语句是______。
A) b = Left(a, 10) B) b = Mid(a, 10)
C) b = Right(a, 10) D) b = Mid(a, 11, 10)
(14)假定有如下的窗体事件过程：
Private Sub Form_Click()
a$ = “Microsoft Visual Basic”
b$ = Right(a$, 5)
c$ = Mid(a$, 1, 9)
MsgBox a$, 34, b$, c$, 5
End Sub
程序运行后，单击窗体，则在弹出的信息框的标题栏中显示的信息是______。
A) Microsoft Visual B) Microsoft
C) Basic D)5
(15)设a = “a”，b = “b”，c = “c”，d = “d”，执行语句x=IIf((ad),”A”,”B”)后，x的值为 ______。
A)”a” B)”b” C)”B” D)”A”
(16)为了使命令按钮(名称为Command1)右移200，应使用的语句是______。
A) Command1.Move -200
B) Command1.Move 200
C) Command1.Left = Command1.Left + 200
D) Command1.Left = Command1.Left - 200
(17)在窗体上画一个文本框，然后编写如下事件过程：
Private Sub Form_Click()
x = InputBox(“请输入一个整数”)
Print x + Text1.Text
End Sub
程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容为______。
A) 123 B)456 C) 479 D) 123456
(18)在窗体上画一个文本框和一个计时器控件，名称分别为Text1和Timer1，在属性窗口中把计时器的Interval属性设置为1000，Enabled属性设置为False。程序运行后，如果单击命令按钮，则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操作的程序：
Private Sub Command1_Click()
Timer1.______
End Sub
Private Sub Timer1_Timer()
Text1.Text = Time
End Sub
在下划线处应填入的内容是______。
A) Enabled = True B) Enabled = False
C) Visible = True D) Visible = False
(19)假定在图片框Picture1中装入了一个图形，为了清除该图形(不删除图片框)，应采用的正确方法是______。
A)选择图片框，然后按Del键
B)执行语句Picture1.Picture = LoadPicture (“”)
C)执行语句Picture1.Picture =“”
D)选择图片框，在属性窗口中选择Picture属性条，然后按回车键
篇2：计算机二级VB考试题1.在窗体上画一个名称为Text1的文本框，一个名称为Command1的命令按钮，然后编写如下事件过程和通用过程：
Private Sub Command1_Click( )
n = Val(Text1.Text)
If n\2 = n/2 Then
f = f1(n)
Else
f = f2(n)
End If
Print f; n
End Sub
Public Function f1(ByRef x)
x=x*x
f1=x+x
End Function
Public Function f2(ByVal x)
x=x*x
f2=x+x+x
End Function
程序运行后，在文本框中输入3，然后单击命令按钮，窗体上显示的是(D)(单)
A.72 36
B.108 36
C.72 6
D.27 3
2.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click( )
c = “1234”
For i = 1 To 4
c1 = Trim(Str( ))
Print c1
Next i
End Sub
程序运行后，单击命令按钮，要求在窗体上显示如下内容
1
12
123
1234
则在下划线处应填入的内容为(B)(单)
A.Right(c1,i)
B.Left(c1,i)
C.Mid(c1,i,1)
D.Mid(c1,i,i)
3.在窗体上画一个名称为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
该事件过程的功能是(C)(单)
A.输出n以内的奇数
B.输出n以内的偶数
C.输出n以内的素数
D.输出n以内能被j整除的数
4.在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程：
Private Function f(m As Integer)
If m Mod 2 = 0 Then
f = m
Else
f = 1
End If
End Function
Private Sub Command1_Click( )
Dim i As Integer
s = 0
For i = 1 To 5
s = s + f(i)
Next
Print s
End Sub
程序运行后，单击命令按钮，在窗体上显示的是(C)(单)
A.11
B.10
C.9
D.8
5.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click( )
Dim array1(10, 10) As Integer
Dim i As Integer, j As Integer
For i = 1 To 3
For j = 2 To 4
array1(i, j) = i + j
Next j
Next i
Text1.Text = array1(2, 3) + array1(3, 4)
End Sub
程序运行后，单击命令按钮，在文本框中显示的值是(D)(单)
A.15
B.14
C.13
D.12
6.Visual Basic应用程序中标准模块文件的扩展名是【BAS或.BAS】(注意不要写点)。
7.在菜单编辑器中建立一个菜单，其主菜单项的名称为mnuEdit，Visible属性为False，程序运行后，如果用鼠标右键单击窗体，则弹出与mnuEdit相应的菜单。
Private Sub Form_ 【mousedown】 (Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button=2 Then
popupmenu mnuEdit
End If
End Sub
8.在菜单编辑器中建立一个菜单，其主菜单项的名称为mnuEdit，Visible属性为False，程序运行后，如果用鼠标右键单击窗体，则弹出与mnuEdit相应的菜单。以下是实现上述功能的程序，请填空。
Private Sub Form mousedown (Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button=2 Then
【popupmenu】 mnuEdit
End If
9.为了使计时器控件Timer1每隔0.5秒触发一次Timer事件，应将Timer1控件的【Interval】属性设置为500。
10.为了使计时器控件Timer1每隔0.5秒触发一次Timer事件，应将Timer1控件的Interval属性设置为【500】。
篇3：计算机二级VB考试题1.窗体中有一个名称为txtSpeed的文本框，一个名称为hsbSpeed的滚动条。
以下程序：
Private Sub hsbSpeed_Change( )
txtSpee
D.Text = hsbSpee
D.Value
End Sub
当单击滚动条hsbSpeed右端的箭头时，以下说法不正确的是(B) (单)
A.此时会触发change事件
B.此时不会触发change事件
C.在文本框中显示了滚动条滑块所在位置的值
D.此时不会触发scroll事件
2.利用窗体中的滚动条HScroll1改变窗体的背景色，可以这样编写代码：
Private Sub HScroll1_Change( )
R= HScroll1.Value
form1.BackColor = RGB(R，int(Rnd*256)，int(Rnd*256))
End Sub
以下说法不正确的是(C) (单)
A.窗体的背景色是一个随机的颜色
B.RGB函数取得到的颜色有256*256*256种
C.表达式int(Rnd*256)取得随机数的范围为0-256之间的整数
D.表达式int(Rnd*256)取得随机数的范围为0-255之间的整数
3.窗体中有一个名称为Slider1的可选择性刻度滑块控件，一个名称为text1的文本框，如下程序：
Private Sub Slider1_change( )
Text1.FontSize =【Slider1.value】
End Sub
当拖动滑块时，以上程序实现用Slider控件设置文本框中的字体大小的功能。
4.窗体中有一个名称为Slider1的可选择性刻度滑块控件，一个名称为text1的文本框，如下程序：
Private Sub Slider1_change( )
Text1.【Fontsize】 = slider1.value
End Sub
当拖动滑块时，以上程序实现用Slider控件设置文本框中的字体大小的功能。
5.窗体中有一个名称为Slider1的可选择性刻度滑块控件，要设置它的如下属性值，可以编写程序(A) (单)
(1)Slider控件的滑块处于最小位置时值为8
(2)Slider控件的滑块处于最大位置时值为72
(3)单击Slider控件两端箭头时，滑块的增量值为2
(4)单击Slider控件的空白处时，滑块的增量值为8
A.Slider1.Min = 8：
Slider1.Max = 72：
Slider1.SmallChange =2：
Slider1.LargeChange = 8
B.Slider1.Min = 2：
Slider1.Max = 8：
Slider1.SmallChange = 72：
Slider1.LargeChange = 8
C.Slider1.Min = 8：
Slider1.Max = 72：
Slider1.SmallChange = 8：
Slider1.LargeChange = 2
D.Slider1.Min = 72：
Slider1.Max = 8：
Slider1.SmallChange = 2：
Slider1.LargeChange = 8
6.在窗体中有一个名称为timer1的时钟控件，三个名称分别为image1、image2 和 image3的图像框，编写如下程序：
Sub Form_Load( )
Image1.Picture=LoadPicture(App.Path+“\butterfly.bmp”)
Image2.Picture=LoadPicture(App.Path+“\butterfly2.bmp”)
Image3.Picture=LoadPicture(App.Path+“\butterfly.bmp”)
End Sub
Sub timer1_Timer( )
Static PickBmp As Boolean
Image1.Move Image1.Left + 20, Image1.Top - 5
If PickBmp = False Then
Image1.Picture = Image2.Picture
PickBmp = True
Else
Image1.Picture = Image3.Picture
PickBmp = False
End If
End Sub
以下说法不正确的是(C) (单)
A.此程序的功能是把image1图像框显示图形在butterfly.bmp和butterfly2.bmp文件之间进行切换
B.PickBmp变量是逻辑变量，作用是表示图形的状态
C.App.Path表示绝对路径
D.要使得timer控件起作用，必须使得它的Enabled属性设置为true，interval属性设置为介于0-64767之间的数值，但不能等于0
7.在窗体中有一个名称为timer1的时钟控件，三个名称分别为image1、image2 和 image3的图像框，编写如下程序：
Sub Form_Load( )
Image1.Picture=LoadPicture(App.Path+“\butterfly.bmp”)
Image2.Picture=LoadPicture(App.Path+“\butterfly2.bmp”)
Image3.Picture=LoadPicture(App.Path+“\butterfly.bmp”)
End Sub
Sub timer1_Timer( )
Static PickBmp As Boolean
Image1.Move Image1.Left + 20, Image1.Top - 5
If PickBmp = False Then
Image1.Picture = Image2.Picture
PickBmp = True
Else
Image1.Picture = Image3.Picture
PickBmp = False
End If
End Sub
以下说法不正确的是(B) (单)
A.此程序的功能是把image1图像框显示图形在butterfly.bmp和butterfly2.bmp文件之间进行切换
B.也可以将timer1控件的timer事件改写为change事件
C.App.Path表示相对路径
D.要使得timer控件起作用，必须使得它的Enabled属性设置为true，interval属性设置为介于0-64767之间的数值，但不能等于0
8 .在ProgressBar进度条控件中，它的Value属性决定该控件被填充多少。√
9 .UpDown控件通常与伙伴控件“捆绑”在一起使用。√
10 .Animation控件可以用来显示有声音的AVI视频文件 ×。
11.对Animation控件所使用的方法描述不正确的是(B) (单)
A.Open方法用于打开文件
B.Play方法用于播放动画，格式为： Animation1.play AVI动画文件路径
C.Stop方法用于停止播放
D.Close方法用于关闭文件
12.下面的事件不属于鼠标器事件的是(D) (单)
A.MouseDown事件
B.MouseUp事件
C.MouseMove事件
D.Move事件
13.下面的事件不属于键盘事件的是(D) (单)
A.KeyPress事件
B.KeyDown事件
C.KeyUp事件
D.KeyMove事件
14.在窗体中有一个名称为command1的命令按钮，一个名称为text1的文本框，一个名称为commondialog1的通用对话框，编写如下程序：
Sub command1_Click( )
CommonDialog1.Action = 3
text1.ForeColor = CommonDialog1.Color
End Sub
当单击命令按钮时，对程序的运行说法正确的是(B) (单)
A.打开一个颜色对话框
B.打开一个字体对话框
C.把文本框的背景颜色设置为对话框选择的字体颜色
D.把文本框的背景颜色设置为对话框中选择的颜色
15.当单击命令按钮时，对以下程序说法不正确的是(D) (单)
Sub command1_Click( )
CommonDialog1.Action = 5
For i = 1 To CommonDialog1.Copies
Printer.Print text1.Text
Next i
Printer.EndDoc
End Sub
A.此文件的功能是打印文本框text1中的内容
B.语句Printer.EndDoc表示结束文挡打印
C.打开的打印对话框
D.以上说法都不正确
16.当单击命令按钮时，对以下程序说法不正确的是(C) (单)
Sub command1_Click( )
CommonDialog1.FileName = “default.txt”
CommonDialog1.DefaultExt = “Txt”
CommonDialog1.Action = 2
End Sub
A.设置缺省文件名为default.txt
B.设置缺省扩展名为Txt
C.显示的是文件“打开”对话框
D.显示的是“另存为”对话框
17.在窗体中建立了三个名称分别为EditCut、EditCopy和EditPaste的命令按钮，一个名称为text1的文本框。
如下程序：
Private Sub EditCopy_Click( )
st = Text1.SelText '将选中的内容存放到st变量中
End Sub
Private Sub EditCut_Click( )
st = Text1.SelText '
Text1.SelText = “”
End Sub
Private Sub EditPaste_Click( )
Text1.Text = Left(Text1, Text1.SelStart) + st + Mid(Text1, Text1.SelStart
+ 1)
End Sub
对以上程序说法不正确的是(D) (单)
A.语句st = Text1.SelText的作用是：将text1文本框中选择的内容存放到st变量中
B.语句Text1.SelText = “” 的作用是：将text1文本框中选择的内容清除
C.单击EditCut命令按钮实现了text1文本框中选择的内容清除
D.单击Editcopy命令按钮实现了text1文本框中所有内容的粘贴
18.对以下程序说法不正确的是(D) (单)
Private Sub FileOpen_Click( )
CommonDialog1.InitDir = “C:\”
CommonDialog1.Filter = “文本文件 | *.Txt”
CommonDialog1.ShowOpen
End Sub
A.显示“文件”打开对话框
B.打开的对话框的初始目录为C盘根目录
C.打开的对话框的文件类型为文本文件
D.以上说法都不正确
19.双精度型数据的类型符为(A) (单)
A.#
B.*
C.&
D.@
20.整型数据的类型符为(B) (单)
A.#
B.%
C.&
D.@
篇4：二级vb试题及答案二级vb试题及答案
1.栈和队列的共同特点是( )
A.都是先进先出
B.都是先进后出
C.只允许在端点处插入和删除元素
D.没有共同点
【参考答案】 C
2.链表不具有的特点是( )
A.不必事先估计存储空间 B.可随机访问任一元素
C.插入删除不需要移动元素 D.所需空间与线性表长度成正比
【参考答案】 B
3.为了提高测试的效率，应该( )
A.随机选取7测试数据 B.取一切可能的输入数据作为测试数据
C.在完成编码以后制定软件的测试计划 D.集中对付那些错误群集的程序
【参考答案】 D
4.软件生命周期中所花费用最多的阶段是( )
A.详细设计 B.软件编码 C.软件测试 D.软件维护
【参考答案】 D
5.下列有关数据库的描述，正确的是( )
A.数据库是一个DBF文件
B.数据库是一个关系
C.数据库是一个结构化的数据集合
D.数据库是一组文件
【参考答案】 C
6.算法的空间复杂度是指( )
A.算法程序的长度 B.算法程序中的指令条数
C.算法程序所占的存储空间 D.执行过程中所需要的存储空间
【参考答案】 D
7.数据结构中，与所使用的计算机无关的是数据的( )
A.存储结构 B.物理结构 C.逻辑结构 D.物理和存储结构
【参考答案】 C
8.软件设计包括软件的结构、数据接口和过程设计，其中软件的过程设计是指( )
A.模块间的关系 B.系统结构部件转换成软件的过程描述
C.软件层次结构 D.软件开发过程
【参考答案】 B
9.数据流图用于抽象描述一个软件的逻辑模型，数据流图由一些特定的图符构成。下列图符名标识的图符不属于数据流图合法图符的是( )
A.控制流 B.加工
C.数据存储 D.源和潭
【参考答案】 A
10.在数据库设计中，将E-R图转换成关系数据模型的过程属于( )
A.需求分析阶段 B.逻辑设计阶段 C.概念设计阶段 D.物理设计阶段
【参考答案】 B
11.使用Visual FoxPro的菜单设计器时，选中菜单项之后，如果要设计它的'子菜单，应在“结果”中选择( )
A.菜单项 B.子菜单 C.命令 D.过程
【参考答案】 B
12.在Visual FoxPro中，用于建立或修改过程文件的命令是( )
A.MODIFY<文件名>B.MODIFY COMMAND<文件名>
C.MODIFY PROCEDURE<文件名>D.以上B、C都对
【参考答案】 B
13.在菜单设计器中，第一级菜单的“结果”项中选项有( )
A.命名、填充名称、子菜单、过程 B.包含对象的表单集
C.菜单项、命令、过程和快捷菜单 D.子菜单、菜单项、过程和快捷菜单
【参考答案】 A
14.使用命令DECLARE MM(2，3)定义的数组，包含的数组元素(下标变量)的个数为( )
A.2个 B.3个 C.5个 D.6个
【参考答案】 D
15.计算所有职称为正、副教授的平均工资，将结构赋予变量PJ中，应使用命令( )
A.AVERAGE工资TO PJ FOR″教授″$职称
B.AVERAGE FIELDS工资TO PJ FOR″教授″$职称
C.AVERAGE工资TO PJ FOR职称=″副教授″.AND.职称=″教授″$
D.AVERAGE工资TO PJ FOR职称=″副教授″.OR.″教授″
【参考答案】 A
16.“x是小于100的非负数”，用VFP表达式表示是( )
A.0≤x<100><><100><=x and=""><100><=x or=""><>
【参考答案】 C
17.将A区上的主表文件按关键字段“XM”和C区上的辅助文件建立关联，正确的是( )
A.SET RELATION TO XM INTO C B.SET RELATION TO C INTO XM
C.SET RELATION TO XM TO C D.SET RELATION ON XM INTO C
【参考答案】 A
18.数据表文件CJ.DBF已经打开，共有10条记录，按关键字XM排序，执行命令SORT ON XM TO CJ后，屏幕将显示( )
A.10条记录排序完成
B.CJ.DBF已存在，覆盖它吗(Y/N)
C.文件在使用
D.出错信息
【参考答案】 C
19.关于数据库表和自由表，下列说法正确的是( )
A.数据库表可以转换为自由表，反之不能 B.自由表可以转换为数据库表，反之不能
C.两者不能相互转换 D.两者可以相互转换
【参考答案】 D
20.在下列各式中，运算结果为数值的是( )
A.CTOD(′04/05/97′)-28 B.′1234′+′5678′
C.120+30=150 D.LEN(′ABCD′)-1
【参考答案】 D21.从数据库的整体结构看，数据库系统采用的数据模型有( )
A.网状模型、链状模型和层次模型 B.层次模型、网状模型和环状模型
C.层次模型、网状模型和关系模型 D.链状模型、关系模型和层次模型
【参考答案】 C
22.把当前数据库文件中“性别”字段的值全部清除，但仍保留该字段与其他各字段内容，应当使用命令( )
A.MODIFY STRUCTURE B.DELETE
C.REPLACE D.ZAP
【参考答案】 C
23.假定系统日期是12月20日，有如下命令：
MJ=MOD(YEAR(DATE)，100)
执行该命令后，MJ的值是( )
A. B.98 C.981220 D.1220
篇5：计算机二级vb上机题库(34)某人设计了下面的函数fun，功能是返回参数a中数值的位数
Function fun(a As Integer) As Integer
Dim n%
n = 1
While a \ 10 >= 0
n = n + 1
a = a \ 10
Wend
fun = n
End Function
在调用该函数时发现返回的结果不正确，函数需要修改，下面的修改方案中正确的是
A)把语句n = 1改为n = 0
B)把循环条件a \ 10 >= 0改为a \ 10 >0
C)把语句 a = a \ 10改为a = a Mod 10
D)把语句fun = n改为 fun = a
(35)在窗体上有一个名称为Check1的复选框数组
(含4个复选框)，还有一个名称为Text1的文本
框，初始内容为空。程序运行时，单击任何复选
框，则把所有选中的复选框后面的方字罗列在文
本框中(见图)。下面能实现此功能的事件过程是
A)Private Sub Check1_Click(Indes As Integer)
Text1.Text =“”
For k = 0 To 3
If Check1(k).value = 1 Then
Text1.Text = Text1.Text & Check1(k).Caption & “ ” '双引号中是空格
End If
Next k
End Sub
B)Private Sub Check1_Click(Index As Integer)
For k = 0 To 3
If Check1(k).value = 1 Then
Text1.Text = Text1.Text & Check1(k).Caption & “ ” '双引号中是空格
End If
Next k
End Sub
C)Private Sub Check1_Click(Index As Integer)
Text1.Text = “”
For k = 0 To 3
If Check1(k).value = 1 Then
Text1.Text = Text1.Text & Check1(Index).Caption & “ ” '双引号中是空格
End If
Next k
End Sub
D)Private Sub Check1_Click(Index As Integer)
Text1.Text = “”
For k = 0 To 3
If Check1(k).value = 1 Then
Text1.Text = Text1.Text & Check1(k).Caption & “ ” '双引号中是空格
Exit For
End If
Next k
End Sub
二、填空题(每空2分，共30分)
请将每空的正确答案写在答题卡[1]~[15]序号的横线上，答在试卷上不得分。
(1)软件需求规格说明书应具有完整性，无岐义性、正确性、可验证性、可修改性等特征，其中最重要的是【1】 。
(2)在两种基本测试方法中，【2】 测试的原则之一是保证所测模块中每一个独立路径至少执行一次。
(3)线性表的存储结构主要分为顺序存储结构和链式存储结构。队列是一种特殊的线性表，循环队列是队列的【3】 存储结构。
(4)对下列二叉树进行中序遍历的结果为【4】 。
(5)在E-R图中，矩形表示【5】 。
(6)窗体上有一个组合框，其中已输入了
若干个项目。程序运行时，单击其中一
项，即可把该项与最上面的一项交换。
例如：单击图1中的“重庆”，则与“北
京”交换，得到图2的结果。下面是可
实现此功能的程序，请填空。
Private Sub Combo1_Click()
Dim temp
temp = Combo1.Text
[6] = Combo1.List(0)
Combo1.List(0) = temp
End Sub
(7)设窗体上有一个名称为HScroIII的水平滚动条，要求当滚动块移动位置后，能够在窗体上输出移动的距离(即新位置与原位置的刻度值之差，向右移动为正数，向左移动为负数)。下面是可实现此功能的程序，请填写。
Dim [7] As Integer
Private Sub Form_Load()
pos=HScroIII.value
End Sub
Private Sub HScroIII_Change()
Print [8] -pos
pos=HScroIII.value
End Sub
(8)设窗体上有一个名称为CD1的通用对话框，一个名称为Text1的文本框和一个名称为Command1的命令按钮。程序执行时，单击Command1按钮，则显示打开文件对话框，操作者从中选择一个文本文件，并单击对话框上的“打开”按钮后，则可打开该文本文件，并读入一行文本，显示在Text1中。下面是实现此功能的事件过程，请填空。
Private Sub Command1_Click()
CD1.Filter =“文本文件1*.txt(Word 文档)*.doc”
CD1.Filterinder = 1
CD1.ShowOpen
If CD1.FileName“”Then
Open [9] For Input As #1
Line Input #1,ch$
Close #1
Text1.Text = [10]
End If
End Sub
(9)下面的程序执行时，可以从键盘输入一个正整数，然后把该数的每位数字按逆序输出。例如：输入7685，则输出5867，输入1000，则输出0001。请填空。
Private Sub Command1_Click()
Dim x As Integer
x=InputBox(“请输入一个正整数”)
While x>__[11]___
Print x Mod 10;
x=x\10
Wend
Print__[12]__
End Sub
篇6：计算机二级VB考试题及答案计算机二级VB考试题及答案
计算机二级VB考试题及答案
1.设有如下程序段：
x=2
For c=1 To 4 Step 2
x=x+c
Next c
运行以上程序后，x的值是(A)(单)
A.6
B.7
C.8
D.9
2.以下叙述中错误的是(A)(单)
A.在KeyPress事件过程中不能识别键盘键的按下与释放
B.在KeyPress事件过程中不能识别回车键
C.在KeyDown和KeyUp事件过程中，从键盘输入的字母“A”和字母“a”对应的KeyCode视作相同的字母
D.在KeyDown和KeyUp事件过程中，从大键盘上输入的“1”和从右侧小键盘上输入的“1”被视作不同的字符
3.执行如下两条语句，窗体上显示的是(C)(单)
A=9.8596
Print Format(a,“000.00”)
A.0,009.86
B.9.86
C.009.86
D.0,009.86
4.在窗体上画一个名称为CommandDialog1 的通用对话框，一个名称为Command1的命令按钮。然后编写如下事件过程：
Private Sub Command1_Click( )
CommonDialog1.FileName =“”
CommonDialog1.Filter=“All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt”
CommonDialog1.FilterIndex=1
CommonDialog1.DialogTitle=“VBTest”
CommonDialog1.Action=1
End Sub
对于这个程序，以下叙述中错误的是(D)(单)
A.该对话框被设置为“打开”对话框
B.在该对话框中指定的文件名为空
C.该对话框的标题为VBTest
D.在该对话框中指定的默认文件类型为文本文件(*.Txt)
5.设一个工程由两个窗体组成，其名称分别为Form1和Form2，在Form1上有一个名称为Command1的命令按钮。窗体Form1的程序代码如下：
Private Sub Command1_Click( )
Dim a As Integer
a=10
Call g(Form2,a)
End Sub
Private Sub g(f As Form,x As Integer)
y=Iif(x>10,100,-100)
f.Show
f.Caption=y
End Sub
运行以上程序，正确的结果是(B)(单)
A.Form1的Caption属性值为100
B.Form2的Caption属性值为-100
C.Form1的Caption属性值为-100
D.Form2的Caption属性值为100
6.在窗体上画一个名称为Command1的命令按钮，并编写如下程序：
Private Sub Command1_Click( )
Dim x As Integer
Static y As Integer
x=10
y=5
Call f1(x,y)
Print x,y
End Sub
Private Sub f1(ByRef x1 As Integer, y1 As Integer)
x1=x1+2
y1=y1+2
End Sub
程序运行后，单击命令按钮，在窗体上显示的内容是(D)(单)
A.10 5
B.12 5
C.10 7
D.12 7
7.Option Base 1
Private Sub Command1_Click( )
Dim a(10) As Integer
Dim n As Integer
n=3
If n<10>
Call GetArray(a,n)
End If
End Sub
Private Sub GetArray(b( ) As Integer,n As Integer)
Dim c(10) As Integer
j=0
For t=1 To n
b(t)=Rnd*100
If b(t)/2=b(t)2 Then
j=j+1
c(j)=b(t)
End If
Next t
Print j
End Sub
以下叙述中错误的是(C)(单)
A.数组b中的数范围为0-100
B.c数组下标的下界从1开始
C.GetArray过程的参数n是按值传送的
D.语句If b(t)/2=b(t)2 Then 是判断数组b中元素的值是否为整数
8.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Option Base 1
Private Sub Command1_Click( )
Dim a
a= Array(1,2,3,4,5)
For c=1 To Ubound(a)
a(c) = a(c)+c-1
Next c
Print a(3)
End Sub
程序运行后，单击命令按钮，则在窗体上显示的内容是(B)(单)
A.4
B.5
C.6
D.7
9.阅读程序：
Option Base 1
Private Sub Form_Click( )
Dim arr
Dim Sum%
Sum = 0
arr = Array(1, 3, 5, 7, 9)
For t = 1 To 5
Sum = Sum + arr(t)
Next t
Print Sum
End Sub
程序运行后，单击窗体，输入结果为(B)(单)
A.5
B.9
C.25
D.15
10.在窗体上画一个名称为File1的文件列表框，并编写如下程序：
Private Sub File1_DblClick( )
x=Shell(File1.FileName,1)
End Sub
以下关于该程序的叙述中，错误的是(A)(单)
A.x没有实际作用，因此可以将该语句写为：Call Shell(File1,FileName,1)
B.双击文件列表框中的文件，将触发该事件过程
C.要执行的文件的名字通过File1.FileName指定
D.File1中显示的是当前驱动器、当前目录下的文件
11.在窗体上画一个名称为Label1、标题为“VisualBasic考试”的标签，两个名称分别为Command1和Command2、标题分别为“开始”和“停止”的命令按钮，然后画一个名称为Timer1的.计时器控件，并把其Interval属性设置为500。编写如下程序：
Private Sub Form_Load( )
Timer1.Enabled=False
End Sub
Private Sub Command1_Click( )
Timer1.Enabled=True
End Sub
Private Sub Timer1_Timer( )
If Label1.Left< form1.>
Label1.Left = Label1.Left + 20
Else
Label1.Left=0
End If
End Sub
程序运行后，单击“开始”按钮，标签在窗体中移动。 对于这个程序，以下叙述中错误的是(A)(单)
A.标签的移动方向为自右向左
B.单击“停止”按钮后再单击“开始”按钮，标签从停止的位置继续移动
C.当标签全部移出窗体后，将从窗体的另一端出现并重新移动
D.标签按指定的时间时隔移动
12.规范地说，VB是一种(A)的开发工具(单)
A.面向对象
B.面向用户
C.面向屏幕
D.面向窗体
13.VB6设计界面包含多个视窗，控制这些视窗显示或关闭的命令包含在(D)下拉菜单中(单)
A.文件
B.工程
C.编辑
D.视图
14下面(D)操作不是激活或显示属性列表框的操作(单)
A.按快捷键F4
B.点击工具栏中的“属性列表框”按钮
C.选择“视图”下拉菜单的“属性窗口”项
D.双击窗体中的某一对象
15.Visual Basic程序中分隔各语句的字符是(B)(单)
A.′
B.:
C.
D._
16.假定窗体的名称(Name属性)为Form1，则把窗体的标题设置为“VB Test”的语句为(B)(单)
A.Form1 = “VB Test”
B.Caption =“VB Test”
C.Form1.Text = “VB Test”
D.Form1.Name =“VB Test”
17.下列不能打开代码窗口的操作是(D)(单)
A.双击窗体上的某个控件双击
B.双击窗体
C.按F7键
D.单击窗体或控件
18.Visual Basic程序中语句行的续行符是(D)(单)
A.′
B.:
C.
D. _
19.Visual Basic程序中的注释所使用的字符是(A)(单)
A.′
B.:
C.
D._
20.下列说法中正确的是：为了保存一个Visual Basic应用程序，应当(D)(单)
A.只保存窗体模块文件(.frm)
B.只保存工程文件(.vbp)
C.分别保存工程文件和标准模块文件(.bas)
D.分别保存工程文件、窗体文件和标准模块文件
篇7： 计算机二级VB考试题及答案1.在窗体上画一个名称为Text1的文本框，一个名称为Command1的命令按钮，然后编写如下事件过程和通用过程：
Private Sub Command1_Click( )
n = Val(Text1.Text)
If n2 = n/2 Then
f = f1(n)
Else
f = f2(n)
End If
Print f; n
End Sub
Public Function f1(ByRef x)
x=x*x
f1=x+x
End Function
Public Function f2(ByVal x)
x=x*x
f2=x+x+x
End Function
程序运行后，在文本框中输入3，然后单击命令按钮，窗体上显示的是(D)(单)
A.72 36
B.108 36
C.72 6
D.27 3
2.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click( )
c = “1234”
For i = 1 To 4
c1 = Trim(Str( ))
Print c1
Next i
End Sub
程序运行后，单击命令按钮，要求在窗体上显示如下内容
1
12
123
1234
则在下划线处应填入的内容为(B)(单)
A.Right(c1,i)
B.Left(c1,i)
C.Mid(c1,i,1)
D.Mid(c1,i,i)
3.在窗体上画一个名称为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
该事件过程的功能是(C)(单)
A.输出n以内的奇数
B.输出n以内的偶数
C.输出n以内的素数
D.输出n以内能被j整除的数
4.在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程：
Private Function f(m As Integer)
If m Mod 2 = 0 Then
f = m
Else
f = 1
End If
End Function
Private Sub Command1_Click( )
Dim i As Integer
s = 0
For i = 1 To 5
s = s + f(i)
Next
Print s
End Sub
程序运行后，单击命令按钮，在窗体上显示的是(C)(单)
A.11
B.10
C.9
D.8
5.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click( )
Dim array1(10, 10) As Integer
Dim i As Integer, j As Integer
For i = 1 To 3
For j = 2 To 4
array1(i, j) = i + j
Next j
Next i
Text1.Text = array1(2, 3) + array1(3, 4)
End Sub
程序运行后，单击命令按钮，在文本框中显示的值是(D)(单)
A.15
B.14
C.13
D.12
6.Visual Basic应用程序中标准模块文件的扩展名是【BAS或.BAS】(注意不要写点)。
7.在菜单编辑器中建立一个菜单，其主菜单项的名称为mnuEdit，Visible属性为False，程序运行后，如果用鼠标右键单击窗体，则弹出与mnuEdit相应的菜单。
Private Sub Form_ 【mousedown】 (Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button=2 Then
popupmenu mnuEdit
End If
End Sub
8.在菜单编辑器中建立一个菜单，其主菜单项的名称为mnuEdit，Visible属性为False，程序运行后，如果用鼠标右键单击窗体，则弹出与mnuEdit相应的菜单。以下是实现上述功能的程序，请填空。
Private Sub Form mousedown (Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button=2 Then
【popupmenu】 mnuEdit
End If
9.为了使计时器控件Timer1每隔0.5秒触发一次Timer事件，应将Timer1控件的【Interval】属性设置为500。
10.为了使计时器控件Timer1每隔0.5秒触发一次Timer事件，应将Timer1控件的Interval属性设置为【500】。
11.与数学表达式ln(a+b)/(3x)+5 对应的Visual Basic表达式是【log(a+b)/(3*x)+5或(log(a+b)/(3*x))+5】
12.将C盘根目录下的图形文件moon.jpg装入图片框Picture1的语句是
13.在窗体上画一个名称为Text1的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为Option1，程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换。
Private Sub Option1_Click(Index As Integer)
Select Case 【Index】
Case 0
a = “宋体”
Case 1
a = “黑体”
Case 2
a = “楷体_GB2312”
End Select
text1.fontname=a
End Sub
14.在窗体上画一个名称为Text1的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为Option1，程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换。
Private Sub Option1_Click(Index As Integer)
Select Case index
Case 0
a = “宋体”
Case 1
a = “黑体”
Case 2
a = “楷体_GB2312”
End Select
text1.【fontname】=a
End Sub
15.在窗体上画两个组合框，其名称分别为Combo1、Combo2，然后画两个标签，名称分别为Label1、Label2。程序运行后，如果在某个组合框中选择一个项目，则把所选中的项目在其下面的标签中显示出来。
Private Sub Combo1_Click( )
Call ShowItem(Combo1, Label1)
End Sub
Private Sub Combo2_Click( )
Call ShowItem(Combo2, Label2)
End Sub
Public Sub ShowItem(tmpCombo As ComboBox, tmpLabel As Label)
【tmplabel】.Caption =tmpCombo.Text
End Sub
16.在窗体上画两个组合框，其名称分别为Combo1、Combo2，然后画两个标签，名称分别为Label1、Label2，程序运行后，如果在某个组合框中选择一个项目，则把所选中的项目在其下面的标签中显示出来。
Private Sub Combo1_Click( )
Call ShowItem(Combo1, Label1)
End Sub
Private Sub Combo2_Click( )
Call ShowItem(Combo2, Label2)
End Sub
Public Sub ShowItem(tmpCombo As ComboBox, tmpLabel As Label)
tmpLabel.Caption =【tmpcombo】.Text
End Sub
17.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click( )
n = 5
f = 1
s = 0
For c = 1 To n
f = f*【7】
s = s + f
Next c
Print s
End Sub
该事件过程的功能是计算1!+2!+3!+…+n!的值。
18.在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Option Base 1
Private Sub Command1_Click( )
Dim a(10) As Integer
For I = 1 To 10
a(I) = I
Next I
Call【swap】a( )
For I = 1 To 10
Print a(I);
Next
End Sub
Sub swap(b( ) As Integer)
n = ubound(b)
For I = 1 To n / 2
t = b(I)
b(I) = b(n)
b(n) = t
n=n-1
Next I
End Sub
上述程序的功能是，通过调用过程swap，调换数组中数值的`存放位置，即a(1)与a(10)的值互换，a(2)与a(9)的值互换，……，a(5)与a(6)的值互换。
19.在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Option Base 1
Private Sub Command1_Click( )
Dim a(10) As Integer
For I = 1 To 10
a(I) = I
Next I
Call swap(a( ))
For I = 1 To 10
Print a(I);
Next
End Sub
Sub swap(b( ) As Integer)
n =【ubound(b)】
For I = 1 To n / 2
t = b(I)
b(I) = b(n)
b(n) = t
n=n-1
Next I
End Sub
上述程序的功能是，通过调用过程swap，调换数组中数值的存放位置，即a(1)与a(10)的值互换，a(2)与a(9)的值互换，……，a(5)与a(6)的值互换。
20.在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Option Base 1
Private Sub Command1_Click( )
Dim a(10) As Integer
For I = 1 To 10
a(I) = I
Next I
Call swap(a( ))
For I = 1 To 10
Print a(I);
Next I
End Sub
Sub swap(b( ) As Integer)
n = ubound(b)
For I = 1 To n / 2
t = b(I)
b(I) = b(n)
b(n) = t
n=【n-1】
Next I
End Sub
上述程序的功能是，通过调用过程swap，调换数组中数值的存放位置，即a(1)与a(10)的值互换，a(2)与a(9)的值互换，……，a(5)与a(6)的值互换。
篇8：计算机vb试题及答案计算机vb试题及答案
(1)下面叙述正确的是(C)
A.算法的执行效率与数据的存储结构无关
B.算法的空间复杂度是指算法程序中指令(或语句)的条数
C.算法的有穷性是指算法必须能在执行有限个步骤之后终止
D.以上三种描述都不对
(2)以下数据结构中不属于线性数据结构的是(C)
A.队列
B.线性表
C.二叉树
D.栈
(3)在一棵二叉树上第5层的结点数最多是(B)注：由公式2k-1得
A.8
B.16
C.32
D.15
(4)下面描述中，符合结构化程序设计风格的是(A)
A.使用顺序、选择和重复(循环)三种基本控制结构表示程序的控制逻辑
B.模块只有一个入口，可以有多个出口
C.注重提高程序的执行效率
D.不使用goto语句
(5)下面概念中，不属于面向对象方法的是(D)
A.对象
B.继承
C.类
D.过程调用
(6)在结构化方法中，用数据流程图(DFD)作为描述工具的软件开发阶段是(B)
A.可行性分析
B.需求分析
C.详细设计
D.程序编码
(7)在软件开发中，下面任务不属于设计阶段的是(D)
A.数据结构设计
B.给出系统模块结构
C.定义模块算法
D.定义需求并建立系统模型
(8)数据库系统的核心是(B)
A.数据模型
B.数据库管理系统
C.软件工具
D.数据库
(9)下列叙述中正确的是(C)
A.数据库是一个独立的系统，不需要操作系统的支持
B.数据库设计是指设计数据库管理系统
C.数据库技术的根本目标是要解决数据共享的问题
D.数据库系统中，数据的物理结构必须与逻辑结构一致
(10)下列模式中，能够给出数据库物理存储结构与物理存取方法的是(A)
A.内模式
B.外模式
C.概念模式
D.逻辑模式
(11)算法的时间复杂度是指(C)
A.执行算法程序所需要的时间
B.算法程序的长度
C.算法执行过程中所需要的基本运算次数
D.算法程序中的指令条数
(12)算法的空间复杂度是指(D)
A.算法程序的长度
B.算法程序中的指令条数
C.算法程序所占的存储空间
D.算法执行过程中所需要的存储空间
(13)设一棵完全二叉树共有699个结点，则在该二叉树中的叶子结点数为(B)注：利用公式n=n0+n1+n2、n0=n2+1和完全二叉数的特点可求出
A.349
B.350
C.255
D.351
(14)结构化程序设计主要强调的是(B)
A.程序的规模
B.程序的易读性
C.程序的执行效率
D.程序的可移植性
(15)在软件生命周期中，能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是(D)注：即第一个阶段
A.概要设计
B.详细设计
C.可行性分析
D.需求分析
(16)数据流图用于抽象描述一个软件的逻辑模型，数据流图由一些特定的图符构成。下列图符名标识的图符不属于数据流图合法图符的是(A)
A.控制流
B.加工
C.数据存储
D.源和潭
(17)软件需求分析阶段的工作，可以分为四个方面：需求获取、需求分析、编写需求规格说明书以及(B)注：P66
A.阶段性报告
B.需求评审
C.总结
D.都不正确
(18)下述关于数据库系统的叙述中正确的是(A)
A.数据库系统减少了数据冗余
B.数据库系统避免了一切冗余
C.数据库系统中数据的一致性是指数据类型的一致
D.数据库系统比文件系统能管理更多的数据
(19)关系表中的'每一横行称为一个(A)
A.元组
B.字段
C.属性
D.码
(20)数据库设计包括两个方面的设计内容，它们是(A)
A.概念设计和逻辑设计
B.模式设计和内模式设计
C.内模式设计和物理设计
D.结构特性设计和行为特性设计
(21)下列叙述中正确的是(A)
A.线性表是线性结构
B.栈与队列是非线性结构
C.线性链表是非线性结构
D.二叉树是线性结构
(22)下列关于栈的叙述中正确的是(D)
A.在栈中只能插入数据
B.在栈中只能删除数据
C.栈是先进先出的线性表
D.栈是先进后出的线性表
(23)下列关于队列的叙述中正确的是(C)
A.在队列中只能插入数据
B.在队列中只能删除数据
C.队列是先进先出的线性表
D.队列是先进后出的线性表
(24)对建立良好的程序设计风格，下面描述正确的是(A)
A.程序应简单、清晰、可读性好
B.符号名的命名要符合语法
C.充分考虑程序的执行效率
D.程序的注释可有可无
(25)下面对对象概念描述错误的是(A)
A.任何对象都必须有继承性
B.对象是属性和方法的封装体
C.对象间的通讯靠消息传递
D.操作是对象的动态性属性
(26)下面不属于软件工程的3个要素的是(D)
A.工具
B.过程
C.方法
D.环境
(27)程序流程图(PFD)中的箭头代表的是(B)
A.数据流
B.控制流
C.调用关系
D.组成关系
(28)在数据管理技术的发展过程中，经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是(A)
A.数据库系统
B.文件系统
C.人工管理
D.数据项管理
(29)用树形结构来表示实体之间联系的模型称为(B)
A.关系模型
B.层次模型
C.网状模型
D.数据模型
(30)关系数据库管理系统能实现的专门关系运算包括(B)
A.排序、索引、统计
B.选择、投影、连接
C.关联、更新、排序
D.显示、打印、制表
★ 计算机二级vb上机题库
★ 计算机二级上机试题
★ vb试题
★ 计算机二级c语言试题
★ 计算机vb教学计划
★ 计算机二级JAVA全真模拟试题
★ vb试题及答案
★ 计算机等级考试二级VB考点：窗体的常用方法
★ 计算机二级答案
★ 计算机二级考试答案
