实验一顺序结构程序设计(4学时)

《实验一顺序结构程序设计(4学时)》由会员上传分享，免费在线阅读，更多相关内容在学术论文-天天文库。

1、实验报告一课程VB藤紺娜贞目VisualBasic环境川鹏醐酿酣(4飾)成绩专必脚甜HSI师雜姓名谢雖学号201531100163实验日期2016年3月18日实验目的(1)娜VisualBasic6.0誠开发聰(2)霸屋VisualBasic程序的开发过程，能够运行1完整的VisualBasic程序(3)翼屋常用函数的使用方法(4)霸屋常用输入、输出语句实验内容—、vb环翩【实验1】设计一个简单VB程序(20分)(实验教材P5)它由一^窗体、4文本擬口3个命令按钮组成。窗体的标题为"VisualBasic程序设i标例'当用户单击命令按钮"显

2、示"时，文本框中出现"欢迎使用VisualBasic6.0",窗体上显示“你好"，单击命令按钮“清除"时,清除文本框中显示的内容和窗体上的内容，单击命令醐"鱗"时，麵酿通过该程序熟悉VB的界面，了解VB的工作原理：事件驱动翦錐果：[请娜的代码粘贴到TS]PrivateSubCommandl_ClickOTextl.Text="坎迎使用VisualBasic6.0"Forml.Print"你好"EndSubPrivateSubCommand2一ClickOTextl=""Forml.CIsEndSubPrivateSubCommand3一Cl

3、ickOEndEndSub［请糊尔的果的:粘贴到下面】*iVisualBasic程序设计示例你好欢迎使用VisualBasic60iSSI_淸除I结束I【实验2】分别定义八个变量，变量名为：varl、var2、var3、var4、var5、var6、var7側8，砌鑿類酸繳为：辨串型、觀、鹏单赫孚点里双精度浮点型、货币型'布尔型和日期型。皮照图2-2给出的形式为八个变＞赋值，并按照图2-4的样式进行输出。（20分）（卩15）耐该?戲、与翅翻含义。*贫里的定义和——型看类量1室菱变var2arV3arV4arVHelloWorld!10003

4、00001.005StringIntegerLongSingle：var5var6var7var8变呈傳：3.1415926100.1234True2015/5/1变呈类型：DoubleCurrencyBooleanDate翦維果：【请娜的代码粘贴到下面】OptionExplicitPrivateSubForm_Click()DimvarlAsStringDimvar2AsIntegerDimvar3AsLongDimvar4AsSingleDimvar5AsDoubleDimvar6AsCurrencyDimvar7AsBooleanDi

5、mvar8AsDatevarl="HelloWorld!":var2=1000var3=30000:var4=1.005var5=3.1415926:var6=100.1234var7=True:var8=#5/1/2015#PrintPrintTab(15);"varl";Tab(30);"var2";Tab(40);"var3";Tab(50);"var4nPrint"变量信:”:Tab(15);varl;Tab(30);var2;Tab(40);var3;Tab(50);var4Print"变量类现";Tab(15);TypeName

6、(varl);Tab(30);TypeName(var2);Tab(40);TypeName(var3);Tab(50);TypeName(var4)PrintPrintTab(15);"var5";Tab(30);”var6";Tab(40);"var7";Tab(50);"var8"Print"变量值:";Tab(15);var5;Tab(30);var6;Tab(40);var7;Tab(50);var8Print"变景类塑:";Tab(15);TypeName(var5);Tab(30);TypeName(var6);Tab(40)

7、;TypeName(var7);Tab(50);TypeName(var8)EndSubPrivateSubForm_LoadOForml.Caption="变量的定义和赋值"Forml.FontSize=13EndSub［请糊尔的果的:粘贴到糊变量名：var1var2var3var4变量僅：HelloWorld!1000300001.005变量类型：StringIntegerLongSingle变量名：var5var6var7var8变量僅：3.1415926100.1234True2015-5-1变量类型：DoubleCurrencyB

8、ooleanDate【实验3】编写程序，其功能为输入三角形的三边，求三角形的面积。计算公式为：S=(a+b+c)/2,画只=sqr(s*(s-a)*(s-b)*(s-c))(20