实验一visualbasic环境和简单程序设计

《实验一visualbasic环境和简单程序设计》由会员上传分享，免费在线阅读，更多相关内容在学术论文-天天文库。

1、实验一VisualBasic环境和简单程序设计一、实验目的1.熟悉VisualBasic的集成开发环境。2.掌握VisualBasic程序设计的基本步骤。3.掌握基本控件(标签、命令按钮和文本框)的基本使用方法。4.掌握常量和变量、表达式的基本概念和正确书写格式。5.掌握赋值语句和常用函数的正确使用方法。二、实验内容1.通过编程修改控件的属性。【要求】(1)进入程序设计的界面如图1-1(a)。(2)点击“单击此处”按钮后程序运行的界面如图l-l(b)。Cb)图1-1实验1-3的运行界面【步骤】(1)在窗体中创建一个标签Labell、一个命令按钮CommandK(2)在属性窗口

2、中设置对象的属性：对象名称属性名称属性值FormlCaption设计界面LabellCaption请留意此处CommandlCaption单击此处(3)在Commandl的Click事件中编写程序代码：PrivateSubCommandl_Click()Form1.Caption="编程后界面"Label1.Caption="欢迎您使用VB6.0"Command1.Caption=”运行结果"EndSub【提示】可以通过两种方法设置对象的属性：(1)在程序设计状态，通过属性窗口对该属性进行修改或设置。(1)在程序运行状态，通过程序屮的语句动态地更改对象的属性。修改对象属性的语

3、句格式：对象名.属性名称=新设置属性值1.编写程序，界面如图2-1所示。使得单击一次按钮可以产生一个［60,90］之间的随机数并显示在标签Labell上，再求出该数的正弦值，将结果写在标签Label2上。囝2-1实验2-2程序运行界面【步骤】(1)设计应用程序的界面：在窗体上创建一个命令按钮Commandl、两个标签Labell和Label2。(2)设置对象的属性对象名称属性名称属性值Form1Caption随机数的正弦值Command1Caption下一个随机数Label1CaptionLabel2Caption(2)编写事件代码：PrivateSubCommand1Cli

4、ck()DimxasSingle,yasSingleRandomizex=Rnd*31+60y=Sin(x)Labell.Caption=〃随机数(60-90):〃&Str(x)Label2.Caption=〃正弦值：〃&Str(y)EndSub(3)程序的运行及保存。【提示】(1)使用Rnd函数产生随机数，注意，为了防止两次运行程序的随机数序列相同，调用Rnd之前先用Randomize语句进行初始化。(2)产生某闭区间内的随机数的公式为：(上限-下限+l)*rnd+下限。(3)求正弦值函数为：sin()。1.编写一个华氏温度F与摄氏温度C之间转换的应用程序，界面如图2-2所

5、示。其中F与F=-C+32C之间的关系为：5图2-2实验2-3的运行界面图【步骤】(1)设计应用程序的界面：在窗体上创建两个命令按钮Commandl和Command2、两个标签Label1和Label2、两个文本框Textl和Text2。(2)设置对象的属性对象名称属性名称属性值Form1Caption温度转换CommandlCaption>Command2Caption

6、sSinglef=Val(Textl.Text)c=(f-32)*5/9Text2=Str(c)EndSubPrivateSubCommand2_Click()DimfasSingle,casSinglec=Val(Text2.Text)f=9/5*c+32Textl=Str(f)EndSub(1)程序的运行及保存4.求圆的面积及圆柱体的体积，界面如图2-3所示。图2-3实验2-4运行界面图【步骤】(1)设计应用程序的评面：在窗体上创建W个命令按钮Commandl和Command2，四个标签Labell、Label2、Label3和Label4,四个文本框Textl、Text

7、2、Text3和Text4。(2)设置对象的属性对象名称属性名称属性值Command1Caption求圆的而积Command2Caption求圆柱的体积Label1Caption圆的半径Label2Caption圆柱的高Label3Caption圆的面积Label4Caption圆柱的体积Textl、Text2、Text3、Text4Text(3)编写事件代码：PrivateSubCommandl_Click()DimrAsSingle,sAsSingler=Val(Text1.Text)s=3.141