荷山中学二级VB笔试模拟试题
（考试时间：60分钟；满分：50分）
班级：姓名：座号：成绩：
注意事项：
一、答卷前考生务必将自己的姓名、准考证号、信息技术考试类型涂写在答题卡上。考试结束，
监考人员将试题卷和答题卡一并收回。
二、先审题后作答，答案一定要填涂在答题卡上，凡是写在试卷上的答案一律无效。
三、试卷上括弧【】内的序号与答题卡的答案序号一致，请选择正确的答案填涂在答题卡的相应位置。
四、如果要改动答案，必须先用橡皮擦净原来选定的答案，然后再重新填涂。
五、全卷均为单项选择题。
第一部分VB基础知识（【1】—【30】每项1 分，共30分）
一、变量声明采用的类型说明符中，数据类型为单精度的类型说明符是【1】。
【1】A、% B、—C、！D、#
二、用流程图（程序框图）来描述算法，根据框内的条件成立与否决定程序流向的判断框是【2】。
【2】A B C D
三、下列选项中，属于面向对象的程序设计语言是【3】。
【3】A、PASCAL语言B、Visual Basic语言C、机器语言D、汇编语言
四、逻辑表达式的值的类型为【4】。
【4】A、整型B、单精度型C、字符串型D、逻辑型
五、在VB中使用变量前，一般应该先声明变量，一条DIM语句可以定义多个变量，两个变量间应用【5】分隔。
【5】A、逗号B、冒号C、分号D、空隔符
六、VB的工程文件的扩展名为【6】。
【6】A、.frm B、vbp C、.exe D、.doc
七、下图列出了VB工具箱中常用的控件，从左边算第六个控件是【7】控件。
【7】A、Label B、TextBox C、CommandButton D、PictureBox
八、在Timer控件中，若要设置相邻两次的触发时间为0.1秒，则Interval属性的值应为【8】。【8】A、0.1 B、 1 C、10 D、100
九、VB允许一行书写多个语句，每两句之间的分隔符为【9】。
【9】A、逗号B、冒号C、分号D、空隔符
十、表达式4+5 \ 6 * 7 / 8 Mod 9 的值是【10】。
【10】A、4 B、5 C、6 D、7
十一、下列选项中，【11】是窗体载入事件过程的过程名。
【11】A、Command1_Click() B、Form_Load() C、Text1_Click() D、Timer1_Timer()
十二、利用Timer控件实现Label1在窗体上显示的内容从上往下移动，则下列代码中正确的是【12】。
【12】A、Label1.Left = Label1.Left+50 B、Label1.Left = Label1.Left-50
C、Label1.Top = Label1.Top+50
D、Label1.Top = Label1.Top-50
十三、若要把文本框Text1中的字体改为楷体，则必须修改属性【13】的设置。
【13】A、Enabled B、Font C、Locked D、Text
十四、为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，这个属性是【14】。
【14】A、V alue B、Default C、Cancel D、Enabled
十五、下列选项中，不属于文本框Text的事件的选项是【15】。
【15】A、Change B、Gotfocus C、Click D、Timer
十六、变量名的长度最多不超过【16】个字符。
【16】A、64 B、128 C、255 D、256
十七、下列各属性选项中，不是对象Label的属性的是【17】。
【17】A、Caption B、Font C、PasswordChar D、Backcolor
十八、执行语句X=Int(10*Rnd())后整数x的取值范围是【18】。
【18】A、0 ≤X ≤10 B、0 ＜X ≤10 C、0 ≤X ＜10 D、0 ＜X ＜10
十九、下列关于变量声明中，【19】不能把X，Y都声明为字符串类型。
【19】A、Dim x,y As String B、Dim x As String , y As String
C、Dim x$ , y$
D、Dim x $ , y As String
二十、VB提供了丰富的数据类型，其中单精度型要占用【20】个字节的存储空间。
【20】A、 2 B、 4 C、8 D、16
二十一、下列关于VB不同类型的运算符之间的优先次序的描述中，正确的是【21】。
【21】A、字符串运算符> 逻辑运算符> 关系运算符
B、逻辑运算符> 关系运算符> 算术运算符
C、关系运算符>算术运算符>字符串运算符
D、算术运算符>关系运算符>逻辑运算符
二十二、下列各选项中，属于合法的VB的变量名的是【22】。
【22】A、For B、3D C、Num1_2 D、Name+3
二十三、用逻辑表达式表示“x不大于15且x不小于10”，正确的是【23】。
【23】A、10 <= x <= 15 B、(10 ≤x) And (x ≤15)
C、（x ≥10）And（x ≤15）
D、(x >= 10) And (x <= 15)
二十四、下列各个函数中，函数值不可能为单精度型的是【24】。
【24】A、Abs（）B、Sqr（）C、Int（）D、Rnd（）
二十五、下列逻辑表达式中，值为TRUE的是【25】。
【25】A、”abc”>”bc” B、Int(Rnd()*3)>2
C、(1+2<=3) and (4+5>7)
D、10 Mod 3=2
二十六、控件Label的BackColor属性用于设置该对象的【26】。
【26】A、高度B、宽度C、背景色D、前景色
二十七、若要将数值类型（整数或实数）的数据在文本框中输出，则必须先用【27】函数进行类型的转换。
【27】A、Chr () B、CDbl() C、Str () D、V al()
二十八、如果在OUTPUT模式下打开一个不存在的文件，那么将【28】。
【28】A、弹出出错信息B、创建该顺序文件
C、打开默认的文件
D、打开上一次使用过的文件
二十九、用Open语句打开顺序文件操作时，不能使用的方式是【29】。
【29】A、Input B、Output C、write D、Append
三十、在VB的“菜单编辑器”中，如果某个顶层菜单项的“标题”栏设置为：新建（&N），那么可以使用【30】键打开该项菜单。
【30】A、Ctrl+N B、Alt+N C、Shift+N D、N
第二部分阅读程序，选择输出结果（【31】—【40】第项1分，共10分）三十一、已知变量a, b, c都是单精度型，执行下面程序段后变量c的值为其中的【31】。
If c > a then c = a
If c < b then c = b
【31】A、最大值B、最小值C、中间值D、平均值
三十二、程序代码如下，执行下面程序段后，变量s的值为【32】。
S = 0
For I = 1 to 10 step 2
S = S + I
Next I
【32】A、55 B、25 C、50 D、30
三十三、有如下程序代码，执行下面程序段后，变量N的值为【33】。
T = 1
N = 0
Do While T < 20
N = N + 1
T = T + 5
Loop
【33】A、 3 B、 4 C、 5 D、20
三十四、有如下程序代码，设有a=2,b=3执行下列语句
a = a + b:
b = a – b: a = a - b
后a 的值是【34】。
【34】A、-1 B、2 C、3 D、5
三十五、有程序代码如下，执行下面程序段的结果S是求表达式【35】的值。
Dim T As Integer, N As Integer
Dim S As Integer
S = 0: T = 1
For N = 1 To 9
T = - T
S = S + N * T
Next N
【35】A、1 – 2 + 3 – 4 + …- 8 + 9 B、1 – 2 + 3 – 4 + …- 8 + 9 – 10
C、– 1 + 2 – 3 + 4 + …+ 8 – 9
D、– 1 + 2 – 3 + 4 + …+ 8 – 9 + 10
三十六、程序代码如下：
s = 1
for I = 1 to 5
s = s * I
next I
执行后，变量S的值是【36】。
【36】A、5 B、15 C、32 D、120
三十七、程序代码段如上，变量I的值是【37】
【37】A、0 B、5 C、6 D、7
三十八、执行下列程序段后变量k的值是【38】。
k = 1
For I = 0 to 5
k = k * 2
Next I
【38】A、12 B、32 C、64 D、120
三十九、执行下面的程序段后，x 的值为【39】。
x = 5
For i = 1 To 20 Step 2
x = x + i \ 5
Next i
【39】A、21 B、22 C、23 D、24
四十、在窗体（Name属性为Form1）上有两个文本框（其Name属性分别为Text1和Text2）。
和一个命令按钮（Name属性为command1），两个事件过程如下：
Private Sub Form_load()
Text1.Text = ””
Text2.Text = ””
End Sub
Private Sub Command1_Click()
a = Text1.Text + Text2.text
Print a
End Sub
运行程序后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入123和321，然后单击命令按钮，则输出结果为【40】。
【40】A、444 B、321123 C、123321 D、132231
第三部分补充完整程序代码（【41】—【50】第项1分，共10分）
四十一、下列程序代码求：S = n * (n - 1) * ( n - 2) * ……* 3 * 2 * 1 的值，(n值从文本框Txtnum 中输入)请选出正确的内容将程序补充完整。
[程序如下]
Private Sub Form_Click()
Dim s As Single, i As Integer, n as Integer
n = Txtnum.text
s=【41】
For i=1 To n
s=【42】
Next i
Form1.Print s
【41】A、0 B、1 C、2 D、n
【42】A、i B、s * (1 / i) C、s + i D、s *i
四十二、下列程序是从文本框（Txtnum1）中输入一个以秒为单位的时间，将它转化为* 小时* 分钟*秒的形式，并在文本框Txtnum2中显示出来。请选出正确的内容将程序补充完整。[程序如下] Private Sub Command1_Click()
Dim n%, hour1%, minute1%, second1%
n = Txtnum.Text
hour1 = n \ 3600
minute1 = (n Mod 3600) \ 60
second1 =【43】
Txtnum2 = 【44】
End Sub
【43】A、n \ 3600 B、n /60 C、n \ 60 D、n Mod 60
【44】A、hour1 小时minute 分钟second 秒
B、hour1 ”小时” & minute ”分钟” second ”秒”
C、hour1 & 小时& minute & 分钟& second & 秒
D、hour1 & ”小时” & minute & ”分钟” & second & ”秒”
四十三、下列程序从文本框（Text1）中输入一个角度，在标签（Lable1）控件上输出它所在的象限值。
请选出正确的内容将程序补充完整。[程序代码如下]
Private Sub Form_Click()
’输入一个角度，确定角度所在的象限
Dim angle As Long , tangle&, c As String, m As Integer
angle = V al(Text1.text)
If angle >= 0 Then
tangle = angle Mod 360
Else
tangle = (-angle) Mod 360
tangle = 360 - tangle
End If
m = 【45】
Selcet Case m
Case 0
c = ”第一象限角”
Case 1
c = ”第二象限角”
Case 2
c = ”第三象限角”
Case Else
c = ”第四象限角”
End Select
【46】
【45】A、tangle / 90 B、tangle Mod 90 C、tangle \ 90 D、tangle
【46】A、Label1.Caption = c B、Lblnum2.Caption = c C、Print c D、Text1.text = c
四十四、下列程序求出所有的水仙花数，并列出在ListBox中，（所谓水仙花数是指一个三位数，它的三位数字的立方和等于该数的本身，请选出正确的内容将程序补充完整。[程序代码如下] Private Sub Command1_Click()
Dim i , n1 , n2, n3 As Integer
For i = 100 To 999
n1 = i / 100
n2 = (i Mod 100) / 10
n3 = i Mod 10
If i = n1^3 + n2^3 + n3^3 Then【47】
Next 【48】
End Sub
【47】A、AddItem i B、AddItem r C、List1.AddItem i D、List1.AddItem r
【48】A、s B、r C、i D、i + 1
四十四、从文本框Text1和Text2中分别输入M、N两个数，执行下列程序后，求A的值。
dim m%,n%
m=val(Text1.text)
n=val(Text2.text)
if m>n then t=m：m=n：n=t
a=0
for i=m to n
if (i mod 2=0) and (i mod3=2) then a=i
next I
Text3.text =cstr(a)
End sub
Text1和Text2中分别输入5，15则运行完后A的值为【49】
Text1和Text2中分别输入1，5则运行完后A的值为【50】
【49】A、0 B、8 C、14 D、15
【50】A、0 B、2 C、 4 D、5
第七章理论复习题1、阅读下列程序： Private Sub Form_Click() Dim m As Integer Static n As Integer For i = 1 To 3 n = n + i m = m + i ^ 2 Next Print m, n End Sub 运行时两次单击窗体结果为（）。 A、14 6 14 6 B、14 6 14 12 C、14 6 28 6 D、14 6 28 12 2、窗体上的命令按钮编写如下事件过程：Private Sub Command1_Click() Dim array1(10, 10) As Integer Dim i, j As Integer For i = 2 To 4 For j = 3 To 5 array1(i, j) = i * j Next j Next i Print array1(2, 4) + array1(3, 4) End Sub 运行时，单击命令按钮后输出的结果是（）。 A、9 B、13 C、程序出错 D、20 5、以下数组声明语句中数组a包含的元素个数为（）。Dim a(3,-2 to 1,5) A、96 B、75 C、60 D、13 6、有声明Dim a(-3 to 1,3) As Integer，则下列叙述中正确的是（）。 A、数组a是二维动态数组 B、数组a共有20个元素 C、a（0,0）不是该数组的元素 D、a（1,1）是该数组的第十个元素 7、下列叙述中错误的是（）。 A、控件数组的每一个元素共享同样的事件过程 B、控件数组的每一个元素都有与之相关联的下标值 C、控件数组的每一个元素都有不同的name属性作为标识 D、可在运行过程中删除控件数组的某个元素 8、能使一维数组arr(6)元素个数加1，但保留数组中原有元素的语句是（）。 A、R eDim arr(7) B、R eDim Preserve arr(7)
2009年9月全国计算机等级考试二级VB笔试试题及答案 一、选择题（每小题2分，共70分） 一、选择题 1．下列数据结构中，属于非线性结构的是（）。 A. 循环队列 B.带链队列 C.二叉树 D.带链栈 答案C Array解析树均是非线性结构 2. 下列数据结构中,能够按照”先进后出”原则存取数据的是（）。 A. 循环队列 B.栈 C.队列 D.二叉树 答案B 解析:栈是先进后出或后进先出的线性表 3. 对于循环队列,下列叙述中正确的是（）。 A.队头指针是固定不变的 B.队头指针一定大于队尾指针 C.队头指针一定小于队尾指针 D.队头指针可以大于队尾指针，也可以小于队尾指针 答案D 解析:如果队头指针大于队尾指针说明队列已经循环存放数据了,如果队头指针小于队尾指针说明没有进行循环存放 4. 算法的空间复杂度是指（）。 A.算法在执行过程中所需要的计算机存储空间 B.算法所处理的数据量
C.算法程序中的语句或指令条数 D.算法在执行过程中所需要的临时工作单元数 答案A 解析:算法的空间复杂度是指执行算法所需要的内存空间,包括算法程序所占空间,输入的初始数据所占空间和执行过程中所需要的额外空间. 5. 软件设计中划分模块的一个准则是（）。 A. 低内聚低耦合 B. 高内聚低耦合 C. 低内聚高耦合 D. 高内聚高耦合 答案B 解析:模块内部各元素之间的联系要紧密,高内聚,模块间的连接的紧密程度要低,低耦合,这样可以提高模块的独立性. 6.下列选项中不属于结构化程序设计原则的是（）。 A.可封装 B.自顶向下 C.模块化 D.逐步求精 答案A 7.软件详细设计产生的图如下 该图是( ). A.N-S图 B. PAD图 C. 程序流程图 D.E-R图 答案C 8.数据库管理系统是（）。
一、概念填空题 1．在Visaul Basic中,属性窗口分为四个部分，这四个部分分别是（ 1 ）属性显示方式、属性列表和对当前属性的简单解释。 2．组合框有三种不同的风格，它们分别是：( 2 )、( 3 )和( 4 )。3．VB中，当KeyPress事件发生时会返回一个按键的（ 5 ）值。 4. 时钟控件是有规律地以一定的( 6 )激发计时器事件，而执行相应的代码程序。 5．A = 8，B = 3，C = 5，则表达式A MOD 3 + B^3 / C \ 5的值为（ 7 ）。6．声明一个双精度变量Num5，的声明语句是 ( 8 ) 。 7．有一文本框Text1，为了使该文本框在运行时获取焦点，应执行的语句是（ 9 ）。8．在使用动态数组时，如要改变数组的大小而又不丢失数组中的数据，应使用（ 10 ）关键字。 9．Visual Basic逻辑数据类型只有 True 与 False 两个值。当逻辑数据转换成整型数据时，True 转换为（ 11 ），False转换为（ 12 ）。 10．在Visaul Basic 中依据变量的作用范围将VB变量的作用范围分为三类，它们是：（ 13 ）变量、（ 14 ）变量和（ 15 ）变量。 11．在Visual Basic工程中，拥有多个窗体的程序可用（ 16 ）语句将窗体装入内存，用（ 17 ）语句将指定窗体从内存中删除。 12．在Visual Basic中，当坐标系确定后，如果坐标值前加上关键字Step，则坐标值（X，Y）是（ 18 ）坐标。 13．字符串常量是由任何ASCII字符组成，在程序代码中，它必须由（ 19 ）括起来。 14．如果有三个单选按钮直接画在窗体上，另有四个单选按钮画在框架中，则运行时，可以同时选中（ 20 ）个单选按钮。 二、概念选择题 1．不能触发滚动条Change事件的操作是（）。 A) 拖动滚动条的滑块 B) 单击两端箭头 C) 单击滚动条的滑块 D) 单击滚动条的空白处 2．已知变量x 、y为整数型，且x=4 , y=12 ,s为字符型，且s=“a”，Leble1为标签控件，Leble1的Caption属性值为Label1，下列合法的赋值语句是（）。 A) X= Leble1.Caption B) Leble1.Caption=Str(X) C) X*3=Y D) Y=X*S 3．下列可以将变量A、B的值互换的语句是( )。 A) A=B : B=A B) C=B : B=A ：A=C C) A=C : C=B : B=A D) A=(A+B)/2 ：B=(A-B)/2 4．下列叙述中错误的是（）。 A)VB是采用了事件驱动编程机制。
Private Sub Command1_Click() Dim n As Integer, i As Integer, s As Double n = Val(Text1.Text) s = 0 For i = 1 To n s = s + i ^ 2 Next i Text2.Text = s End Sub Private Sub Command1_Click() ''' 不得删除本行注释 Dim i As Integer Open App.Path & "\" & "yssj.txt" For Input As #1 For i = 1 To 10 Input #1, a(i) Next i Close #1 End Sub Private Sub Command2_Click() ''' 不得删除本行注释 Dim i As Integer Text1.Text = "" For i = 1 To 10 If a(i) Mod 3 = 2 Then Text1.Text = Text1.Text & Str(a(i)) End If
Next i End Sub
Private Sub command1_Click() '''不得删除本行注释 Dim a As Integer, b As Double, i As Integer, n As Integer n = Val(Text1.Text) a = 0 b = 0 For i = 1 To n a = a + i b = b + a Next i Text2.Text = b End Sub Private Sub Command1_Click() '''不得删除本行注释 Dim i%, xh$, xm$ Open App.Path & "\" & "Xhxm.txt" For Output As #1 For i = 1 To 3 xh = InputBox("请输入学号") xm = InputBox("请输入姓名") Write #1, xh, xm Next i Close #1 End Sub Private Sub Command2_Click() '''不得删除本行注释 Dim s as string Open App.Path & "\" & "Xhxm.txt" For Input As #2 Do While Not EOF(2) Line Input #2, s Text1.Text = Text1.Text & s & vbCrLf Loop Close #2 End Sub
VB考试一 1、能够获得一个文本框中被选取文本的内容的属性是______。 A：SelStart B：SelLength C：SelText D：Text 参考答案：C 2、在窗体上画一个文本框，其名称为Text1，为了在程序运行后隐藏该文本框，应当使用的语句为：______。 A：Text1.Enabled = False B：Text1.Hide C：Text1.Clear D：Text1.Visible = False 参考答案：D 3、对于语句If x=1 Then y=1, 下列说法正确的是____。 A：x=1和y=1 均为赋值语句 B：x=1和y=1 均为关系表达式 C：x=1为赋值语句，y=1为关系表达式 D：x=1为关系表达式，y=1 为赋值语句 参考答案：D 4、以下变量名中，______是不符合Visual Basic的命名规范的。 A：_mnu_Open_234 B：Abc901 C：price_ D：K 参考答案：A 5、MsgBox 函数返回值的类型是__________。 A：数值或字符串 B：字符串C：变体D：整型数值 参考答案：D 6、VB一共有设计、运行和中断三种模式，要使用调试工具应该______。 A：进入中断模式B：进入运行模式 C：进入设计模式D：不用进入任何模式 参考答案：A 7、设a=6，则执行 x=IIF(a>5,-1,0) 后，x的值为______。 A：-1 B：6 C：0 D：5 参考答案：A 8、可以同时删除字符前导和尾部空白的函数是______。 A：Mid B：Rtrim C：Trim D：Ltrim 参考答案：C 9、以下语句的输出结果是______。 Print Format$("32548.5","000,000.00")
一、单选题（本大题共25题，每题2分，共50分） 1、不属于VB三种工作模式的是（）。 A.设计模式 B.运行模式 C.调试模式 D.中断模式 2、窗体的前景颜色由（）属性设置。 A.BorderStyle B.BackColor C.ForeColor D.FillStyle 3、当窗体被启动时，（）事件将会发生。 A.Load B.Unload C.QueryUnoad D.CLs 4、每个窗体对应一个窗体文件，窗体文件的扩展名是（）。 A..bas B.cls C.frm D.vbp 5、可用来清除窗体内容的方法是（）。 A.Print B.InputBox C.Cls D.Clear 6、下列语句有语法错误的是（）。 A.a＝5 B.b＝a C.b=“a” D.5=a 7、表达式1＋((2＋3)*2)*2的值是（）。 A.26 B.22 C.21 D.24 8、产生大于等于10且小于20的随机整数的表达式为（）。 A.Int(Rnd(10)＋10) B.Int(Rnd*10+10) C.Int(Rnd*10+11) D.Int(Rnd*20-10) 9、求字符串长度的函数是（）。 A.Len B.long C.Length D.Val 10、若要使定时器暂停，应将其（）属性设置值设为False。 A.Interval B.Value C.Text D.Enabled 11、下列可作为Visual Basic的变量名的是（）。 A.Abt B.TA C.IF D.A[B]T 12、VB中可用（）语句产生一消息框。 A. InputBox B.Shift C. Both D.MsgBox 13、以下程序段的输出结果是（） Print Format(12345.6,"0.00E+00") A.1.23E+04 B.1.23E+4 C.1.23456E+04 D.1.23456E+4 14、执行下面的语句后，所产生的信息框的标题是（）。 a = MsgBox("AAAA", "BBBB", "", 5) A.BBBB B.空 C.AAAA D.出错，不能产生信息框 15、以下程序段的输出结果是（）。 Print 1;2; Print 3 A.1 2 3 B.1 23 C.123 D.12 3 16、下列关于Do While …Loop和Do…Loop Until循环执行循环次数的描述正确的是（）。 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循环至少执行一次 17、默认条件下，语句Dim a(3,4,5)定义的数组中所包含的数组元素的个数是（）。 A. 12 B.60 C.120 D.345 18、数学关系3≤x<10对应的Visual Basic表达式是（）。
2007年秋季vb考试真题 1．下面关于比特的叙述中，错误的是( 1 ) A．比特是组成数字信息的最小单位 B．比特只有“0”和“1”两个符号 C．比特既可以表示数值和文字，也可以表示图像和声音 D. 比特”1”总是大于比特“0” 2．在下列有关集成电路的叙述中，错误的是( 2 ) A．现代集成电路使用的半导体材料主要是硅 B．大觑模集成电路一般以功能部件、子系统为集成对象 C．我国第2代居民身份证中包含有IC芯片 D? 目前超大规模集成电路中晶体管的基本线条已小到l纳米左右 3．在下列有关通信技术的叙述中，错误的是( 3 ) A.通信的基本任务是传递信息，因而至少需由信源、信宿和信道组成 B.通信可分为模拟通信和数字通信，计算机网络属于模拟通信 C.在通信系统中，采用多路复用技术的目的主要是提高传输线路的利用率 D?学校的计算机机房一般采用5类无屏蔽双绞线作为局域网的传输介质 4.下面是关于PC机主存储器的一些叙述，其中正确的是( 4 ) A.主存储器是一种动态随机存取存储器(RAM) B.主存储器的基本编址单位是字(即32个二进位) C.目前市场上销售的PC机，其内存容量可达数十GB D.所有PC机的内存条都是通用的：可以互换 5．现行PC机中，IDE(或SATA)接口标准主要用于( 5 ) A．打印机与主机的连接C．声卡与主机的连接 B．显示器与主机的连接D．硬盘与主机的连接 6. 下列有关PC机的CPU、内存和主板的叙述中，正确的是( 6 ) 。 A．大多数Pc机只存一块CPu芯片，即使是“双核”CPU也是一块芯片 B．所有Pentium系列微机的内存条相同，仅有速度和容量大小之分 C．主板上芯片组的作用是提供存储器控制功能，I/O控制与芯片组无关 D．主板上CMOS芯片用于存储CMOS设置程序和一些软硬件设置信息 7.下列有关目前Pc机辅助存储器的叙述中，错误的是( 7 ) A．硬盘的容量越来越大，这是因为硬盘中磁盘碟片的数目越来越多 B．硬盘的内部传输速率一般小于外部传输速率 c．优盘采用Flash存储器技术，属于半导体存储器 D．目前常见COMBO光驱是一种将CD-RW和DVD-ROM组合在一起的光驱 8.下面有关Windows操作系统，(95以后版本)的叙述中，错误的是( 8 ) 。A．Windows操作系统支持系统中多个任务的并发执行 B．利用Whldows附件“系统工具”中的“系统信息”可以查看内存的工作情况 C．系统规定文件名最多由128个字符组成 D．Vista是Microsoft公司推出的Windows XP操作系统的后继版本 9.算法设计是编写程序的基础。下列关于算法的叙述中，正确的是( 9 ) 。 A．算法必须产生正确的结果C．算法可以没有输出 B．算法必须具有确定性D．算法的表示必须使计算机能理解 10．因特网使用TCP／IP协议实现全球范围的计算机网络互连，连接在因特网上的每一台主机
站长提醒广大考生：下面的138道题目，在二级考试中命中率极高。 一、选择题 (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) 注：P55-58 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) 注：P108
要向C盘根目录下的名为my.txt的顺序文件中读出数据，应先使用_________语句打开文件。 复选框对象如果被选中，它的Value值为____________ 。 下列可作为Visual Basic 变量名的是____________。 以下能判断是否到达文件尾的函数是__________ 如果在实验课上进行程序调试，运行时遇到意外出错，最有效的做法是：看清系统错误原因提示信息，____________，以确定错误原因。 要想从子过程调用后返回两个结果，下面子过程语句说明合法的是 ____________ 。 在用通用对话框控件建立打开文件对话框时，在文件列表框中只允许显示txt和rtf类型的文件，则Filter属性的正确设置是_________。 在程序运行期间可以用____________函数把图形装入窗体、图片框或图像框。列表框List1中已有10个列表项，要显示列表框List1最后一项，有两种表示法， __________是正确的。 在默认情况下定义了10个元素的数组a，用变量n表示它的上界，有两种赋值语句，______________是正确的。 为了使控件对象不响应用户的事件，需要____________。 假定焦点已经位于文本框Text1中，则能够触发 KeyPress 事件的操作是 ____________。 设变量x = 1，y = -1，a = 5，b = -5，则以下表达式的值为“真”的是____________。单击滚动条控件的箭头按钮，滑块的移动幅度与_______________属性设置有关。在自定义函数中，可以通过____________返回值。 程序填空 单击窗体执行将所输入的整数插入排序后的原数组元素适当位置。 Function Insert(s(), ByVal key As Integer) As Integer Dim k%, i%, j% k = ___(1)_____ For i = 0 To UBound(s)
计算机二级VB考试题及答案计算机二级VB考试题及答案 计算机二级VB考试题及答案 1.在窗体上画一个名称为Text1的文本框，一个名称为Command1的命令按钮，然后编写如下事件过程和通用过程： PrivateSubCommand1_Click() n=Val(Text1.Text) Ifn2=n/2Then f=f1(n) Else f=f2(n) EndIf Printf;n EndSub PublicFunctionf1(ByRefx) x=x*x f1=x+x EndFunction PublicFunctionf2(ByValx) x=x*x
f2=x+x+x EndFunction 程序运行后，在文本框中输入3，然后单击命令按钮，窗体上显示的是(D)(单) A.7236 B.10836 C.726 D.273 2.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： PrivateSubCommand1_Click() c="1234" Fori=1To4 c1=Trim(Str()) Printc1 Nexti EndSub 程序运行后，单击命令按钮，要求在窗体上显示如下内容 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的文本框，然后编写如下事件过程： PrivateSubCommand1_Click() n=Val(Text1.Text) Fori=2Ton Forj=2Tosqr(i) IfiModj=0ThenExitFor Nextj Ifj>Sqr(i)ThenPrinti Nexti EndSub 该事件过程的功能是(C)(单) A.输出n以内的奇数 B.输出n以内的偶数 C.输出n以内的素数 D.输出n以内能被j整除的数 4.在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程： PrivateFunctionf(mAsInteger)
VB模拟试题 一、选择题（15分，每题1分） 1、VB集成开发环境共有三种模式，以下 __________ 三种模式是正确？ (A) 设计、运行、退出 (B)运行、中断、退出 (C) 设计、运行、中断 (D)运行、中断、结束 2、以下叙述中错误的是__________ (A) 事件过程是响应特定事件的一段程序 (B) 不同的对象可以具有相同名称的方法 (C) 对象的方法是执行指定操作的过程 (D) 对象事件的名称可以由编程者指定 3、如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是 __________ (A) 如果工程中含有Sub Main过程，则程序一定首先执行该过程 (B) 不能把含有Sub Main过程的标准模块设置为启动模块 (C) 用Hide方法只是隐藏一个窗体，不能从内存中清除该窗体 (D) 任何时刻最多只有一个窗体是活动窗体 4、下列说法哪种正确？每次调用过程时，__________ (A) Dim声明的变量可保持原值；Static声明的变量会重新初始化。 (B) Static声明的变量可保持原值；Dim声明的变量会重新初始化。 (C) Dim、Static声明的变量都可以保持原来的值。 (D) Dim、Static声明的变量都会重新初始化。 5、表达式 5 Mod 3+3\5*2的值是__________ (A) 0 (B) 2 (C) 4 (D) 6 6、从字符串N的第5个字符开始，获取4个字符，应使用 _________。 (A) Len(N,5,4) (B) Mid(N,5,4) (C) Right(N,5,4) (D) Rtrim(N,5,4) 7、InputBox函数返回值的类型为 _________。 (A) 数值 (B) 字符串 (C) 变体 (D) 数值或字符串（视输入的数据而定） 8、语句Dim A(3, -2 to 2, 5)声明的数组A包含_________个数组元素。 (A) 120 (B) 75 (C) 60 (D) 13
2013年3月全国计算机等级考试二级VB上机题库题干 —1—
第六十一套题干61 一、基本操作题 请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个名称为C1、标题为"改变颜色"的命令按钮，窗体标题为"改变窗体背景色"。编写程序，使得单击命令按钮时，将窗体的背景颜色改为红色(&HFF&)。运行程序后的窗体如图1所示。 要求：程序中不得使用变量，每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。 图1 (2)在名称为Form1的窗体上画一个名称Shape1的形状控件，在属性窗口中将其设置为圆形。画一个名称为List1的列表框，并在属性窗口中设置列表项的值分别为1、2、3、4、5。将窗体的标题设为"图形控件"。单击列表框中的某一项，则将所选的值作为形状控件的填充参数。例如，选择3，则形状控件中被竖线填充。如图2所示。 要求：程序中不得使用变量，每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。 图2 二、简单应用题 (1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是通过键盘向文本框中输入正整数。在"除数"框架中选择一个单选按钮，然后单击"处理数据"按钮，将大于文本框中的正整数且能够被所选除数整除的5个数添加到列表框List1中，如图3所示。在窗体文件中已经给出了全部控件，但程序不完整。 要求：请去掉程序中的注释符，把程序中的？改为正确的内容，使其实现上述功能，但不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 图3 (2)在考生文件夹下有一个工程文件sjt4.vbp。程序运行后，单击"开始"按钮，图片自上而下移动，同时滚动条的滑块随之移动，每0.5秒移动一次。当图片顶端移动到距窗体的下边界的距离少于200时，再回到窗体顶部，重新向下移动，如图4所示。在窗体文件中已经给出了全部控件，但程序不完整。 要求：请去掉程序中的注释符，把程序中的？改为正确的内容，使其实现上述功能，但不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 图4 三、综合操作题 在考生文件夹下有一个工程文件sjt5.vbp，窗体如图5所示。运行程序时，从数据文件中读取学生的成绩(均为整数)。要求编写程序，统计总人数，并统计不及格、60～69、70～79、80～89及90～100各分数段的人数，将统计结 果显示在相应的文本框中。结束程序之前，必须单击"保存"按钮，保存统计结果。 注意：不能修改程序的其他部分和控件属性。程序调试通过后，运行程序，将统计结果显示在文本框中，再按"保存"按钮保存数据，否则无成绩。最后把修改后的文件按原文件名存盘。 图5 第六十二套题干62 一、基本操作题 请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个名称为C1、标题为"变宽"的命令按钮，窗体名称为"改变按钮大小"。编写程序，使得单击命令按钮时，命令按钮水平方向的宽度增加100。程序运行后的窗体如图1所示。 要求：程序中不得使用变量，每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。 图1 (2)在名称为Form1的窗体上画一个名称Shape1的形状控件，画一个名称为L1的列表框，并在属性窗口中设置列表项的值为1、2、3、4、5。将窗体的标题设为"图形控件"。单击列表框中的某一项，则按照所选的值改变形状控件的形状。例如，选择3，则形状控件被设为圆形，如图2所示。 要求：程序中不得使用变量，每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。 图2 二、简单应用题 (1)在考生文件夹中有一个工程文件sjt3.vbp，窗体控件布局如图3(a)所示。程序运行时，在文本框Text1中输入一个正整数，选择"奇数和"或"偶数和"，则在Label2中显示所选的计算类别。单击"计算"按钮时，将按照选定的"计算类别"计算小于或等于输入数据的奇数和或偶数和，并将计算结果显示在Label3中。程序的一次运行结果如图3(b)所示。在窗体文件中已经给出了全部控件，但程序不完整。 要求：请去掉程序中的注释符，把程序中的？改为正确的内容，使其实现上述功能，但不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 (a) (b) 图3 (2)在考生文件夹下有一个工程文件sjt4.vbp。程序运行后，如果单击"开始"按钮，则图片自左向右移动，同时滚动条的滑块随之移动，每0.5秒移动一次。当图片完全移出窗体的右边界时，立即再从窗体的左边界开始重新移动，若单击"停止"按钮，则图片停止移动，如图4所示。在窗体文件中已经给出了全部控件，但程序不完整。 要求：请去掉程序中的注释符，把程序中的？改为正确的内容，使其实现上述功能，但不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 —2—
一、单选题（30分，每小题1分） 1、（C ）字节称为一个MB。 （A）1024 （B）1000K （C）1024*1024 （D）10000K 2、计算机硬件系统的五大部件是（A ）。 （A）CPU、内存储器、输入设备、输出设备、外存储器 （B）运算器、控制器、存储器、输出设备、输入设备 （C）CPU、总线、存储器、外设、主板 （D）主机箱、显示器、音箱、鼠标、键盘 3、常用的输入设备有（A ）。 （A）键盘、鼠标、扫描仪（B）显示器、键盘、鼠标 （C）打印机、扫描仪、键盘（D）触摸屏、打印机、鼠标 4、计算机网络的主要作用是( D )。 (A) 数据处理(B) 信息传输与数据处理 (C) 文献查询(D) 资源共享与信息传输 5、二进制数1010等于十六进制数( C )。 (A) 10 (B) 11 (C) A (D) B 6、在VB中要强制显式声明变量，可在窗体模块或标准模块的声明段中加入语句( B )。 (A) Option Base 0 (B) Option Explicit (C) Option Base 1 (D) Option Compare 7、下列程序段的执行结果为( D )。 J1 = 10 J2 = 30 If J1 < J2 Then Print J2; Print J1 (A)10 (B)30 (C)10 30 (D)30 10 8、假设变量x1是一个布尔型(逻辑型)的变量，则下面正确的赋值语句是（C ） (A) x1="False" (B) x1='False' (C) x1=False (D) x1=#False# 9、在运行阶段，要在文本框Text1获得焦点时选中文本框中所有内容，对应的事件过程是（B ）。 (A) Private Sub Text1_LostFocus() Text1.SelStart=0 Text1.SelLength=Len(Text1.text) End Sub (B) Private Sub Text1_GotFocus() Text1.SelStart=0 Text1.SelLength=Len(Text1.text) End Sub (C) Private Sub Text1_SetFocus() Text1.SelStart=0 Text1.SelLength=Len(Text1.Text) End Sub (D) Private Sub Text1_Change() Text1.SelStart=0 Text1.SelLength=Len(Text1.Text) End Sub
⑴不得增、删窗体上的控件，不得改变窗懺和控件的名執 ⑵不得删改两行' “之间90代码左 ⑶ 不得删改模藝Jb鬧中的代码； ⑷编程后’需运行理序，并在运行后关闭程序窗口。 1、打开芳生文件夹下工程文件Qpfh.vtp潘加适当的事件过程代码'买现以下功鉉 在上边文本框中输入正整数W的值*单击"计算”‘按钮.则在下边文本框中显示平疔和S的值H S = *片2彳十…十矿 Private Sub Comma nd1_Click() Dim n As Integer, i As Integer, s As Double n = Val(Text1.Text) s = 0 For i = 1 To n s = s + i A 2 Next i Text2.Text = s End Sub 2.打开着生文件夹下工程文件Qtds.vhp,祈加适当的雪件过程代码，实现以下功能* 单击“逮数据”按钮，读入考生交件表下的泸町 E 丈件中的10个整数，存入吕数组中：单主*特定值”披迅求出敢组中所有被？除后余2的数，并昱示在文朮框中. Private Sub Comma nd1_Click() '''不得删除本行注释 Dim i As In teger Ope n App.Path & "\" & "yssj.txt" For In put As #1 Fori = 1 To 10 In put #1, a(i) Next i Close #1 End Sub Private Sub Comma nd2_Click() '''不得删除本行注释 Dim i As In teger Text1.Text ="" Fori = 1 To 10 If a(i) Mod 3 = 2 The n Text1.Text = Text1.Text & Str(a(i)) End If Next i End Sub
1.设计一个如图所示的成绩录入程序。要求利用文本框的lost focus事件检查录入的成 绩是否有效。如果录入的成绩介于0~100之间则可以继续输入，否则清除原数据，并且要求重新输入。底部的5个复选框用来设置参加合计的课程成绩。 2.设计一个用户界面如图所示，用于将学生学习的课程在列表框中显示出来，要求程序 有以下功能： a)单击“添加”按钮，若文本框“Text1.text”中不是空格串，并且在列表中也没 有，则将课程添加到列表框中去。 b)单击“删除”按钮，删除列表框中被选中的并显示在文本框中的课程名称。 c)单击“统计”按钮，统计课程列表框中的课程数量，并显示在文本框“Text2.text” 中。 d)单击“结束”按钮，结束程序运行。 3.设计一个偶数迁移程序，运行界面如图所示。要求如下： a.单击“产生”按钮，随机产生10个两位正整数，并添加到左边的列表框(list1)中。 b.单击“→”按钮，或双击list1,将list1中的所有偶数迁移到list2中。 c.单击“清除”按钮，清除list1和list2中所有的项目。
4. 设计如图所示窗体form1,在窗体上画一个名称为lst的列表框，通过属性窗口向列表框添加“中国”、“日本”、“新加坡”、“澳大利亚”、“美国”五个项目；在列表框右侧上方画一个名称为text1的文本框，并使其内容空白；在文本框下方画两个名称分别为c1和c2、标题分别为“修改”和“添加”的命令按扭。程序运行时要求：单击“修改”按钮时文本框text1中显示列表框中选中项目内容，同时列表框移除该项；单击“添加”按钮时，将文本框修改后的内容添加在列表框中列表的末尾。保存窗体文件xg.frm,工程文件为xg.vbp. 5. 设计如图所示窗体form1,在窗体左边画两个名称为t1、t2的文本框，文本框内显示空白；在窗体右下方画一个名称为c1的命令按扭，按扭的标题为“复制”。编写适当的事件过程，使得在运行时，选定t1中任意文本后，单击命令按扭c1,文本框t2中显示t1中所选定的文本。
全国高等学校（安徽考区） 计算机水平考试试卷B （二级 Visual Basic 语言） 一、单项选择题（每题1分，共40分） 1．计算机硬件系统中最核心的部件是 C 。 A）内存储器B）输入/输出设备C）CPU D）硬盘 2．计算机最早的应用领域是 A 。 A）科学计算B）图形处理C）过程控制D）人工智能3．下列属于文字处理软件的是 B 。 A）Windows B）Word C）PowerPoint D）Excel 4．在计算机系统内部，所有数据都是采用 D 表示。 A）十六进制B）十进制C）八进制D）二进制5．在Windows系统中，下面文件命名合法的是 B 。 A）A*.DOC B）AB.DOC C）A?.DOC D）A>.DOC 6．计算机可以播放DVD等音像制品, 主要运用的是 A 技术。 A）多媒体B）人工智能C）数据库D）数据挖掘7．将文件从FTP服务器传输到本地计算机的过程称为 D 。 A）上传B）浏览C）查找D）下载 8．下列IP地址中，错误的是 C 。 A）219.231.10.155 B）192.168.5.1 C）219.260.20.12 D）192.10.6.7 9．下列关于计算机病毒的叙述中，正确的是 C 。 A）加密文件不会感染计算机病毒 B）系统软件不会感染计算机病毒 C）有防火墙的计算机系统也会感染病毒 D）压缩的文件不会感染计算机病毒 10．计算机能直接运行的是 B 。 A）目标程序 B）机器语言程序C）汇编语言程序 D）高级语言程序 11．下列选项中是Visual Basic的合法变量名的是 C。 A）1_abc B）abc-1 C）abc_1 D）abc.1 12．对正整数X、Y，有下列表达式，不能判断X能被Y整除的是 C 。 A）X/Y=Int(X/Y) B）X Mod Y =0 C）X\Y=Fix(X/Y) D）X\Y=X/Y 13．下面可以正确定义2个整形变量和一个字符型变量的语句是 B 。 A）Dim x, y As Integer, n As String B) Dim x%, y As Integer, n As String C) Dim x%, y$, n As String D) Dim x As Integer, y, n As String 14．下面表达式中， A 的运算结果与其他三个不同。 A）Exp(-3.5) B）Int(-3.5)+0.5 C）-Abs(-3.5) D）Sgn(-3.5)-2.5 15．将任意一个正的两位整数N的个位数与十位数对换的表达式为 A 。 A）（N-Int(N/10)*10）*10+Int(N/10) B）N-Int(N)/10*10+Int(N)/10 C）Int(N/10)+(N-Int(N/10)) D）(N-Int(N/10))*10+Int(N/10) 16．执行语句s = Mid("VisualBasic",1,6)后，s的值是 A 。 A) Visual B) Basic C) 6 D) 11 17．表达式5 Mod 3+3\5*2的值是 B 。
一．选择题 1．窗体上有多个控件，在Form_Activate()事件过程中添加____ B______语句，就可确保每次运行程序时，都将光标定位在文本框Text1上。 A．Text1．Text="" B．Text1．SetFocus C．Form1．SetFocus D．Text1．Visible=True 2．语句Print "5*20"输出的结果是______C___。 A．"5*20" B．出现错误信息 C．5*20 D．100 3．不能打开代码窗口的操作是______B__。 A．双击窗体设计器的任何地方 B．按下F4键 C．单击工程窗口中的“查看代码”按钮 D．选择“视图”下拉菜单中的“代码窗口” 4．在VB中可以作为容器的是______B__。 A．Form、TextBox、PictureBox B．Form、PictureBox、Frame C．Form、TextBox、Label D．PictureBox、TextBox、ListBox 5．能被对象所识别的动作与对象可执行的活动分别称为对象的___D_____。 A．方法、事件B．过程、方法 C．事件、属性D．事件、方法 6．计算下面的表达式，其值是_____B___。 CInt(4.5) * Fix(-3.81) + Int(4.1) * (5 Mod 3) A．-7 B．-4 C．-8 D．6 7．以下有关对象属性的说法中正确的是___D_____。 A．对象所有的属性都罗列在属性窗口列表中 B．不同对象不可能有同名属性 C．不同对象的同名属性取值一定相同 D．对象的某些属性既可在属性窗口中设置，也可通过程序代码设置或改变 8．要使定时器控件可以使用，需设置的属性是____B_____。 A.Interval B. Enabled C. Value D. Text 9．在某过程中已说明变量a为Integer类型、变量s为String类型，过程中的以下四组语句中，不能正常执行的是 ___D_____。 A．s=2*a+1 B．s="237" & ".11":a=s C．s=2*a>3 D．a=2:s=16400*a 10．在程序代码中，将图片文件“abc.jpg”装入图片框Picture1的语句是_____C___。 A．Picture1.Picture = "abc.jpg" B．Picture1.image = "abc.jpg " C．Picture1.Picture = LoadPicture("abc.jpg") D．LoadPicture("abc.jpg") 11．多窗体程序由多个窗体组成。在缺省情况下，VB在执行应用程序时，总是把_______B__指定为启动窗体。 A．不包含任何控件的窗体 B．设计时的第一个窗体