vb控件数组的习题及答案

第一篇：vb控件数组的习题及答案

电子教室学生注册时姓名文本框部分请输入：如：1411111111李四 学号+姓名，中间不加空格）

实验准备：

请同学们删除d:ex21文件夹里面的内容

如果没有ex21文件夹，请在d: 下新建ex21文件夹

1、打开D:下的工程文件PROJECTA4.vbp和窗体文件FORMA4.frm，按以下要求完成程序：在窗体上创建2个列表框、2个标签、2个命令按钮。List1用于显示可选课程、List2用于显示已选课程。单击“选课”按钮，将List1中选定的课程名称加入到List2中显示,单击“清空”按钮，将删除List2中的所有课程。程序运行的参考输出格式如图A-4所示,可选课程至少包含图A-4所示的6门。最后将工程文件、窗体文件按原文件名保存在D:EX21文件夹下。

图A-4

2、打开D:下的工程文件PROJECTB4.vbp和窗体文件FORMB4.frm，按以下要求完成程序：在窗体上创建1个列表框、1个图片框、2个标签、2个命令按钮。List1用于显示可选课程、Picture1用于显示已选课程。单击“选课”按钮，将List1中选定的课程名称加入到Picture1中显示,单击“清空”按钮，将删除Picture1中的所有课程。程序运行的参考输出格式如图B-4所示,可选课程至少包含图B-4所示的6门。最后将工程文件、窗体文件按原文件名保存在D:EX21文件夹下。

图B-4

3、打开D:下的工程文件PROJECTA41.vbp和窗体文件FORMA41.frm，按以下要求完成程序：单击窗体，能产生10个两位的随机整数并存放在一维数组中，并能在窗体中输出该10个随机整数、最大数及其在10个数中的位置，要求使用语句强制显式声明模块中的所有变量，程序运行的参考输出格式如图A-41所示。最后将工程文件、窗体文件按原文件名保存在D:EX21文件夹下。

图A-41

4、打开D:下的工程文件PROJECTB41.vbp和窗体文件FORMB41.frm，按以下要求完成程序：单击窗体，能产生10个两位的随机整数并存放在一维数组中，并能在窗体中输出该10个随机整数、最小数及其在10个数中的位置，要求使用语句强制显式声明模块中的所有变量，程序运行的参考输出格式如图B-41所示。最后将工程文件、窗体文件按原文件名保存在D:EX21文件夹下。

图B-41

5、打开D:下的工程文件PROJECTA411.vbp和窗体文件FORMA411.frm，按以下要求完成程序：输入某小组5个同学的成绩，计算总分和平均分(取小数后一位)。本例利用InputBox函数来输入成绩，输入完毕后经过计算，再采用Print直接在窗体上输出结果，运行参考界面如下图所示。最后将工程文件、窗体文件分别按原文件名保存在D:EX21文件夹下。（要求用数组来实现，不用数组不能得分）

6、打开D:下的工程文件PROJECTB411.vbp和窗体文件FORMB411.frm，按以下要求完成程序：编写程序，单击窗体，实现将随机产生的两位整数的一维数组A(10)中的元素向后移动一个位置，最后一个元素移到第一个元素的位置上。最后将工程文件、窗体文件分别按原文件名保存在D:EX21文件夹下。

7、打开D:下的工程文件PROJECTB511.vbp和窗体文件FORMB511.frm，按以下要求完成程序：窗体FORM1界面如下图所示，其中一组(共3个)单选按钮(Option1(0)、Option1(1)和Option1(2))构成控件数组，要求当单击某个单选按钮时，能够改变文本框(Text1)中文字的大小。最后将工程文件、窗体文件分别按原文件名保存在D:EX21文件夹下。

8、打开D:下的工程文件PROJECTA511.vbp和窗体文件FORMA511.frm，按以下要求完成程序：窗体FORM1界面如下图所示，文本框Text1和Text2用于接收用户输入的操作数，文本框Text3用于存放两个操作数的运行结果。标签Label1用于显示运算符，按钮数组Command1(0)~Command1(3)分别执行上述各种运算操作。最后将工程文件、窗体文件分别按原文件名保存在D:EX21文件夹下。

9、打开D:下的工程文件PROJECTB51.vbp和窗体文件FORMB51.frm，按以下要求完成程序：按如图B-51设计窗体，其中有2组（每组 3个，共 6个）单选按钮的控件数组，分别放入2个框架中。当单击某个单选按钮时，能够分别改变文本框中文本的字体及大小。最后将工程文件、窗体文件按原文件名保存在D:EX21文件夹下。

图B-51

10、打开D:下的工程文件PROJECTA51.vbp和窗体文件FORMA51.frm，按以下要求完成程序：按如图A-51设计窗体，其中有2组（每组 3个，共 6个）单选按钮的控件数组，分别放入2个框架中。当单击某个单选按钮时，能够分别改变标签标题的字体及大小。最后将工程文件、窗体文件分别按原文件名保存在D:EX21文件夹下。

图A-51

11、打开D:下的工程文件PROJECTB5.vbp和窗体文件FORMB5.frm，按以下要求完成程序：按如图B-5设计窗体，其中有3组（每组 3个，共 9个）命令按钮的控件数组，分别放入3个框架中。当单击某个命令按钮时，能够改变文本框中文本的字符格式。最后将工程文件、窗体文件按原文件名保存在D:EX21文件夹下。

图B-5

12、打开D:下的工程文件PROJECTA5.vbp和窗体文件FORMA5.frm，按以下要求完成程序：按如图A-5设计窗体，其中有3组（每组 3个，共 9个）单选按钮的控件数组，分别放入3个框架中。当单击某个单选按钮时，能够改变标签标题的字符格式。最后将工程文件、窗体文件分别按原文件名保存在D:EX21文件夹下。

图A-5

第二篇：VB上机考试习题以及答案

VB上机考试

1、利用随机函数产生25个100到999之间的整数，构成55的矩阵，输出该矩阵。Dim a(1 To 5, 1 To 5)Private Sub Form_Click()Randomize For i = 1 To 5 For j = 1 To 5 a(i, j)= Int(Rnd *(99910 + 1)+ 10)Print a;s = s + a Next i Print Avg = s / 25 Print Avg End Sub

3、在窗体上按下鼠标的右键，记录其坐标。

Private Sub Form_Load()Label1.BorderStyle = 1 Label1.Alignment = 2 End Sub

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)If Button = 2 Then Label1.Caption = X & “,” & Y End If End Sub

4、利用随机函数产生25个10到99之间的整数，按从小到大的顺序显示。Dim a(1 To 25)Private Sub Form_Click()Cls For i = 1 To 25 a(i)= Int(Rnd *(991 For j = 1 To 251 + 1)+ 1)a(x)= a(x)+ 1 Next j For i = 1 To 6 Print i & “出现了” & a(i);“次” Next i

End Sub

6、在文本框中输入一些英语单词，统计空格的个数。

Dim n%, x As String, s% Private Sub Form_Click()n = Len(Text1.Text)x = Text1.Text For i = 1 To n If Mid(x, i, 1)= “ ” Then s = s + 1 Next i Print “共出现了” & s & “个空格” End Sub

7、编程计算下列公式的值，其中n(<10)为从键盘输入的正整数。S=1!+3!+5!+……+(2*n-1)!Private Sub Form_Click()n = Val(InputBox(“请输入一个不大于10的整数”))s = 0 For i = 1 To 2 * n2 * i1 a = a + 1 Print Str(a);Next j Print Next i End Sub

10、用For …Next语句编程，双击窗体后，在屏幕上显示如图：

Private Sub Form_DblClick()For i = 1 To 3 Print Tab(113 * i);For j = 1 To 5 Print x;Next j Print Next i End Sub

12、从文本框输入一个正整数，判断该数是否为素数。Dim a As Long Private Sub Form_Click()a = Val(Text1.Text)If a = 2 Then Tag = True ElseIf a Mod 2 = 0 Then Tag = False Else Tag = True For i = 3 To Sqr(a)Step 2 If a Mod i = 0 Then Tag = False: Exit For Next i End If If Tag = True Then Print a;“是素数” Else Print a;“不是素数” End If

End Sub

13、利用随机函数产生并显示10个3位数的正整数，找出其中的最大数。Option Explicit Dim i%, max%, loc% Dim a(1 To 10)As Integer Private Sub Form_Click()Randomize Form1.Cls For i = 1 To 10 a(i)= Int(Rnd *(9991000 + 1)+ 1000)Print a(i)Next i min = 9999 For i = 1 To 10 If a(i)< min Then min = a(i): loc = i Next i Print “最小的数是”;min Print “在数组中是第”;loc;“个数” End Sub

15、当按下鼠标左键时，窗体的背景色变为红色；松开鼠标左键时，窗体的背景色变为绿色。Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)If Button = 1 Then Form1.BackColor = vbRed

End Sub

Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)If Button = 1 Then Form1.BackColor = vbGreen End Sub

16、编制一个时钟程序，如下图

：Option Explicit

Private Sub Form_Load()Label1.BackColor = vbWhite Label1.BorderStyle = 1 Label1.Alignment = 2 Timer1.Enabled = True Timer1.Interval = 1000 End Sub

Private Sub Timer1_Timer()Label1.Caption = Time End Sub

17、从键盘输入10个数，按输入的顺序和按输入顺序相反的顺序输出。Option Explicit Dim i% Dim a(1 To 10)As Single Private Sub Form_Click()For i = 1 To 10 a(i)= Val(InputBox(“请输入第” & i & “个数”))Print a(i);Next i Print For i = 10 To 1 Step-1 Print a(i);Next i

End Sub

18、计算圆面积的程序。程序运行时，单击窗体，然后在下图所示的输入框中输入圆的半径，即可在窗体上显示计算出的圆面积。

Option Explicit Dim r%, a As Single Const pi As Single = 3.14159 Private Sub Form_Click()r = Val(InputBox(“请输入圆半径” & vbCrLf & “（1-9）：”, “输入”, 5))a = pi * r ^ 2 Print “半径为”;r;“的圆面积为”;a End Sub

19、编写一个时钟程序，当选择“24小时”时，以24小时的方式显示如A，当选择“12小时”时，以12小时的方式显示如B。

Private Sub Form_Load()Timer1.Interval = 1000 End Sub

Private Sub Timer1_Timer()Select Case True Case Option1.Value Label1.Caption = Time Case Option2.Value Label1.Caption = Format(Time, “HH:MM:SS AM/PM”)End Select End Sub 20、设计一个程序，用户界面如图所示。程序运行后，用户在文本框中输入一段文字，然后按需要单击选择框，用以改变文本的字体、字型、颜色以及大小。

Option Explicit

Private Sub Check1_Click()If Check1.Value = 1 Then Text1.FontName = “黑体” Else Text1.FontName = “宋体” End If End Sub

Private Sub Check2_Click()If Check2.Value = 1 Then Text1.FontUnderline = True Else Text1.FontUnderline = False End If End Sub

Private Sub Check3_Click()If Check3.Value = 1 Then Text1.FontSize = 20 Else

Text1.FontSize = 9 End If End Sub

Private Sub Check4_Click()If Check4.Value = 1 Then Text1.ForeColor = vbGreen Else Text1.ForeColor = vbBlack End If End Sub

Private Sub Command1_Click()Text1.Text = “" End Sub

Private Sub Command2_Click()End End Sub 20做出2个周期的正弦波形.Private Sub Form_Click()Dim i%, x#, y# Const pi As String = 3.1415926 Form1.Scale(-2 * pi, 1.2)-(2 * pi,-1.2)Form1.Line(-2 * pi, 0)-(2 * pi, 0)Form1.Line(0, 1.2)-(0,-1.2)For x =-2 * pi To 2 * pi Step 0.01

y = Sin(x)

Form1.PSet(x, y)Next x End Sub 21以窗体为中心,产生1000个半径颜色随机的同心圆.Private Sub Form_Click()For i = 1 To 1000

x = Form1.ScaleWidth / 2

y = Form1.ScaleHeight / 2

r = Int(Rnd * y)

c = RGB(255 * Rnd, 255 * Rnd, 255 * Rnd)

Form1.Circle(x, y), r, c Next End Sub 22.九九乘法表 Private Sub Form_Click()Dim i%, j% Form1.Caption = ”九九乘法表“ Print Tab(48);Caption Print Tab(48);”-------------“ For i = 1 To 9

For j = 1 To i

Print Tab((j-1)* 12 + 1);i;”*“;j;”=“;i * j;

Next j Print Next i End Sub 23求最大公约数和最小公倍数 Private Sub Command2_Click()Text1.Text = ”“ End Sub

Private Sub command1_Click()Dim m%, n%, r%, t% m = Val(Text1.Text)n = Val(Text2.Text)If m < n Then t = m: m = n: n = t t = m * n Do

r = m Mod n

m = n

n = r Loop Until r = 0 Text3.Caption = ”公约数:“ & m Text4.Caption = ”公倍数" & t / m End Sub 24.用随机函数产生50个两位数,保存于一个一维数组中,要求找出其中的最大值,最小值及所在位置.

第三篇：VB课后习题第11章习题及答案

习题十一及答案

习题 十一

1．简答题

（1）Visual Basic有哪几种工作模式？（2）Visual Basic中错误类型有哪几种？

（3）简要说明VB程序调试的主要方法和工具。（4）“立即”窗口、“监视”窗口和“本地”窗口有什么区别？ 2．判断题

（1）在VB集成环境中只有运行程序才能发现程序错误。()（2）设置错误的捕捉陷阱，指在程序中可能出现错误的地方放置捕捉语句来捕获产生错误的语句。()（3）On Error Resume Next语句的功能是忽略错误，继续往下执行。()（4）VB程序中出现编译错误时，不会产生错误提示。()3．选择题

（1）当语句不符合文法规则时，出现的错误是（）。

A）逻辑错误 B）运行时期错误 C）语法错误 D）以上都不对（2）下列陈述中正确的是（）。

A）中断点只能在设计过程中设置。B）中断点只能在执行过程中设置。

C）中断点可以在设计过程或在执行过程中设置。

D）中断点可以在设计过程中设置，也可以在执行过程或中断过程中设置。（3）下列属性中，属于Err对象的有（）。

A）Number B）Caption C）Description D）Text 4．填空题

（1）设置断点的快捷键是。（2）VB单步执行的快捷键是。

（3）错误码为11时表示发生的错误是。

5．编写一段程序，如果出现数组下标越界时，则给出错误的描述并结束程序的运行。

习题十一参考答案：

一、简答题

1．Visual Basic有哪几种工作模式？

（1）设计模式

启动Visual Basic后，即进入设计模式，在主窗口标题栏上显示“设计”字样。建立一个应用程序的所有步骤基本上都在设计模式下完成，包括窗体设计、建立控件、编写程序代码以及利用属性窗口设置属性值或查看当前属性值等。但在设计阶段不能执行程序，也不能使用调试工具，只可设置断点。

应用程序可以直接从设计阶段进入运行阶段，但不可以进入中断模式。（2）执行模式

执行“运行”菜单中的“启动”命令（或按下F5键、或单击工具条上的“启动”按钮），即进入执行模式，此时标题栏上原来显示“设计”的地方已被“运行”字样所代替。当整个应用程序进入运行阶段后，开始执行程序代码。在运行阶段只可以执行代码，不能修改代码。

（3）中断模式 进入中断模式后，主窗口标题栏上显示“Break”字样。在中断模式下，可以在没有运行结束的情况下中止应用程序，此时可以检查程序代码，并进行修改，也可以检查数据是否正确，修改完后，可继续执行程序。Visual Basic所有调试手段均可以在中断模式中运用。2．Visual Basic中错误类型有哪几种？

在 Visual Basic 编程中，可能遇到的错误类型有三种：（1）编译错误

编译错误是由于不正确的使用代码造成的，如输入关键字不正确、函数或过程调用方式不正确、循环语句For...Next不配套等，这些错误非常容易发现并排除。VB有自动语法检查功能，如果出现语法错误会提醒用户注意。

（2）运行错误

运行错误是由于语句试图执行一个不可能的操作引起的，最常见的如被零除、试图打开的文件不存在等错误。这类错误是可以捕获的，可以由VB检测出来。要处理这些错误需要使用VB的错误处理语句。

（3）逻辑错误

逻辑错误是由于对程序如何运行的错误理解而导致的错误，它使程序产生不正确或是与预期结果不同的结果。逻辑错误不能被VB检测出来，然而却在所有错误中占据很大的比例。这种错误非常隐蔽，也是程序调试中最难发现和处理的。程序开发人员必须使用VB提供的各种调试工具找到出错的地方，这通常是一个繁琐枯橾的过程，有时甚至不得不逐句检查。3．简要说明VB程序调试的主要方法和工具。

程序调试的主要方法有：跟踪程序运行、设置断点和使用调试窗口等。

调试工具主要包括：切换程序模式、设置和取消断点、逐语句或逐过程调试、监视变量和表达式的值等。

4．“立即”窗口、“监视”窗口和“本地”窗口有什么区别？

在立即窗口中输入可执行代码后将立即执行并得到结果。程序处于中断模式时，立即窗口可显示代码中正在调试的语句所产生的信息。

“本地”窗口的功能是在中断模式下，显示当前过程的所有变量和活动窗体的所有属性的值，并可以改变它们。

监视窗口用于查看监视表达式的值。

二、判断题

(1)╳(2)╳(3)√(4)╳

三、选择题

（1）C

(2)D

(3)A C

四、填空题

(1)F9

(2)F8 或SHIFT + F8

(3)某数被0除

五、编写一段程序，如果出现数组下标越界时，则给出错误的描述并结束程序的运行。Private Sub Command1_Click()

Dim a(10)As Integer, i As Integer

On Error GoTo ww

'设置错误陷阱

For i = 1 To 11

a(i)= i

Next i

Print “****************”

Exit Sub

'错误处理代码 ww:

If Err.Number = 9 Then

MsgBox “数组下标越界！”, 16, “错误”

End If

Resume aa aa:

End End Sub

第四篇：VB判断题及答案

VBP判断题

套号 题号 题目 01 01 01 01 01 01 01 01 01 01 02 02 02 02 02 02 02 02 02 02 03 03 03 03 03 03 03 03 03 03 04 04 04 04 04 04 04 04 04 04 05 05 05 05 05 05 05 05 05 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 每当一个窗体成为活动窗口时将触发Show事件。

Integer、Long、Single、Double是数值类型数据，但Byte不是。在打开某窗体时，初始化窗体中的各控件，应选用Load事件。

若行If语句中逻辑表达式值为True，则关键字Then后的若干语句都要执行。函数过程与Sub过程必须用关键字Private或Public声明。

标签控件可以响应Click事件。

屏幕（Screen）对象可作为窗体的容器，但它只能提供缺省的坐标系统，即坐标刻度不能改变 用通用对话框控件显示“字体”对话框前，必须先设置Flags属性，否则将发生“不存在字体” 的错误。

运行时目录列表框的List属性可以用AddItem和RemoveItem两种方法来改变。

将组合框的Style属性设置为0时，组合框称为“下拉式组合框”，其选项可以从下拉列表框 的列表项中选择，也可以由用户输入。

窗体启动位置可在“窗体布局窗口”中直接设置。

在所有的数据类型中，Byte型占用的内存空间最小，只要用一个字节。表达式5>4>3的计算结果是True。

在行If语句中，关键字End If是必不可少的。用Function过程在过程中必须被赋值。

单击组合框中的任一表项，该表项的文本就会替换这一组合框控件的Text属性值。QBcolor函数的参数是一个介于0~255的整数。

用通用对话框控件显示“字体”对话框前，必须先设置Flags属性，否则将发生“不存在字体” 的错误。

运行时目录列表框的List属性可以用AddItem和RemoveItem两种方法来改变。

当对DrawWidth进行设置后，将影响Line、Circle、Pset方法，但不会影响Line、Shape控件。在VB中，对象是代码和数据的集合。

Boolean类型数据，可以用来保存逻辑值True和False。如果B是一个字节型变量，那么B可以用来保存数值-1。

如果在定义过程时，一个形式参数使用地址传递方式说明，则调用过程时与之对应的实参只能 按地址方式传递。

在行If语句中，关键字End If可以缺省。定时器控件只能响应Timer事件。

从几十个项目中任选其中一项或多项时可选用列表框或组合框控件来实现。执行语句“C=Point(50,100)”，可将窗体坐标(50,100)处点的颜色值存入变量C。

在设计Windows应用程序时，用户可以使用系统本身提供的某些对话框，这些对话框可以直接 从系统调入而不必由用户用“自定义”的方式进行设计。Print #语句的作用是将数据从文件中读出并显示在窗体上。方法是VB预先定义的、只有用户可直接使用的过程。

整型变量A、B,如果A的值是1，B的值是256，那么变量B比变量A需要占用更多内存。用语句Dim Str1 As String声明的变量Str1，可以保存由100万个字符组成的字符串数据。块If结构中的Else子句是不可缺省的。

事件过程只能由系统调用，在程序中不能直接调用。

单选按钮与复选框对象的Value属性类型不同，单选按钮只能取值0或1。列表框和文本框一样都具有Text属性。

执行语句“Form1.BackColor = &HFF&”可以将窗体的背景色设置为蓝色。通过Open语句打开一个文件，操作完成后，必须用Close语句将其关闭。在窗体上绘制CommonDialog控件时，控件的大小、位置可由用户自己加以设定。在“工程资源管理器”，可以实现多窗体的所有操作。

由于Single型变量的取值范围比Long型变量大，所以Single型变量开销内存也比Long型多。语句Const A=100是将A声明为一个常量。块If结构中的Else子句可以缺省。

定义一个过程时，有几个形参，则在调用该过程时就必须提供几个实参。

列表框控件List1的最后一个表项为List1.List(List1.ListCount)。

移动框架时框架内控件也跟随移动，因此框架内控件的Left和Top属性值也随之改变。通过设置影像框的Picture属性可改变影像框中显示的图片，若要清除图片也是通过设置 Picture属性来实现。

在消息框（MsgBox）中，“Prompt”（消息）是必选项，最大长度为64个字符。

选项A 选项B 答案 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对

错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错

B B B A B A A A B A A A B B A A B A B A A A B A B A B A A B B B A A B B A B A B A B A B A B B A B

第 1 页，共 4 页

VBP判断题

05 06 06 06 06 06 06 06 06 06 06 07 07 07 07 07 07 07 07 07 07 08 08 08 08 08 08 08 08 08 08 09 09 09 09 09 09 09 09 09 09 10 10 10 10 10 10 10 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 在程序运行中，目录列表框将以树形展开方式显示某个盘或目录内的各个子目录名，并用是否 为打开的文件夹图标来表示选定的目录。

在打开某窗体时，初始化窗体中的各控件，应选用Load事件。不能使用Visual Basic的关键字作为变量名。表达式5>4>3的计算结果是True。

若用数组作为过程的参数，则实参和形参结合是按地址传递的，定义过程时，参数前不能使用 ByVal。

If语句中的条件表达式只能使用关系表达式或逻辑表达式。

执行滚动条控件的Change事件不是在拖动滚动条滑块的过程中，而是在拖动过程停止时。将组合框的Style属性设置为0时，组合框称为“下拉式组合框”，其选项可以从下拉列表框的 列表项中选择，也可以由用户输入。

将图片框的Align属性设置值为2，表示图片框在窗体中居中显示。

用户要想在程序运行时改变目录列表框的显示内容，可以通过代码来设置List属性的值。如果创建的菜单的标题是一个减号“-”，则该菜单显示为一个分隔线，此菜单项也可以识别单 击事件。

决定对象是否可见的属性是Show属性，决定对象可用性的属性是Load属性。表达式5>4>3的计算结果是True。

Dim关键字可用来声明过程级变量，但不能用来声明模块级变量。

在Select Case情况语句中，各个分支（即Case 表达式）的先后顺序无关。Sub过程名在过程中必须被赋值。

Picture对象的AutoSize属性值为True时，表示该对象不管原来图片的大小，一律都自动调整 为控件的大小尺寸，以便能完整地显示该图片。

设置窗体的Fillcolor属性使窗体的填充色为红色后，形状控件的填充色也是红色。当使用Circle方法画圆后，当前坐标在原点（0，0）。

菜单编辑器中的快捷键是指无须打开菜单就可以直接由键盘输入选择菜单项的键。若要新建一个磁盘上的顺序文件，可用OUTPUT、APPEND方式打开文件。在任何状态下都可以直接设置窗体的属性。

在一个模块中声明了一个模块级变量，则该变量可以被该模块中的所有过程访问。Print语句可以省略输出项，省略输出项，表示输出一空行。在Select Case情况语句中，Case 表达式可以包含任意变量。

过程中的静态变量是局部变量，当过程再次被执行时，它的值是上一次过程调用后的值。如果定时器的Interval属性是0，当启动定时器时，程序将进入死循环。

设置窗体的Fillcolor属性使窗体的填充色为红色后，形状控件的填充色也是红色。

将组合框的Style属性设置为0时，组合框称为“下拉式组合框”，其选项可以从下拉列表框的 列表项中选择，也可以由用户输入。

若某文件已存在，用OUTPUT方式打开该文件，等同于用APPEND方式打开该文件。当一个菜单项不可见时，其后的菜单项就会往上填充留下来的空位。

面向对象程序设计是一种以对象为基础，由事件驱动对象执行的设计方法。

Print语句的每个输出项之间可以用逗号或分号分隔，不管用逗号还是分号，其输出效果是一样 的。

语句A=B的意思是将字符“B”赋值给A，即A的值是字符“B”。

若用数组作为过程的参数，则实参和形参结合是按地址传递的，定义过程时，参数前不能使用 ByVal。

要实现同样的循环控制，在Do While/ Loop和Do/ Loop While循环结构中给定的循环条件是一 样的。

ScaleWidth属性和ScaleHeight属性是容器的坐标属性，因此有可能取到负值。要让控件隐藏起来，处于不可见的状态，可修改其enabled属性。

如果定时器的Interval属性是0，当启动定时器时，程序将进入死循环。CommonDialog控件就像Timer控件一样，在运行时是看不见的。用Kill语句删除文件，只能删除与指定文件名完全匹配的一个文件。

在一个窗体的代码中不能使用Unload语句来卸载本窗体，即一个窗体只能由其它窗体卸载。声明常量时给常量赋值可以使用表达式，但表达式不能包含函数调用。整除运算符，其两边的操作数可以是浮点型数据。

定义一个过程时，有几个形参，则在调用该过程时就必须提供几个实参。一个Do循环只能使用一个Loop关键字，但是可以使用多个Exit语句。

如果字符“Y”是某个命令按钮的访问键，在设计时，设置命令按钮的Caption属性时要在其中 字符“Y”前输入&；运行时，可以通过按alt+ Y键执行单击操作。

当列表框中表项太多、超出了设计时的长度时，Visual Basic会自动给列表框加上垂直滚动条

对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对

错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错

A A A B A A A A B A B B B B B B B B B A A B A A B A B B A B A A B B A B A B B A B B A A A A A A

第 2 页，共 4 页

VBP判断题 10 10 11 11 11 11 11 11 11 11 11 11 12 12 12 12 12 12 12 12 12 12 13 13 13 13 13 13 13 13 13 13 14 14 14 14 14 14 14 14 14 14 15 15 15 15 15 15 15 15 15 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 容器控件的位置、大小均采用其所在容器坐标系的刻度，与容器本身的坐标刻度无关。Open语句中的文件号，必须是当前未被使用的、最小的作为文件号的整数值。设计菜单中每一个菜单项分别是一个控件，每个控件都有自己的名字。由Visual Basic语言编写的应用程序有解释和编译两种执行方式。算述运算符要比关系运算符、逻辑运算符的运算优先级低。表达式A=B的计算结果要么是True，要么是False。

For/Next语句正常（未执行Exit For）结束其循环变量的值一定大于终值。

因为Function过程有返回值，所以只能在表达式中调用，而不能使用Call语句调用。图片框可以通过Print方法来显示文本。

Picture对象的AutoSize属性值为True时，表示该对象不管原来图片的大小，一律都自动调整 为控件的大小尺寸，以便能完整地显示该图片。当使用Circle方法画圆后，当前坐标在原点（0，0）。菜单一旦建成后，所有的菜单项均可识别Click事件。文件列表框的显示内容发生变化时，会触发Change事件。对象的基本特征是方法、事件和过程。

如果x、y、z是3个数值型变量，那么这3个变量的积的VB表达式可以写成xyz。过程级变量不可以与模块级变量同名。

事件过程只能由系统调用，在程序中不能直接调用。

For/Next语句正常（未执行Exit For）结束其循环变量的值一定大于终值，并等于“终值”+ “步长”。

对象的标题文字的颜色是由Fontcolor属性决定的。

执行滚动条控件的Change事件不是在拖动滚动条滑块的过程中，而是在拖动过程停止时。用Cls方法不能清除图片框中用Picture属性设置的图形。可以用AddItem方法向目录列表框中加入新表项。菜单项不仅可识别Click事件，还可识别ＤblClick事件。在VB中，对象的数据被称为属性。

如果x、y、z是3个数值型变量，那么这3个变量的积的VB表达式可以写成xyz。内部函数是系统预定义的函数。

For/Next语句中，若循环变量的初值大于终值，Step缺省，则为死循环。数组作为参数，传递的是地址数据。

只要设置命令按钮的backcolor为蓝色，按钮就一定可以变成蓝色按钮。

移动框架时框架内控件也跟随移动，因此框架内控件的Left和Top属性值也随之改变。改变图形对象的坐标系可以用ScaleMode方法。

在通用对话框的“打开文件对话框”中选择一个文件后，能真正打开该文件。目录列表框当前目录的ListIndex为0，其子目录的ListIndex属性再按顺序往下编号。用VB设计程序时，必须先设计窗体，再编写代码。表达式“123”+“1”的计算结果是“1231”。内部函数是系统预定义的函数。

For/Next语句中，循环控制变量只能是整型变量。用Function过程在过程中必须被赋值。

要在文本框中输入6位密码，并按回车键确认，则文本框的MaxLength属性可设置为6。

定时器控件只能响应Timer事件。

在图片框中添加的控件，其Top和Left属性值是相对图片框而言的，与窗体无关。在“颜色”对话框中选中某一颜色后，该颜色值会赋给Color属性。

在盘驱动器列表框Drive1的Change事件过程中，代码Dir1.Path=Drive1.Drive的作用是：当 Drive1的驱动器改变时，Dir1的目录列表随同驱动器作相应变化。在VB中如要使用调试工具，应使VB进入中断模式。表达式1*2+3/42^2的计算结果是2。Rnd函数返回的最大值是1。

如果在定义过程时，一个形式参数使用地址传递方式说明，则调用过程时与之对应的实参只能 按地址方式传递。

For/Next语句中，“Step 1”可以缺省。

用Redim语句既可以改变数组的大小，也可以改变数组类型。标签控件和其他控件对象一样，可以获得焦点。影像框和图片框一样，也可以作为其他控件的容器。

通用对话框的Filename和FileTitle属性一样，指的都是含路径的文件全名。

对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对

错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错

A A A B B A B A A B B B B B B B B B B A A B B A B A B A B B B B B B A A B A A A A A A A A B A A B B B B

第 3 页，共 4 页

VBP判断题 16 16 16 16 16 16 16 16 16 16 17 17 17 17 17 17 17 17 17 17 18 18 18 18 18 18 18 18 18 18 19 19 19 19 19 19 19 19 19 19 20 20 20 20 20 20 20 20 20 20 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 09 10 若某文件已存在，用OUTPUT方式打开该文件，等同于用APPEND方式打开该文件。VB是一种面向过程的可视化编程语言。表达式Sin(30)，就是求30度角的正弦值。

Val是用来把一个数字字符串转换为相应的数值的函数。在循环体内，循环变量的值不能被改变。

在使用Redim重新定义数组时，下标可以用具有确定值的变量来表示。事件过程只能由系统调用，在程序中不能直接调用。

影像框和图片框都可以用AutoSize属性来控制控件大小调整的行为，当AutoSize属性值为True 时，两者控件大小根据图片来调整；设置为False时，只有一部分图片可见。通用对话框的FilterIndex属性用于设置“打开”或“另存为”对话框的文件类型。单选钮控件和复选框控件都具有Value属性，它们的作用完全一样。Print #语句的作用是将数据从文件中读出并显示在窗体上。控件的属性值不可以在程序运行时动态地修改。表达式Int(-10.1)的计算结果是-10。执行语句A=B=2后，A的值是一个逻辑值。

用Redim语句既可以改变数组的大小，对于已经定义了类型的数组，还可以改变数组类型。用Public声明的数组是一定全局量。

调用过程时的实参必须是与对应形参类型相同的表达式。组合框能响应Click事件，但不能响应change事件。ScaleMode的所有属性值均表示打印长度。

对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对

错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错

B B B A B A B B B B B B B A B B A B B A B A A A A B B A A A B A B B A B B A A B A A A A B B A A B B A 通用对话框不是一种标准控件，初始时工具箱中一般找不到，因此使用前需先将它添加到工具 箱中。

用Append模式打开文件，如果指定文件和路径不存在，则会自动创建指定文件及路径。VB中的变量名，如用的是英文字母，其大小写是不区分的。

如果窗体的Enabled属性为False，就不能对窗体上的任何控件进行操作。表达式Mid(“Nothing”,3,2)的计算结果是“th”。执行语句A=B=2后，A的值是一个逻辑值。

若要使定义数组的下标下界默认值为2，则可以用语句Option Base 2.声明形参处缺省传递方式声明，则为按值传递（Byval）。

使用单选钮控件数组时，它们响应同一个Click事件，由Index参数值来区分不同的按钮。图形控件可以在运行时获得焦点。

创建用户自定义对话框时，一般应将ControlBox设为Ｆalse，使得控制菜单框不显示。运行时目录列表框的List属性可以用AddItem和RemoveItem两种方法来改变。修改控件的Top和Left属性,可改变控件在窗体中位置。

事件是一种预先定义好的特定动作，只能由用户触发，常用于用户的交互操作。表达式Len(x)和len(“x”)返回值必然相等。

使用On Error GoTo语句并编写相应程序，可以捕获程序中的编译错误。Sub过程名在过程中必须被赋值。

若要使定义数组的下标下界默认值为2，则可以用语句Option Base 2.设置框架时，可先在窗体上画好框架，再往框架内添置控件；也可以先设计控件，再建立框 架，然后将已有控件粘贴到框架中。

BorderWidth属性表示指定直线和形状边界线的线条宽度，该属性值不能设置为0。通用对话框的Filename和FileTitle属性一样，指的都是含路径的文件全名。

选中文件列表框File1中某个选项时，File1.FileName属性值为不包含路径的文件名。Form_Load事件常用于作控件属性和变量的初始化。

面向对象的程序设计是一种以对象为基础，由事件驱动对象的编程技术。表达式“123”+“1”的计算结果是“1231”。

Print语句的每个输出项之间可以用逗号或分号分隔，不管用逗号还是分号，其输出效果是一样 的。

Do/Loop Until结构的循环，是“先判断、后执行（循环体）”的循环结构。

过程中的静态变量是局部变量，当过程再次被执行时，它的值是上一次过程调用后的值。当列表框中表项太多、超出了设计时的长度时，Visual Basic会自动给列表框加上垂直滚动条 执行指令“Line(1200,1200)-Step(1000,500),B”后，CurrentX=1000。

若Visual Basic中容器取缺省坐标系，则坐标原点在容器左上角、单位长度为像素。盘驱动器列表框的Drive属性，只能用程序代码设置，不能通过属性窗口设置。

第 4 页，共 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.标签框的边框，由属性的设置值决定。A)BorderStyle B)BackStyle C)BackColor D)AutoSize 18.标签框文本的对齐方式由属性来决定。

A)Align B)Alignment C)Autosize D)BackStyle 19.标签框所显示的内容，由属性值决定。

A)Text B)Name C)Caption D)Alignment 20.在运行时，若要获得用户在文本框中所选择的文本，可通过访问属性来实现。A)SelStart B)SelLength C)Text D)SelText

二、填空题(每题2分,共20分)1.Visual Basic是一种面向的可视化程序设计语言，采取了的编程机制。2.在VB集成开发环境中，运行应用程序的方法有两种是：或。

3．Visual Basic的对象主要分为和两大类。

4.在Visual Basic中，用来描述一个对象外部特征的量称之为对象的。

5.在Visual Basic中，设置或修改一个对象的属性的方法有两种，它们分别是 和。

6.在Visual Basic中，最基本的对象是。

7.在Visual Basic中，默认窗体名为，默认工程名为。8.若用户单击了窗体Form1，则启动的事件名为。9.调用方法的具体调用格式为。10．在代码中设置对象属性的格式为。

三、简答题(每题8分,共40分)1.简述VB的特点。

2.安装Visual Basic系统程序应具备什么条件？ 3.启动Visual Basic有几种方法？ 4．退出Visual Basic有几种方式？

5．什么是对象？什么是类？简述它们之间的关系。参考答案:

一、单项选择题

1.答：D 2.答：C 3.答：A 4.答：C 5.答：A 6.答：B 7.答：C 8.答：B 9.答：A 10.答：C 11.答：C 12.答：A 13.答：D 14.答：B 15.答：B 16.答：B 17.答：A 18.答：B 19.答：C 20.答：D

二、填空题

1.答：对象，事件驱动

2.答：编译运行模式、解释运行模式

3.答：窗体、控件 4.答：属性

5.答：在设计阶段利用属性列表框进行设置、在程序中通过程序代码进行设置 6.答：窗体

7.答：Form1、工程1 8.答：Click 9.答：对象名.方法名［参数名表］ 10．答：对象名.属性名＝属性值

三、简答题

1.答：Visual Basic是Microsoft 公司与1991年推出的基于Windows环境的语言，其主要特点如下：

(1)方便、直观的可视化的程序设计工具；

(2)面向对象的程序设计方法；

(3)事件驱动的编程机制；

(4)结构化程序设计语言；

(5)强大的数据库访问能力；

(6)提供强大的网络功能，并具备完备的联机帮助功能；

(7)强大的数据库管理和存取操作的能力。2.答：任何一个软件都要占用计算机系统一定的资源，因此对计算机系统都有一定的要求，Visual Basic系统程序对计算机系统的要求如下：

硬件要求：586以上CPU，16MB以上内存，100MB以上硬盘等。软件要求：Windows 95/98/2000/XP或Windows NT。3.答：通常有以下三种启动方式：

(1)通过“开始”按钮：单击桌面上的“开始”/“程序”菜单，然后打开“Microsoft Visual Studio 6.0中文版”子菜单中的“Microsoft Visual Basic 6.0中文版”程序，即可启动VB 6.0。

(2)利用快捷方式：若桌面上有VB 6.0的快捷图标，双击快捷图标也可启动VB 6.0。(3)利用运行命令：当VB系统软件安装在C盘默认路径下时，可以在“开始”菜单的运行对话框中输入如下命令来启动VB 6.0。

C:Program FilesMicrosoft Visual StudioVB 98VB6.exe。4．答：通常有四种方式：

(1)利用文件菜单：单击菜单“文件”/“退出”，即可退出VB环境。(2)利用快捷方式：利用快捷键Alt+F4，即可退出VB环境。(3)利用标题栏：鼠标右击标题栏，选择“关闭”，即可退出VB环境。

(4)利用关闭按钮：鼠标单击窗口右上方“关闭”按钮，即可退出VB环境。

5．答：对象(Object)是包含现实世界物体特征的抽象实体，反映了系统为之保存信息和与之交互的能力。每个对象有各自的内部属性和操作方法，整个程序是由一系列相互作用的对象构成的，对象之间的交互通过发送消息来实现。

类(class)是指具有相同的属性和操作方法，并遵守相同规则的对象的集合。从外部看，类的行为可以用新定义的操作(方法)加以规定。

类是对象集合的抽象，规定了这些对象的公共属性和方法；而对象是类的一个实例。