中国地质大学(武汉)远程与继续教育学院
VB程序设计课程作业1（共4 次作业）
学习层次：专升本涉及章节：第1章——第4章
一、判断题
1．在Visual Basic中，有一些通用的过程和函数作为方法供用户直接调用。

2．在面向对象的程序设计中，对象是指可以访问的实体。

3．事件是由Visual Basic预先定义的对象能够识别的动作。

4．由Visual Basic语言编写的应用程序有解释和编译两种执行方式。

5．“事件过程”是用来完成事件发生后所要执行的程序代码。

6．在逻辑运算符Not、Or、And中，运算优先级由高到低依次为Not、Or、And。

7．用DIM定义数值变量时，该数值变量自动赋初值为0。

8．函数InputBox的前3个参数分别是输入对话框的提示信息、标题以及默认值。

9．函数MsgBox的前3个参数分别表示默认按钮、按钮样式以及图标样式。

二、选择题
1．在设计模式双击窗体中的对象后，Visual Basic将显示的窗口是。

A、项目（工程）窗口
B、工具箱
C、代码窗口
D、属性窗口2．窗体的FontName属性的缺省值是。

A、宋体
B、仿宋体
C、楷体
D、黑体3．将Visual Basic编制的程序保存在磁盘上，至少会产生何种文件。

A、.doc与.txt B、.com与.exe C、.bat与.frm D、.vbp与.frm 4．运算符“\”两边的操作数若类型不同，则先再运算。

A、取整为Byte类型
B、取整为Integer类型
C、四舍五入为整型
D、四舍五入为Byte类型
5．Print语句的一个输出表达式为，则输出包括日期、时间信息。

A、Date
B、Month
C、Time
D、Now
6. 语句Print "5*5" 的显示结果是。

A、25
B、"5*5"
C、5*5
D、出现错误提示7．语句“Form1.Print T ab(10);"#"”的作用是在窗体当前输出行。

4 A、第10列输出字符“#”B、第9列输出字符“#”
C、第11列输出字符“#”
D、输出10个字符“#”
三、填空题
1．事件是由Visual Basic预先定义的能够识别的动作。

2．新建工程时系统会自动将窗体标题设置为。

3．长整型变量（Long类型）占用个字节。

4．表达式81 \ 7 Mod 2 ^ 2的值是。

5．用随机函数产生一个两位整数的Visual Basic表达式是。

6．#20/5/01#表示类型常量。

7．设I为大于0的实数，写出大于I的最小整数的表达式。

四、程序设计题
1．编程，输入圆的半径，计算并输出圆的面积，按下列要求分别实现：
（1）界面设计尽可能美观、大方。

（2）创建一个文本框控件用于输入，单击命令按钮后通过标签控件显示计算结果。

（3）修改界面和程序：单击命令按钮后，调用Inputbox函数输入数据，通过标签控件显示计算结果。

（4）新建一个文件夹，保存工程（工程文件、窗体文件等等，可以用缺省的名称，也可以重命名）在该文件夹中，然后退出Visual Basic。

（5）求计算结果具有15位有效位数，重新打开工程，检查程序并决定是否修改。

参考答案
一、判断题
1．√2．√3．√4．√5．√6．×7．√8．√9．×
二、选择题
1．C 2．A 3．D 4．C 5．D 6. C 7．A
三、填空题
1．对象
2．Form1
3．4
4．3
5．10 + Int( Rnd * 90 )
6．日期
7．Int(x)+1
四、程序设计题
1．界面设计略，过程设计如下：
方法一、用文本框控件输入圆的半径
Private Sub Command1_Click()
Dim x As Single
x = Text1.T ext
Label1.Caption = x * x * 3.141593
End Sub
方法二、用InputBox函数输入圆的半径
Private Sub Command1_Click()
Dim x As Single '若要求计算结果具有15位有效位数，声明x为Double类型x = InputBox("r=","输入圆的半径")
Label1.Caption = x * x * 3.141593
End Sub。