《Visual Basic程序设计教程》自学指导书
作业及答案：
一 、选择题
1．为了使文本框显示滚动条，必须首先设置的属性是（ ）
A．AutoSize B．Alignment C．Multiline D．ScrollBars 2．改变控件在窗体中的上下位置应修改控件的（ ）属性。 A．Top B．Left C．Width D．Height 3． 在form1 窗体启动时，为使form1.text1文本框首先获得焦点，可以在窗体的form1_Load事件过程中加入（ ）语句。
A．text1.Index=0 B．text1.TabIndex=0 C．text1.Appearance D．text1.tag=0 4．将命令按纽Command1设置为不可见，应修改该命令按纽的（ ）属性。 A．Visible B．Value C．Caption D．Enabled
5．摇改变Label控件中文字的颜色，可以设置Label控件的（ ）属性。 A．FontColor B．FillColor C．ForeColor D．BackColor 6．执行后将会删除文本框Text1中选中的文本的语句是（ ）。 A．Text1.Text=” B．Text1.SelText=” C．Text1.Clear= D．Text1. SelText.Clear= 7．以下控件中没有Caption属性的是（ ）。
A．标签框 B．文本框 C．框架 D．命令按纽 8．复选框对象是否被选中，是由其（ ）属性决定的。 A．Checked B．Value C．Enabled D．Selected
9．要使ListBox可以单击或按空格键来实现复选，则属性MultSelect的值应设为（ ） A．1 B．2 C．3
10．以下不允许用户在程序运行时输入文字的控件是（ ）。
A．文本框 B．下拉式组合框 C．简单组合框 D．下拉式列表框 11．不能通过（ ）来删除列表框中的选择项。
A．List属性 B．RemoveItem方法 C．Clear方法 D．Text属性
12．组合框的3中不同风格：下拉组合框、简单组合框和下拉列表框由（ ）属性决定。 A．Style B．BoderStyle C．FillStyle D．DrawStyle
13．单击滚动条两端的任意一个滚动箭头，将触发该滚动条的（ ）事件。 A．Scroll B．KeyDown C．Change D．DragOver
14．要将定时器控件的宽度设置增大一些，以下叙述正确的是（ ）。 A．设置定时器的Width属性 B．设置定时器的Left属性
C．设置定时器的Height属性 D．无法对定时器的宽度进行设置 15．设计动画时通常使用时钟控件（ ）来控制动画速度。 A．Enabled B．Interval C．Timer D．Move 16．可以使用SetFocus方法的控件是（ ）
A．Frame B．Label C．Form D．Timer 17．不能响应Click事件的控件是（ ）
A．列表框 B．图片框 C．窗体 D．计时器
18．定时器的Interval属性以（ ）为单位指定Timer事件之间的时间间隔。 A．分 B．秒 C．毫秒 D．微秒二、问答题 二、填空题
1．函数过程（Function Pocedure）用来完成特定的功能并____。
1
2．子过程是____的函数。又常被称为Sub过程。在事件过程或其它子过程中可以____调用过程。
3．在事件过程或其它过程中可以____调用函数过程。 4．函数过程____返回一个值。
5．VB的代码存储在模块中。在VB中提供了三种类型的模块：____ 、____和____。 6．菜单控件只包一个事件____，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。
7．使用菜单编辑器创建弹出菜单时，____为不可见，“Visible属性设置为False。 8．Sub过程与Function过程最根本的区别是____。
9．通用过程可以通过执行“工具”菜单中的____命令来建立。
10．使用Public Const语句声明一个全局的符号常量时，该语句应放在____ 。 三、问答题
1．什么是多文挡界面？（MDI） 2．什么是文件？
3．文件管理系统有什么作用？ 4．文件系统有哪些控件？
5．磁盘驱动器列表发生变动后，如何通知目录列表？ 6．目录列表发生变动后，如何通知文件列表？ 7．文件按照其数据存放的方式，分为几种类型？ 8．如何打开顺序文件？ 9．如何关闭顺序文件？
10．如何向磁盘中读写数据？ 11．讨论一下PathName属性。
12．顺序文件、随机文件和二进制文件各有什么特点和用途？ 13．什么是工程？ 14．什么是过程？
15．选中一个窗体，启动菜单编辑器的方法有哪三种？ 16．什么是动态菜单？
17．已知弹出菜单的名是aa，填补弹出菜单的代码。
18．现使用菜单编辑器设计弹出菜单。菜单第一项（使顶级菜单项目）的Caption为“弹出菜单”，Name：“aa”，Visible没有选中，填补弹出菜单的代码。 四、编程题
1．编写程序，计算1+2+3+4+…+100。
2．我国现有人口为12亿，设年增长率为1%，编写程序，计算多少年后增加到16亿。 3．给定三角形的三条边长，计算三角形的面积。编写程序，首先判断给出的三条边能否构成三角形，如可以构成，则计算并输出该三角形的面积，否则要求重新输入。当输入-1时结束程序。
4．税务部门征收所得税，规定如下： （1）收入在200元以内，免征；
（2）收入在200~400内，超过200元的部分纳税3%； （3）收入超过400元的部分，纳税4%；
（4）当收入达到5000元或超过时，将4%税金改为5%。 编程序实现上述操作。
5．编写程序，打印如下所示的“数字金字塔”：
2
1 1 2 1
1 2 3 2 1 1 2 3 4 3 2 1
1 2 3 4 5 6 7 8 9 8 7 6 5 4 3 2 1
6．从键盘上输入两个正整数M和N，求最大公因子。
7．从键盘上输入一个学生的学号和考试成绩，然后输出该学生的学号、成绩，并根据成绩按下面的规定输出对该学生的评语：
成绩 80~100 60~79 50~59 40~49 0~39 评语 Very good Good Fair Poor Fail 一 、选择题
1．C 2．A 3．B 4．A 5．C 6．B 7．B 8．B 9．1
10．D 11．D 12．A 13．C 14．D 15．B 16．C 17．D 18．C 一、填空题
1． 返回相应的结果 2． 没有返回值 按名称 3． 按名称 4． 以该函数名 5．窗体模块 标准模块 类模块 6．Click 7．顶级菜单项目
8．Sub过程的过程名不能返回值，而Function过程能通过过程名返回值 9．添加过程 10．标准模块的通用声明段 1．什么是多文挡界面？（MDI）
解答：多文挡界面（Mu1tiple Document Interface）是指在一个父窗口下面可以同时打开多个子窗口。子窗口归属于父窗口，如果父窗口关闭，则所有子窗口全部关闭。 2．什么是文件？
解答：所谓文件是指存放在外部存储介质上的数据和程序等。 3．文件管理系统有什么作用？
解答：为了方便用户存取，在现代的计算机系统中，都包含有文件管理系统。用户可以对文件进行各种各样的处理和操作，如选择、打开和删除等。 4．文件系统有哪些控件？
解答：在VB6.0中包括四个文件类控件，它们分别是DriveListSox控件、DirListBox控件、FileListBox控件和CommDialog控件。
5．磁盘驱动器列表发生变动后，如何通知目录列表？ 解答：
Private Sub Drive1_Change（）
Dir1.Path = Drive1.Drive ’设置DirListBox控件的路径与DriveListBox控件同步。 End Sub
6．目录列表发生变动后，如何通知文件列表？ 解答：
Private Sub Dir1_Change（） File1.Path = Dir1.Path End Sub
7．文件按照其数据存放的方式，分为几种类型？
解答：按照文件的存取方式及其组成结构可以分为两种类型：顺序文件和随机文件。 8．如何打开顺序文件？
解答：打开顺序文件的语法结构如下：
Open pathname For mode [Access access ] [lock] As [#] filenumber [Len = reclength]
3
Open语句的语法参数及其说明如下所示： 参数 说明 Pathname 指定文件路径和文件名
Mode 指定文件方式，有Append，Binary，Input,Output或Random方式。 Access 说明打开的文件可以进行的操作，有Read，Write或Read Write操作
Lock 说明其它进程能够对打开的文件进行的操作，有Shared，Lock Read，Lock Write和Lock Read Write操作。 Filenumber 一个有效的文件号，范围在1到511之间
Reclength 小于或等于32 767（字节）的一个数，对于用随机访问方式打开的文件， 该值就是记录长度，对于顺序文件，该值就是缓冲字符数。 9．如何关闭顺序文件？
解答：Close < 文件号1 > [，< 文件号2 > …] 10．如何向磁盘中读写数据？
解答：从顺序文件中读取数据的语法结构如下： Input # filenumber,varlist
Input # 语句的语法参数及其说明如下： Filenumber 有效的文件号
Varlist 用逗号分界的变量表，将文件中读出的值分配给这些变量。 向顺序文件中写入数据的语法结构如下： Write # filenumber ，[output1ist]
Write # 语句的语法具有以下几个部分，它的参数及说明如下： Filenumber 一个有效的文件号
Outputlist 要写入文件的表达式，用逗号将这些表达式分界。 11．讨论一下PathName属性。
解答：pathname为所要执行的应用程序的名称及其路径和必要的参数。 12．顺序文件、随机文件和二进制文件各有什么特点和用途？
解答：所谓顺序文件，通常指的是普通的文本文件，文件中的字符包括文本字符及控制字符，如“，”，Chr（14）”，换行符“GR，LF”，“Chr（13）”，“Chr（10）”等。 由于这类文件的信息是按照顺序从头到尾按顺序排列，而且只提供第一条记录的存储位置，所以对其中的数据信息进行处理是相当困难的。
随机文件由记录组成，能够随机存取其相同长度的数据记录，每一数据记录内可以设计各种栏位以容纳不同的数据。此种文件数据是以二进制的位的形式保存在磁盘上。随机文件比顺序文件占用内存多。
二进制文件的数据是以二进制格式保存的,能用来存储任何数据。这种文件的灵活性最大，但程序的工作量大。二进制访问能够提供对文件的完全控制，因为文件中的字节可以代表任何东西。
13．什么是工程？ 解答：工程是构成应用程序文件的集合。工程文件是与工程相关联的所有文件和对象以及所设置的环境信息的一个简单的列表，所有文件和对象也可以被其它的工程所共享。 14．什么是过程？ 解答：一个应用程序是由若干个模块组成的，而每个模块又是由若干个更小的代码片段组成，将组成这些模块的代码片段称为过程。通过过程，可以将整个程序按功能进行分块，每个过程用来完成一项特定的功能。
15．选中一个窗体，启动菜单编辑器的方法有哪三种？
4
解答：（1）使用菜单“工具”/（菜单编辑器） （2）使用工具栏按钮工具栏快捷键；（3）键盘快捷键CTRL+E 16．什么是动态菜单？
解答：动态菜单，就是菜单中列出了最近使用过的文件名，这部分内容是随着应用程序的运行而不断改变着的，在运行时使菜单可以增长。
17．已知弹出菜单的名是aa，填补弹出菜单的代码。
解答：Private Sub Form_MouseDown（Button As Integer,Shift As Integer，X As Single，Y As Single）
’在窗体上按下鼠标。
If Btton = 2 Then ′如果是右键。 PopupMenu aa ′弹出菜单。 End If End Sub
18．现使用菜单编辑器设计弹出菜单。菜单第一项（使顶级菜单项目）的Caption为“弹出菜单”，Name：“aa”，Visible没有选中，填补弹出菜单的代码。
解答：Private Sub Form_MouseDown（Button As Integer,Shift As Integer，X As Single，Y As Single）
′在窗体上按下鼠标。
If Btton = 2 Then ′如果是右键。 PopupMenu aa ′弹出菜单。 End If End Sub 四、程序题
1．编写程序，计算1+2+3+4+…+100。 解答：使用For循环语句，程序如下： Private Sub Form_Click( ) Static Sum As Integer For I =1 To 100 Sum = Sum + I Next I Print Sum End Sub
程序运行后，单击窗体，输出结果为：5050。 如果使用当循环语句，则程序如下： Private Sub Form_Click( ) Static Sum As Integer I=1
While i<=100 Sum=Sum+I I=I+1 Wend Print Sum End Sub
5
《VisualBasic程序设计教程》自学指导书
