- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
基于VB可视化程序设计实验指导书.doc.doc
《基于VB可视化程序设计》/《VB程序设计》实验指导书
实验1 简单Visual Basic程序设计
一、实验目的
掌握使用Visual Basic 6集成环境,熟悉设计VB应用程序的步骤。
二、实验要求
按照实验题目的要求,编写程序并上机调试
三、实验设备
计算机、Windows 98 、Visual Basic 6
四、实验原理、方法
上机操作使用Visual Basic 6输入并调试程序
五、实验内容
掌握面向对象的可视化编程和事件驱动的编程机制;
题1:在运行中当用鼠标单击窗体时,窗体上显示出“欢迎您来到VB世界! ”
题2:设计一个应用程序,由用户输入正方形的边长,计算并输出正方形的面积
六、实验步骤
设计VB应用程序的大致步骤如下:
(1)建立用户界面的对象;
(2)设置对象的属性值;
(3)编写程序代码,建立事件过程;
(4)保存和运行应用程序
题1:在运行中当用鼠标单击窗体时,窗体上显示出“欢迎您来到VB世界! ”
设计步骤如下:
1. 创建窗体
在系统默认提供的窗体上输出若干文字,不必专门设计用户界面。
2. 编写程序代码,建立事件过程
代码窗口:进入;选择了对象和事件;编写程序代码
事件过程名,由两部分组成:对象名和事件名
3. 保存工程
保存窗体文件(.frm)和工程文件(.vbp)
4. 运行程序
执行“启动”命令,即用解释方式运行程序
执行“结束”命令,即可结束程序的运行
窗体显示情况
题2:设计一个应用程序,由用户输入正方形的边长,计算并输出正方形的面积
要创建的应用程序用户界面
窗体上含有两个标签、两个文本框和两个命令按钮,两个标签分别用于显示文字“边长”和“面积”,两个文本框用于输入数据和显示计算结果
程序功能要求:
运行时,用户在“边长”文本框中输入某一个数,当单击“计算”按钮时,则在“面积”文本框中显示该数的平方数。单击“结束”按钮,则结束程序的运行。
1. 创建窗体
在默认窗体Form1上添加控件,以构建用户界面
2. 在窗体上添加界面的控件
设置控件的方法
在Form1窗体上添加以下控件:
标签Label1:用于显示文字“边长”;
标签Label2:用于显示文字“面积”。
文本框Text1:用于边长数;
文本框Text2:用于显示计算结果(平方数)。
命令按钮Command1:用于计算输入数的平方,并把结果 显示在文本框Text2中;
命令按钮Command2:用于结束应用程序的运行。
3. 设置对象属性
在“属性窗口”中进行
设置以下对象的属性:
(1)设置窗体Form1的Caption(标题名)属性为“计算正方形的面积 ”。
(2)设置标签Label1的Caption属性为“边长”。
(3)设置标签Label2的Caption属性为“面积”。
(4)设置文本框Text1的Text(文本内容)属性为空。
(5)设置文本框Text2的Text属性为空。
(6)设置按钮Command1 的Caption属性为“计算”。
(7)设置按钮Command2 的Caption属性为“结束”。
其他属性采用默认值
4. 编写程序代码,建立事件过程
程序说明:Dim语句;数据类型Single(单精度);Val函数;语句“Text2.Text=x*x”的作用
5. 保存工程
保存窗体文件和工程文件
6. 运行程序
单击工具栏上的“启动”按钮,即可采用解释方式来运行程序。
运行后,在“边长”文本框中输入某一个数(如23),单击“计算”按钮时,系统会启动事件过程Command1_Click,则取数和运算,最后把计算结果显示在“面积”文本框(Text2)中。
单击“结束”按钮,可以启动事件过程Command2_Click,则执行End语句来结束程序的运行。
七、实验报告及记录格式
实验报告中必须有完整的程序清单,程序中必须有适当的注释,程序的运行结果。按金陵科技学院《实验报告(工科)》格式填写实验报告
八、实验注意事项
输入程序时应严格注意大小写。
注意记录编译调试过程中的出错信息和改正结果。
爱护机器,遵守规章制度。
文档评论(0)