实验一 Visual Basic环境和简单程序设计 一、实验目的 1．掌握Visual Basic启动和退出的方法。 2．熟悉Visual Basic的集成开发环境。 3．掌握Visual Basic程序设计的基本步骤。 4．掌握基本控件（标签、命令按钮和文本框）的基本使用方法。 二、实验内容 1 启动Visual Basic，然后创建一个“标准 EXE”工程。了解Visual Basic集成开发环境下各组成部分及其作用。 【要求】 （1）在集成开发环境中分别寻找“窗体窗口”、“属性窗口”、“工程资源管理器”、“窗体布局窗口”、“工具箱窗口”，熟悉它们的默认位置。 （2）在“视图”或“工程资源管理器”中切换显示“代码窗口”和“窗体窗口”。 （3）在“视图”菜单中点击“立即窗口”，观察刚刚显示出来的“立即窗口”。 （4）尝试分别将各部分关闭，然后再用“视图”菜单中对应的菜单命令将其显示。 2 编写一个简单的应用程序。要求窗体的标题为“简单VB实验”；窗体中有一个标题为“显示”的按钮；单击该按钮后在窗体上显示红色的“广西师范学院”。 【步骤】 （1）设计应用程序的界面：在窗体上创建一个命令按钮Command1、一个标签Label1。 （2）设置对象的属性 对象名称 Form1 Label1 Command1 （3）编写事件代码： Private Sub Command1_Click() Label1.Caption = \广西师范学院\End Sub （4）程序的运行及保存。 【提示】 属性名称 Caption ForeColor Caption 属性值 简单VB实验 红色 显示 在窗体上显示“广西师范学院”有两种方法： （1）用Print方法：设置窗体的前景色为红色。 （2）用一个标签控件：设置标签控件的前景色为红色。 【思考】为什么在以上两种方法中在颜色的设置问题上有所不同？ 3 通过编程修改控件的属性。 【要求】 （1）进入程序设计的界面如图1-1（a）。 （2）点击“单击此处”按钮后程序运行的界面如图1-1(b)。 【步骤】 （1）在窗体中创建一个标签Label1、一个命令按钮Command1。 （2）在属性窗口中设置对象的属性： 对象名称 Form1 Label1 Command1 属性名称 Caption Caption Caption 属性值 设计界面 请留意此处 单击此处 （3）在Command1的Click事件中编写程序代码： Private Sub Command1_Click() Form1.Caption = \编程后界面\ Label1.Caption = \欢迎您使用VB 6.0\ Command1.Caption = \运行结果\End Sub 【提示】 可以通过两种方法设置对象的属性： （1）在程序设计状态，通过属性窗口对该属性进行修改或设置。 （2）在程序运行状态，通过程序中的语句动态地更改对象的属性。修改对象属性的语句格式： 对象名.属性名称=新设置属性值 实验二 顺序结构程序设计 一、实验目的 1．掌握常量和变量、表达式的基本概念和正确书写格式。 2．掌握赋值语句和常用函数的正确使用方法。 3．掌握输入、输出对话框（InputBox和MsgBox）的基本使用方法。 二、实验内容 1 假设有变量a=2,b=5,c=4,d=3,e=6，编写程序，计算表达式a+b>c and d*a=e的值，将结果打印在窗体上。 【提示】 注意复合表达式的运算顺序。 【思考】复合表达式按什么样的顺序运算？ 2 编写程序，界面如图2-1所示。使得单击一次按钮可以产生一个[60,90]之间的随机数并显示在标签Label1上，再求出该数的正弦值，将结果写在标签Label2上。 【步骤】 （1）设计应用程序的界面：在窗体上创建一个命令按钮Command1、两个标签Label1和Label2。 （2）设置对象的属性 对象名称 Form1 Command1 Label1 Label2 （3）编写事件代码： Private Sub Command1_Click() Dim x!, y! Randomize x = Rnd * 31 + 60 属性名称 Caption Caption Caption Caption 属性值 随机数的正弦值 下一个随机数 y = Sin(x) Label1.Caption = \随机数（60-90）：\ Label2.Caption = \正弦值 ：\ End Sub （4）程序的运行及保存。 【提示】 （1）使用Rnd函数产生随机数，注意，为了防止两次运行程序的随机数序列相同，调用Rnd之前先用Randomize语句进行初始化。 （2）产生某闭区间内的随机数的公式为：(上限-下限+1)*rnd+下限。 （3）求正弦值函数为：sin()。 【思考】怎样产生一个[60,90]之间的随机数？ 3 编写一个华氏温度F与摄氏温度C之间转换的应用程序，界面如图2-2所示。其中F与C之间的关系9F?C?325为：。 【步骤】 （1）设计应用程序的界面：在窗体上创建两个命令按钮Command1和Command2、两个标签Label1和Label2、两个文本框Text1和Text2。 （2）设置对象的属性 对象名称 Form1 Command1 Command2 Label1 Label2 Text1 Text2 （3）编写事件代码： 属性名称 Caption Caption Caption Caption Caption Text Text 属性值 温度转换 > < 华氏温度 摄氏温度 Private Sub Command1_Click() Dim f!, c! f = Val(Text1.Text) c = (f - 32) * 5 / 9 Text2 = Str(c) End Sub Private Sub Command2_Click() Dim f!, c! c = Val(Text2.Text) f = 9 / 5 * c + 32 Text1 = Str(f) End Sub （4）程序的运行及保存。 4 求圆的面积及圆柱体的体积，界面如图2-3所示。 【步骤】 （1）设计应用程序的界面：在窗体上创建两个命令按钮Command1和Command2，四个标签Label1、Label2、Label3和Label4，四个文本框Text1、Text2、Text3和Text4。 （2）设置对象的属性 对象名称 Command1 Command2 Label1 Label2 Label3 Label4 属性名称 Caption Caption Caption Caption Caption Caption 属性值 求圆的面积 求圆柱的体积 圆的半径 圆柱的高 圆的面积 圆柱的体积 Text1、Text2、Text3、Text Text4
vb实验答案
