银符考试题库-在线练习-二级VISUAL BASIC分类模拟181

二级VISUAL BASIC分类模拟181

选择题

1. 在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1)，程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程的是______。

A.Private Sub Text1_Change()
Label1.Caption=Str(Len(Text1.Text))
End Sub
B.Private Sub Text1_Click()
Label1.Caption=Str(Len(Text1.Text))
End Sub
C.Private Sub Text1_Change()
Label1.Caption=Text1.Text
End Sub
D.Private Sub Label1_Change()
Label1.Caption=Str(Len(Text1.Text))
End Sub

A B C D

2. 设有如下程序：
Private Sub Form_Click()
Dim i As Integer, x AS String, y As String
x="ABCDEFG"
For i=4 To 1 Step-1
y=Mid(x, i, i)+y
Next i
Print y
End Sub
程序运行后，单击窗体，输出结果为______。

A.ABCCDEDEFG
B.AABBCDEFG
C.ABCDEFG
D.AABBCCDDEEFFGG

A B C D

[解析] 本题也是考查字符串的取值，当i=4时，y=Mid(x,4,4)+y=DEFG，当i=3时，y=Mid(x,3,3)+y=CDEDEFG，当i=2时，y=Mid(x,2,2)+y=BCCDEFG，当i=1时，y=Mid(x,1,1)+y=ABCCDEFG，所以答案选择A。

3. 下列叙述中正确的是

A.软件交付使用后还需要进行维护
B.软件一旦交付使用就不需要再进行维护
C.软件交付使用后其生命周期就结束
D.软件维护是指修复程序中被破坏的指令

A B C D

[解析] 维护是软件生命周期的最后。一个阶段，也是持续时间最长、付出代价最大的阶段，在软件交付使用后，还需要进行维护。软件维护通常有以下四类：为纠正使用中出现的错误而进行的改正性维护；为适应环境变化而进行的适应性维护；为改进原有软件而进行的完善性维护；为将来的可维护和可靠而进行的预防性维护。软件维护不仅包括程序代码的维护，还包括文档的维护。综上所述，本题的正确答案是A，其余选项的说法错误。

4. 假定已在窗体上画了多个控件，其中有一个被选中，为了在属性窗口中设置窗体的属性，预先应执行的操作是______。

A.单击窗体上没有控件的地方
B.单击任意一个控件
C.双击任意一个控件
D.单击属性窗口的标题栏

A B C D

[解析] 单击窗体上没有控件的地方，在属性窗口就会出现窗体的各属性，这样就可对窗体的属性进行设置，故A选项正确。
单击任意一个控件，在属性窗口中出现的是该控件的属性，放B选项错误；双击任意一个控件，打开的是“代码窗口”，故C选项错误；单击属性窗口的标题栏，属性窗口成为活动窗口，故D选项错误。

5. Sub过程与Function过程最根本的区别是______。

A.Sub过程名称与Function过程名称的格式不统一
B.Function过程可以带参数，Sub过程不可以
C.两种过程参数的传递方式不同
D.Sub过程的过程参数名称不能有返回值，而Function过程能通过过程名称得到返回值

A B C D

[解析] 两个函数的命名原则一致，均可带参数，可进行值传递与地址传递，不同在于是否有返回值。

6. 已知通用对话框名为Cdlg，则执行下列的______语句，将弹出“另存为对话框”对话框。

A.Cdlg.Action=1
B.Cdlg.Action=2
C.Cdlg.Action=4
D.Cdlg.Action=3

A B C D

[解析] 为了弹出某个对话框，除使用通用对话框的方法外，还可以通过给通用对话框的Action属性赋值来实现，给Action属性赋不同的值将弹出不同的对话框。若给Action属性赋值为2，运行时将弹出“另存为对话框”对话框。

7. 在窗体上画一个命令按钮，然后编写如下事件过程，结果为______。
Private Sub Command1_Click()
MsgBox Str(123+321)
End Sub

A.字符串“123+321”
B.字符串“444”
C.数值“444”
D.空白

A B C D

[解析] 考查MsgBox语句与str函数的用法。Msgbox语句产生的内容为字符串，所以排除选项C、D；str函数是将常量、变量或表达式的值转换为字符串格式。

8. 以下叙述中正确的是______。

A.任何时候都可以使用标准工具栏的“菜单编辑器”按钮打开菜单编辑器
B.只有当代码窗口为当前活动窗口时，才能打开菜单编辑器
C.只有当窗体设计窗口为当前活动窗体时，才能打开菜单编辑器
D.任何时候都可以使用“工具”菜单下的“菜单编辑器”命令，打开菜单编辑器

A B C D

[解析] 本题考查菜单编辑器。在窗体设计界面中，可以使用“工具”菜单下的“菜单编辑器”命令，或使用工具栏上的菜单编辑器命令，来打开菜单编辑器。在代码窗口中，菜单编辑器命令为灰色的，不可以使用。

9. 在下列叙述中，不正确的一条是 ______。

A.数据库设计包括结构设计和行为设计两方面的内容
B.数据库设计的关键是结构特征的设计
C.数据库设计是数据库应用系统设计的核心部分
D.数据库的物理设计和具体的DBMS的类型无关

A B C D

[解析] 数据库设计包括结构设计和行为设计两方面的内容，其中结构设计是确定数据库的数据模型，行为设计是应用程序的设计。结构设计是数据库设计的关键和核心，因此，选项A、B和C都是正确的。数据库的物理设计依赖于给定的计算机，不同类型的DBMS所提供的物理环境不同，物理结构有很大差别。

10. 对如下二叉树：

进行后序遍历的结果为______。

A.ABCDEF
B.DBEAFC
C.ABDECF
D.DEBFCA

A B C D

[解析] 后序遍历：若需遍历的二叉树为空，执行空操作；否则，依次执行下列操作：
(1)首先按照后序遍历的顺序访问根结点的左子树；
(2)然后按照后序遍历的顺序访问根结点的右子树；
(3)最后访问根结点。

11. 工程中有2个窗体，名称分别为Form1、Form2，Form1为启动窗体，该窗体上有命令按钮Command1，要求程序运行后单击该命令按钮时显示Form2，则按钮的Click事件过程应该是______。

A.Private Sub Command1_Click()
Form2.Show
End Sub
B.Private Sub Command1_Click()
Form2.Visible
End Sub
C.Private Sub Command1_Click()
Load Form2
End Sub
D.Private Sub Command1_Click()
Form2.Load
End Sub

A B C D

[解析] Visual Basic程序运行后，首先运行的是启动窗体，而From1是启动窗体，运行后即被显示。现在要通过单击命令按钮Command1显示From2，就需要调用窗体显示的方法Show，故A正确。而B中的Visible是窗体可见的方法，不是显示的方法。C的Load是装入事件，它是把窗体载入内存，但并不显示它。D中的Form2.Load语法是错的。

12. 下列关系表达式中，其值为True的是

A."XYZ"＞"XYz"
B."VisualBasic"＜＞"visualbasie"
C."the"="there"
D."Integer"＜"Int"

A B C D

[解析] VB中比较字符串大小就是比较其Ascii值大小，规则如下：
(1)如果字符串A的前n位的Ascii码值等于字符串B的前n位的Ascii码值，则继续比较下一位；(2)如果字符串A的第n位的．Ascii码值大干字符串B的第n位的Ascii码值，则字符串A＞字符串B，反之字符串A＜字符串B；(3)如果每一位的Ascii码值都相等，而且长度相同，则表示字符串A＝字符串B；(4)如果字符串A是字符串B的前m位(例如abcd与abcdef比较)，则字符串A＜字符串B。
由于同一字母的大写的Ascii值小于其小写的Ascii值，根据上述规则本题答案为选项B。

13. 以下关于通用对话框的叙述中，错误的是______。

A.在程序运行状态下，通用对话框控件是不显示的
B.通用对话框控件是Visual Basic的标准控件
C.设计时，通用对话框控件的大小是固定的，不能改变
D.在同一个程序中，一个通用对话框控件可以作为打开、保存等多种对话框

A B C D

[解析] 通用对话框是一个ActiveX控件，不是标准控件，故B选项错误。

14. 有三个关系R、S和T如下：

R
A	B
m	1
n	2

S
B	C
1	3
3	5

T
A	B	C
m	1	3

由关系R和S通过运算得到关系T，则所使用的运算为______。

A.笛卡儿积
B.交
C.并
D.自然连接

A B C D

[解析] 自然连接是一种特殊的等值连接，它要求两个关系中进行比较的分量必须是相同的属性组，并且在结果中把重复的属性列去掉，因此根据关系T中的有序组可知关系R与S进行的是自然连接操作，故本题答案为D。

15. 窗体上有1个名称为Command1的命令按钮，事件过程如下：
Private Sub Command1_Click()
Dim nan As Integer，x As Integer
num=Val(InputBox("请输入一个正整数"))
Select Case Bum
Case Is＞100
x=x+num
Case Is＜90
x=num
Case Else
x=x*num
End Select
Print x；
End Sub
运行程序，并在三次单击命令按钮时，分别输入正整数100、90和60，则窗体上显示的内容为______。

A.0 0 0
B.0 0 60
C.0 90 0
D.100 0 60

A B C D

[解析] 按钮事件中变量x为过程局部变量，第1次输入100时，Select语句执行Case Else分支x=x*num=0*100=0。第2次输入90时，Select语句执行Case Else分支x=x*num=0*90=0。第3次输入60时，Select语句执行Case Is＜90分支x=num=60。因此窗体上显示为0 0 60。

16. 在窗体上画一个文本框，然后编写如下事件过程：
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim char As String
char=Chr(KeyAscii)
KeyAscii=Asc(UCase(char))
Text1.Text=String(6,KeyAscii)
End Sub
程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为

A.a
B.A
C.aaaaaa
D.AAAAAA

A B C D

17. 已知图片框Picture1中已装入一个图形，为了在不删除图片框的前提下，清除该图形，应采取的正确操作是______。

A.在设计阶段选择图片框Picture1，并按Delete键
B.在运行期间执行语句Picture1.Picture=LoadPicture("")
C.在运行期间执行语句Picture1.Picture=""
D.在设计阶段先选中图片框Picture1，再在属性窗口中选择Picture属性，最后按Enter键

A B C D

[解析] 如果图片框已装入了一个图形，在不删除图片框的前提下要想清除该图形有两种方法。一是在设计阶段在图片框的属性窗口中删除图片榧控件Picture属性行后边的“(Bitmap)”，另一种方法是在程序运行阶段使用LoadPicture("")装一个空文件，这样也能清除图形。

18. 语句Y=Y+1的正确含义是。

A.变量Y的值与Y+1的值相等
B.将变量Y的值存到Y+1中去
C.将变量Y的值加1后赋值给变量Y
D.变量Y的值为1

A B C D

[解析] 这是考查通过赋值运算符给变量赋值，赋值运算符“二”的含义是将等号右边的表达式的值赋给等号左边的变量或属性，其优先级低于算术运算符，所以应该是Y+1先运算然后赋值给等号左侧的Y。

19. 在窗体上画一个命令按钮(其名称为Command1)，然后编写如下代码：
Private Sub Command1_Click()
Dim a
a=Array(1,2,3,4)
i=3: j=1
Do While i＞=0
s=s+a(i)*j
i=i-1
j=j*10
Loop
Print s
End Sub
运行上面的程序，单击命令按钮，则输出结果是______。

A.4321
B.123
C.234
D.1234

A B C D

[解析] 此程序的作用是将数组a中a(0)、a(1)、a(2)、a(3)作为千位、百位、十位、个位组成一个新数，i是数组的下标，作用是依次取a(3)、a(2)、a(1)、a(0)，s=s+a(i)*j的作用是将取到的数依次放到个位、百位、十位、千位，这是因为j四次循环的取值分别为1、10、100、1000。所以s四次循环的取值为4、4+30、34+200、324、324+1000。

20. 执行如下两条语句后，窗体上显示的是______。
a=9.8596
Print Format(a. "$ 00, 00, 00")

A.0,009.86
B.$9.86
C.9.86
D.$0,009.86

A B C D

[解析] Format函数把数字值转换为文本字符串，从而能够对该字符串的外观进行控制。例如，可以指定小数的位数、前导和尾部零，以及货币格式，其语法格式为：
Format(表达式[，特定字符串])
“表达式”参数指定要转换的数值，“特定字符串”参数是由一些符号组成的，这些符号用于说明如何确定该数字的格式。

21. 以下叙述中错误的是

A.打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件
B.保存Visual Basic程序时，应分别保存窗体文件及工程文件
C.Visual Basic应用程序只能以解释方式执行
D.事件可以由用户引发，也可以由系统引发

A B C D

22. 下面是求最大公约数的函数的首部：
Function gcd(ByVal x As Integer, ByVal y As Integer)As Integer
若要输出8、12、16这3个数的最大公约数，下面正确的语句是______。

A.Print gcd(8, 12), gcd(12, 16), gcd(16, 8)
B.Print gcd(8, 12, 16)
C.Print gcd(8), gcd(12), gcd(16)
D.Print gcd(8,g cd(12, 16))

A B C D

[解析] 调用函数过程时的实参与函数过程的形参必须是类型、顺序、个数相同。
本题中函数过程的形参有2个，调用时实参也要是2个，故排除选项B和C。
选项A虽然语法没错误，但不符合题意。
选项D是正确的。调用函数过程时可以嵌套调用。

23. 下列排序方法中，最坏情况下比较次数最少的是______。

A.冒泡排序
B.简单选择排序
C.直接插入排序
D.堆排序

A B C D

[解析] 冒泡排序、直接插入排序与简单选择排序法在最坏情况下均需要比较n(n-1)/2次，而堆排序在最坏情况下需要比较的次数是nlog₂n，因此本题答案为D。

24. 以下合法的VB变量名是______。

A.#_1
B.123_a
C.string
D.x_123

A B C D

[解析] 根据Visual Basic中变量的命名规则，#_1中#是类型符号，变量名中不能用Visual Basic保留符号。故不合法。123_a以数字开头不合法。string是Visual Basic的关键字，也不合法。故D选项正确。

25. 运行下列程序，在文本框中输入字符“a”，则输出结果为______。
Private Sub Form_Load()
Text1. Text=""
End Sub
Private Sub Text1 KeyDown(KeyCode As Integer, Shift As Integer)
Text1. Text=KeyCode
Print Text1. Text
End Sub

A.a
B.65
C.A
D.97

A B C D

26. 如果要将一个窗体从内存中清除，应使用的语句是______。

A.Unload
B.Show
C.Load
D.Hide

A B C D

27. 在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Dim SW As Boolean
Function func(X As Integer)As Integer
If X＜20 Then
Y=X
Else
Y=20+X
End If
func=Y
End Function
Private Sub Form_MouseDown(Button As Integer, _
Shift As Integer,X As Single,Y As Single)
Dim a As Boolean
SW=False
End Sub
Private Sub Form_MouseUp(Dutton As Integer, _
Shift As Integer, X As Single, Y As Single)
SW=True
End Sub
Private Sub Command1_Click()
Dim intNum As Integer
intNum=InputBox("")
If SW Then
Print func(intNum)
End If
End Sub
程序运行后，单击命令按钮，将显示一个输入对话框，如果在对话框中输入25，则程序的执行结果为______。

A.输小0
B.输出25
C.输出45
D.无任何输出

A B C D

[解析] 上述程序由一个通用过程和3个事件过程组成，在命令按钮事件过程中训用通用过程，并把一个参数传送给通用过程。这里要注意，只有在一定的条件下，才能调用通用过程，这个条件就是，窗体层的Boolean变量SW的值必须为True，否则不能调用。而为了使SW的值为True，必须执行Form_MouseUp事件过程，这只能通过单击窗体来实现。单击窗体时，单击鼠标左键执行Form_MouseDown事件过程，使得SW=False。松开鼠标后执行Form_MouseUp事件过程，使得SW=True。程序运行后，由于没有执行Form_MouseUp事件过程，直接单击命令按钮，因而SW的值为False，这样不会调用通用过程，也就不会输出任何信息。

28. 设有如下程序：
Option Base 1
Dim a(3,4)As Integer,b(4,3)As Integer
Private Sub Commandl_Click()
'循环1
For i=1 To 3
Forj=1 To 4
b(j,i)=a(i,j)
Nextj
Nexti
'循环2
x=b(1,1)
For i=1 To 4
Forj=1 To 3
Printb(i,j);
If x＜b(i,j)Then x=b(i,j)
Nextj
Print
Nexti
End Sub
程序中的数组a己被赋值。以下关于上述程序的叙述中，正确的是______。

A.窗体模块中，不能使用Dim声明a、b数组
B.“循环1”可以正常运行
C.“循环2”中循环变量i、j的终值不对，所以不能正常运行
D.程序可以正常运行，x中保存的是数组b中所有元素中最小的数

A B C D

[解析] Dim用于在标准模块、窗体模块或过程中定义变量或数组。程序可以正常运行，x中保存的是数组b元素中的最大值。

29. 对于如下图所示的二叉树，其后序遍历序列是________。

A.ABDECFG
B.DEBAFCG
C.DEBFGCA
D.GFCEBDA

A B C D

30. 下列不能打开工具箱窗口的操作是______。

A.执行“视图”菜单中的“工具箱”命令
B.按Alt+F8键
C.单击工具栏上的“工具箱”按钮
D.按Alt+V，然后按Alt+X键

A B C D

[解析] 打开工具箱窗口的操作方法有：执行“视图”菜单中的“工具箱”命令；单击工具栏上的“工具箱”按钮；按Alt+V，然后按Air+X键。

31. 在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框，其名称分别为Drive1、Dir1和File1，为了使它们同步操作，必须触发驱动器的Change事件和目录的Change事件，在这两个事件中执行的语句分别为______。

A.File1.Path=Drive1.Drive和File1.Path=Dir1.Path
B.Dir1.Path=Drive1.Drive和File1.Path=Dir1.Path
C.Dir1.Path=Dir1.Path和File1.Path=Drive1.Drive
D.Dir1.Path=Drive1.Path和File1.Path=Dir1.Path

A B C D

[解析] 本题考查文件系统控件。要使驱动器、目录和文件列表框同步显示，需要在驱动器Drive1的Change事件中，编写Dir1.Path=Drive1.Drive语句；而使文件的路径和目录的一致，则需要在目录Dir1的Change事件中编写File1.Path=Dir1.Path语句。这两个事件都编写好后，就可以使驱动器、目录和文件列表框同步显示了。

32. 工程中有Form1、Form2两个窗体(Form1中有文本框Text1；Form2中有Text1文本框和Command1命令按钮)。Form1是启动窗体。在这些模块中编写下面的程序代码：Form1中的代码如下：
Private Sub Text1_DblClick()
Text1="VisualBasic"
Form2.Show
End Sub
Form2中的代码如下：
Private Sub Command1_Click()
Text1=Form1.Text1
Form1.Show
End Sub
下面关于程序的叙述中错误的是

A.双击Form1的Text1后，Text1中显示“VisualBasic”，弹出Form2
B.双击Form1的Text1后，Form2成为当前窗体
C.单击Form2的命令按钮，Form1成为当前窗体
D.Form2的Text1=Form1.Text1语句不能正确执行

A B C D

[解析] 本题中Form1中文本框的双击事件中会将文本框里面的内容设置为指定的值，而且打开窗体Form2并使Form2成为当前窗体；在Form2的命令按钮中的单击事件中会将本窗体中的Text1内容赋值成Form1窗体的文本框Text1的内容，并使Form1成为当前窗体。

33. 下面不能在信息框中输出“VB”的是______。

A.MsgBox"VB"
B.x=MsgBox("VB")
C.MsgBox("VB")
D.Call MsgBox"VB"

A B C D

[解析] Msgbox的功能：显示消息提示框，在对话框中显示提示消息，等待用户单击按钮，单击不同的按钮返回不同的整数。
MsgBox函数格式：变量=MsgBox(＜提示内容＞[，样式][，标题])，注意MsgBox函数带括号，有返回值；
MsgBox语句格式：MsgBox(＜提示内容＞[，样式][，标题])，有无括号都可以，无返回值。
选项D中用Call语句调用MsgBox函数，要符合Call语句的语法规则：Call函数名(实参表)，缺少括号，应该为Call MsgBox("VB")，语法才正确。故D选项不能输出"VB"，会出错。

34. 在设计窗体时，双击窗体的任何地方，可以打开的窗口是______。

A.代码窗口
B.属性窗口
C.工程资源管理器窗口
D.工具箱窗口

A B C D

[解析] 设计窗体时双击窗体的任何地方，默认打开的是代码窗口。故选A。

35. 有以下程序：
Option Base 1
Dim arr()As Integer
Private Sub Form_Click()
Dim i As Integer, j As Integer
ReDim art(3, 2)
For i=1 To 3
For j=1 To 2
arr(i,j)=i*2+j
Next j
Next i
ReDim Preserve arr(1,4)
For j=3 To 4
art(3,j)=j+9
Next j
Print art(3,2);art(3,4)
End Sub
程序运行后，单击窗体，输出结果为______。

A.8 13
B.0 13
C.7 12
D.0 0

A B C D

[解析] 通过分析上面的程序可知，一开始定义了一个动态数组arr()，接着使用：ReDim语句重新定义了数组，使动态数组arr()变为arr(3，2)，并给这个数组进行初始化，再使用ReDim Preserve语句再一次定义了动态数组arr()，使它变为arr(3，4)，同时由于使用了Preserve语句使新的数组保留了原来数组的内容，并再对这个数组的部分元素进行初始化。此时arr(3，2)=8，arr(3，4)=13，故选A。

36. 以下程序运行后，输出结果是______。
For j=1 To 3
Print Tab(3*j);2*(j-1)
Next j
Print
A．

B．

C．

D．

A B C D

[解析] tab()函数为输出若干个制表符，既然j是递增的，所以制表符的数量也是递增的，由此即可得到C为正确答案。

37. 为了读取数据，需打开顺序文件“D:\data5.txt”，以下正确的命令是

A.Open D:\data5.txt For Input As #1
B.Open "D:\data5.txt"For Input As #2
C.Open D:\data5.txt For Output As #1
D.Open "D:\data5.txt"For Output As #2

A B C D

[解析] Visual Basic程序中关于文件的操作，主要是先打开一个文件，然后对这个文件进行读或写的操作，操作完成后，关闭这个文件。打开文件的基本格式为：Open FileName For Mode As #FileNumber。打开方式主要有Output、Append、Input、Random等几种方式，其中打开顺序文件用于读取使用Input方式打开，而且文件名要用双引号括起来。

38. 以下可以作为Visual Basic变量名的是

A.A#A
B.counstA
C.3A
D.? AA

A B C D

[解析] 在Visual Basic中变量的命名规则是必须以字母开头，由字母、汉字、数字或下划线组成，不能在变量名中出现特殊字符“#”、句点“.”、空格、“!”、“@”、“$”、“%”、“&”。本题中选项A、D均出现了不能使用的特殊符号，选项C以数字开头，均不满足变量命名规则。选项B满足变量命名规则为正确答案。

39. 下列叙述中正确的是。

A.程序设计就是编制程序
B.程序的测试必须由程序员自己去完成
C.程序经调试改错后还应进行再测试
D.程序经调试改错后不必进行再测试

A B C D

40. 设R是一个二元关系，S是一个三元关系，则下列运算中正确的是______。

A.R-S
B.R×S
C.R∩S
D.R∪S

A B C D

[解析] 关系的交(∩)、并(∪)和差(-)运算要求两个关系是同元的，显然作为二元的R和三元S只能做笛卡儿积运算。

选择题

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40

深色：已答题浅色：未答题