计算机二级VB真考选择题题库4Word格式文档下载.docx
《计算机二级VB真考选择题题库4Word格式文档下载.docx》由会员分享，可在线阅读，更多相关《计算机二级VB真考选择题题库4Word格式文档下载.docx（15页珍藏版）》请在冰豆网上搜索。
该图是（C）
A）N—S图
B）PAD图
C）程序流程图
D）E—R图
8.数据库管理系统是（B）。
A）操作系统的一部分
B）在操作系统支持下的系统软件
C）一种编译系统
D）一种操作系统
9.在E—R图中，用来表示实体联系的图形是（C）。
A）椭圆形
B）矩形
C）菱形
D）三角形
A）选择
B）投影
C）交
D）并
11.在VB集成环境中要结束一个正在运行的工程，可单击工具栏上的一个按钮，这个按钮是（D）。
■
12.设X是整型变量，与函数llf（x>
0,-x,x）有相同结果的代数式是（B）。
|x|
-凶
x
—x
13.设窗体文件中有下面的事件过程：
PrivateSubCommand1_Click（）Dims
a%=100
Printa
EndSub
其中变量a和s的数据类型分别是（C）。
A）整型，整型
B）变体型，变体型
C）整型，变体型
D）变体型，整型
14.下面不能在信息框中输出"
VB"
的是（D）。
A）MsgBox"
B）x=MsgBox（"
）
C）MsgBox（"
D）CallMsgBox"
15.下面关于标准模块的叙述中错误的是（B）。
A）标准模块中可以声明全局变量
B）标准模块中可以包含一个SubMain过程，但此过程不能被设置为启动过程
C）标准模块中可以包含一些Public过程
D）一个工程中可以含有多个标准模块
16.下面正确使用动态数组的是（A）。
Dinijji（}Am
HrDiin3w5j
Dimjrr）X
Dimnrr（）
ReOinijitt（50）AsInlPgeT
Dimarr（50）AsIntrprr
D）I：
•-2
17.下面是求最大公约数的函数的首部：
Functiongcd（ByValxAsInteger,ByVaiyAsInteger）AsInteger若要输出812、16这3个数的最大公约数，下面正确的语句是（D）。
A）Printgcd（8,12），gcd（12,16），gcd（16,8）
B）Printgcd（8,12,16）
C）Printgcd（8），gcd（12），gcd（16）
D）Printgcd（8，gcd（12,16））
18.若在窗体模块的声明部分声明了如下自定义类型和数组:
PrivateTyperec
CodeAsInteger
CaptionAsString
EndType
Dimarr（5）Asrec
则下面的输出语句中正确的是（C）。
Printarr.Code
（2）
arr.Caption
（2）
Printarr.Code,
arr.Caption
Printarr
（2）.Code
arr
（2）.Caption
PrintCode
（2）,
Caption
（2）
19.下面程序运行时，若输入395，则输出结果是（B）。
PrivateSubCommand1_Click（）
Dimx%
x=InputBox（"
请输入一个3位整数"
PrintxMod10,x\100,（xMod100）\10EndSub
A）395
B）539
C）593
D）359
20.某人编写了下面的程序，希望能把Text1文本框中的内容写到out.txt文件中:
Open"
out.txt"
ForOutputAs#2
Print"
Text1"
Close#2
调试时发现没有达到目的，为实现上述目的，应做的修改是（A）。
A）把Print"
改为Print#2,Text1
B）把Print"
改为PrintText1
C）把Print"
Textl"
改为Write"
D）把所有#2改为#1
21.VB中有3个键盘事件：
KeyPress、KeyDown、KeyUp，若光标在Textl文本框中，则每输入一
个字母（A）。
A）这3个事件都会触发
B）只触发KeyPress事件
C）只触发KeyDown、KeyUp事件
D）不触发其中任何一个事件
22.设窗体的名称为Form1，标题为Win，则窗体的MouseDown事件过程的过程名是（C）。
A）Form1_MouseDown
B）Win_MouseDown
C）Form_MouseDown
BorderStyle属性设置为（B）。
MouseDown_Form1
23.要求当鼠标在图片框P1中移动时，立即在图片框中显示鼠标的位置坐标。
下面能正确实现上述功能的事件过程是（C）。
A）PrivateSubP1_MouseMove（ButtonAsInteger，
ShiftAsInteger，
XAsSingle，
YAs
Single）
PrintX，Y
B）PrivateSubP1_MouseDown（ButtonAsInteger，Single）
Picture.PrintX，Y
C）PrivateSubP1_MouseMove（ButtonAsInteger，Single）
P1.PrintX，Y
D）PrivateSubForm_MouseMove（ButtonAsIntegerSingle）
，ShiftAsInteger，
XAsSingle，
24.为了使窗体的大小可以改变，必须把它的
A）1
B）2
C）3
D）4
25.为了对多个控件执行操作，必须选中这些控件。
下列不能选中多个控件的操作是（A）。
A）按住Alt键，不要松开，然后单击每个要选中的控件
B）按住Shift键，不要松开，然后单击每个要选中的控件
C）按住Ctrl键，不要松开，然后单击每个要选中的控件
D）拖动鼠标画出一个虚线矩形，使所选中的控件位于这个矩形内
26.在窗体上画一个文本框，其名称为Textl，为了在程序运行后隐藏该文本框，应使用的语句为
（B）。
A）Text1.Clear
B）Textl.Visible=False
C）Text1.Hide
D）Textl.Enabled=False
27.以下能够触发文本框Change事件的操作是（D）。
A）文本框失去焦点
B）文本框获得焦点
C）设置文本框的焦点
D）改变文本框的内容
28.假定在图片框Picture1中装入了一个图片，在程序运行中，为了清除该图片（注意，清除图片，
而不是删除图片框），应采用的正确方法是（B）。
A）单击图片框，然后按De键
B）执行语句Picture1.Picture=LoadPicture（"
"
C）执行语句Picture1.Picture="
D）执行语句：
Picture1.Cls
29.要想使列表框只允许单选列表项，应设置的属性为（C）。
A）Style
B）Selected
C）MultiSelect
D）Enabled
30.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
PrivateSubCommand1_Click（）
DimiAsInteger，nAsInteger
Fori=0To50
i=i+3n=n+1
Ifi>
10ThenExitFor
Next
Text1.Text=Str（n）
程序运行后，单击命令按钮，在文本框中显示的值是（B）。
A）2
B）3
C）4
D）5
31.在窗体上画一个命令按钮，然后编写如下事件过程：
DimI，Num
Randomize
Do
ForI=1To1000
Num=Int（Rnd*100）
PrintNum；
SelectCaseNum
Case12
ExitFor
Case58
ExitDoCase65，68，92
End
EndSelect
NextI
Loop
EndSub上述事件过程执行后，下列描述中正确的是（D）。
A）Do循环执行的次数为1000次
B）在For循环中产生的随机数小于或等于100
C）当所产生的随机数为12时结束所有循环
D）当所产生的随机数为65、68或92时窗体关闭、程序结束
32.在窗体上画一个名为Command1的命令按钮，然后编写如下代码：
OptionBase1
Dima
a=Array（1,2,3,4）
j=1
Fori=4To1Step—1
s=s+a（i）*j
j=j*10
NextiPrintsEndSub运行上面的程序,其输出结果是（A）。
A）1234
B）12
C）34
D）4321
33.设有如下通用过程：
PublicFunctionFun（xStrAsString）AsStringDimtStrAsString,strLAsIntegertStr="
strL=Len（xStr）
i=1
DoWhilei<
=strL/2
tStr=tStr&
Mid（xStr,i,1）&
Mid（xStr,strL—i＋1,1）
Fun=tStr
EndFunction
在窗体上画一个名称为Command1的命令按钮。
然后编写如下的事件过程：
PrivateSubCommand1_Click（）
DimS1AsString
S1="
abcdef'
PrintUCase（Fun（S1））
EndSub程序运行后，单击命令按钮，输出结果是（C）。
ABCDEF
abcdef
AFBECD
DEFABC
34.某人为计算n!
（0<
*=12）编写了下面的函数过程：
PrivateFunctionfun（nAsInteger）AsLong
DimpAsLong
p=1
Fork=n—1To2Step—1p=p*k
Nextk
fun=p
EndFunction在调试时发现该函数过程产生的结果是错误的，程序需要修改。
下面的修改方案中有3种是正
确的，错误的方案是（B）。
把p=1改为p=n
把Fork=n—1To2Step—1
改为
Fork=1Ton—1
Fork=1Ton
Fork=2Ton
35.假定有以下函数过程：
FunctionFun（SAsString）AsString
Dims1AsString
Fori=1ToLen（S）
s1=LCase（Mid（S，i，1））＋s1
Nexti
Fun=s1
EndFunction在窗体上画一个命令按钮，然后编写如下事件过程：
DimStr1AsString，Str2AsStringStr1=InputBox（"
请输入一个字符串"
）Str2=Fun（Str1）PrintStr2
abcdefg"
，则单击”确定”按钮
EndSub程序运行后，单击命令按钮，如果在输入对话框中输入字符串后在窗体上的输出结果为（D）。
A）ABCDEFG
B）abcdefg
C）GFEDCBA
D）gfedcba
36.为计算an的值，某人编写了函数power如下：
PrivateFunctionpower（aAsInteger，nAsInteger）AsLong
DimsAsLong
p=a
p=p*a
power=p
在调试时发现是错误的，例如Printpower（5,4）的输出应该是625，但实际输出是3125。
程序需要修改。
下面的修改方案中有3个是正确的，错误的一个是（B）。
A）把Fork=1Ton改为Fork=2Ton
B）把p=p*a改为p=pAn
C）把Fork=1Ton改为Fork=1Ton—1
D）把p=a改为p=1
37.某人编写了下面的程序：
DimaAsInteger，bAsInteger
a=InputBox（"
请输入整数"
b=InputBox（"
proa
prob
Callpro（a＋b）
PrivateSubpro（nAsInteger）
While（n>
0）
PrintnMod10；
n=n\10
Wend
Print
此程序功能是：
输入2个正整数，反序输出这2个数的每一位数字，再反序输出这2个数之
和的每一位数字。
例如：
若输入123和234，则应该输出：
321
432
753
但调试时发现只输出了前2行（即2个数的反序），而未输出第3行（即2个数之和的反序），程
序需要修改。
下面的修改方案中正确的是（A）。
A）把过程pro的形式参数nAsInteger改为ByValnAsInteger
B）把Callpro（a+b）改为proa+b
C）把n=n\10改为n=n/10
D）在prob语句之后增加语句c%=a+b，再把Callpro（a+b）改为proc
38.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程:
c=1234
c1=Trim（Str（c））
Fori=1To4
Print
程序运行后，单击命令按钮，要求在窗体上显示如下内容：
1
12
123
1234
则在横线处应填入的内容为（B）。
Right（c1,
i）
Left（c1,
Mid（c1,
i,1）
i,i）
39.假定有以下程序段：
Fori=1To3
Forj=5To1Step—1Printi*j
Nextj
则语句Printi*j的执行次数是（A）。
15
16
17
18
40.在窗体上画两个文本框（名称分别为Text1和Text2）和一个命令按钮（名称为Command1），然后编写如下事件过程：
x=0
DoWhilex<
50
x=（x+2）*（x+3）
n=n+1
Text2.Text=Str（x）
程序运行后，单击命令按钮，在两个文本框中显示的值分别为（B）。
1和0
2和72
3和50
4和168
升级会员 