环境信息系统实验指导书.docx
- 文档编号:7827861
- 上传时间:2023-01-26
- 格式:DOCX
- 页数:20
- 大小:317.16KB
环境信息系统实验指导书.docx
《环境信息系统实验指导书.docx》由会员分享,可在线阅读,更多相关《环境信息系统实验指导书.docx(20页珍藏版)》请在冰豆网上搜索。
环境信息系统实验指导书
《环境信息系统》实验
指导书
地理信息系统实验室编
绵阳师范学院资源环境工程学院
年月日
实验一VB语言开发环境和简单程序设计
一、实验目的
1.熟练掌握VB的启动和关闭。
2.了解VB程序的集成环境。
3.掌握运行一个VB程序的步骤。
4.掌握VB程序的开发过程。
5..学会使用帮助
二、实验准备
1.局域网多媒体微机实验室;
2.vb6.0软件
三、实验要求
(1)正确理解面向对象的各种概念;
(2)按实验内容进行实验,理解基本的程序设计过程
(3)选择“自行设计练习:
”中的题进行编程设计,书写实验报告。
实验类型:
验证性实验学时:
2学时
四、实验内容与步骤
(一)相关知识
1.VisualBasic6.0的启动与退出
VisualBasic6.0的启动与退出与一般的Windows应用程序的启动与退出一样,可以通过“开始”菜单启动VisualBasic6.0,也可以将VisualBasic6.0程序以快捷方式放在桌面上,然后双击该图标将其启动;退出可以在“文件”中选择“退出”、或双击窗口控制菜单图标、或单击窗口关闭按钮。
2.VisualBasic6.0的集成开发环境
VB6.0的集成开发环境在一个公共环境中集成了设计、编辑、编译和调试等许多不同的功能,它由菜单、工具栏、工具箱、浏览器及完成各种特定功能的窗口组成。
3.VB应用程序的开发过程
VB采用的是一种“可视化”的编程方法,可以先设计应用程序的外观,然后再编写不同部件的程序代码。
4.VB中对象的概念
对象是基本的运行时的实体,它既包括了数据(对象属性),也包括作用于对象的操作(方法)和对象的响应(事件)。
对象的属性用来表示对象的状态,对象的方法决定了对象可以进行的操作。
不同的对象具有不同的属性和方法,VB中最主要的两种对象是窗体和控件,程序设计中,基本的设计机制就是改变对象的属性、使用对象的方法和为对象编写事件过程。
5.VB6.0的帮助功能
VB6.0是VisualStudi06.0的套件之一,VB6.0本身并不带帮助,微软公司为VisualStudio6.0提供了一套MSDNLibrary帮助系统。
MSDN(MicrosoftDeveloperNetwork)是使用Microsoft开发工具或是以Windows或Internet为开发平台的开发人员的基本参考,它是一本集程序设计指南、用户使用手册以及库函数于一体的电子词典,使用MSDNLibrary的帮助功能,不仅可以引导初学者入门,还可帮助各种层次的用户完成应用程序的设计。
(二)实验举例
(实例1)VB的启动与退出。
(1)启动VB6.0
通过“开始”菜单启动VisualBasic6.0,操作步骤为:
1单击Windows桌面任务栏的“开始”按钮,弹出“开始”菜单,将鼠标指针指向“程序”选项,在“程序”项的级联菜单中选中“MicrosoftVisualBasic6.0中文版”,然后在其打开的下级级联菜单中将光标条定位在“MicrosoftVisualBasic6.0中文版”命令上。
2单击鼠标左键,屏幕出现如图1-1所示的VisualBasic6.0启动画面。
③要建立一个新的工程,选择“新建”选项卡,从中选择“标准EXE”项(默认),然后单击“打开”按钮,进入如图1-2所示的VB6.0应用程序集成开发环境。
图1-1启动VB6.0
(2)退出VB
在图1-2所示的VisualBasic6.0应用程序集成开发环境窗口中,从“文件”菜单中选择“退出”命令、或双击窗口控制菜单图标、或单击窗口关闭按钮均可退出VisualBasic6.0。
在退出时,系统可能会提示用户保存工程文件和窗体文件,有关保存文件的操作在实例3中进行详细说明。
(实例2)进入VB集成开发环境。
1.VB的三种工作模式
(1)设计模式:
启动VB,选择新建一个新的工程,进入如图1-2所示的VisualBasic6.0集成环境。
此时,标题栏中的标题为“工程1—MicrosoftVisualBasic[设计]”,表明集成开发环境处于设计模式。
(2)运行模式:
用鼠标单击工具栏中的“”按钮(启动),或在“运行”菜单中选择“启动”命令,此时,标题栏中的标题为“工程1-MicrosoftVisualBasic[运行],表明集成开发环境处于运行模式。
(3)中断模式:
在“运行”菜单中选择“中断”命令,或按(Ctrl+Break)键,此时,标题栏中的标题为“工程1-MicrosoftVisualBasic[break]”,表明集成开发环境处于中断模式。
2.VB集成开发环境中的各种窗口(如1-2所示)
(1)窗体窗口
(2)属性窗口
(3)工程资源管理器窗口
(4)代码窗口
(5)工具箱
3.打开VB集成开发环境中的工具栏
(1)在“视图”菜单中选择“工具栏”,在它的级联菜单中列出VB提供的工具栏及当前工具栏的状态。
(2)选择“编辑”命令,打开编辑工具栏。
(3)选择“窗体编辑器”命令,打开窗体编辑器工具栏。
(4)选择“调试”命令,打开调试工具栏。
(实例3)建立一个简单的VB应用程序
首先建立一个自己的文件夹,以便将练习中生成的各种文件保存在该文件夹中,这里在E盘建立一个VBSY文件夹。
1.建立一个新的工程
启动VB6.0,选择新建一个新的工程,此时进入到VB6.0集成开发环境,屏幕上出现一个默认的“Forml”窗体。
2.设置窗体属性
选中窗体窗口中的窗体,在属性窗口中选中(名称)属性,将其属性值改为“Frmexp”;再选中Caption属性,然后在右边列中输入“窗体”,此时窗体的标题栏变为“窗体”,窗体窗口的标题栏为“工程1—Frmexp(Form)”。
3.在窗体上绘制控件
(1)用鼠标单击工具箱中的标有“A”的按钮(标签),在窗体的合适位置画出一个矩形区域,在窗体上出现一个标签控件,用鼠标选中该控件,然后在属性窗口中将其(名称)属性设为“LblDisp”;Caption属性设为“VB集成开发环境”。
(2)用鼠标单击工具箱中的命令按钮,在窗体的合适位置画出一个命令按钮,用鼠标选中该命令按钮,然后在属性窗口中将其(名称)属性设为“cmdDisp”;Caption属性设为“显示”。
(3)在窗体中再添加一个命令按钮,然后将其(名称)属性设为“cmdClear'’;Caption属性设为“清除”。
窗体如图1-3所示。
图1-3窗体设计画面图1-4代码窗口
4.编写程序代码
(1)双击“显示”按钮,打开代码窗口,如图1-4
所示,然后输入如下代码:
PrivateSubcmdDisp_CliCk()
LblDiSp.ViSible=True
EndSub
(2)在代码窗口的对象列表框中选择对象“cmdClear”;在过程列表框中选择事件Click(如图1-4),然后输入如下代码:
PrivateSubcmdClear_Click()
LblDisp.Visible=False
EndSub
5.运行程序
关闭代码窗口,用鼠标单击工具栏中启动按钮。
此时,程序开始运行,并出现图1-5画面,单击“清除”按钮,窗口上的文字消失;单击“显示”按钮,又使文字显示出来。
图1-5运行程序窗口
6.保存文件
在选择“文件”→“保存工程”菜单命令,或单击工具栏中的“保存工程”按钮。
由于是第一次保存文件,因此在弹出的文件另存为对话框中提示保存窗体文件,将窗体文件保存在E盘的VBSY文件夹下并起名为Vbsy1_1.frm,此时,系统会继续提示保存工程文件,将工程文件也保存在E盘的VBSY文件夹下并起名为Vbsyl_1.vbp。
7.生成可执行文件
选择“文件”→“生成Vbsyl_1.exe”菜单命令,弹出“生成工程”对话框,此时可执行文件名已默认为Vblsy_1.exe,如图1-6所示。
在该对话框中单击“选项”按钮,打开“工程属性”对话框,如图1-7所示,在该对话框中可以设置版本号、版本信息、编译选项等。
最后单击“确定”按钮进行编译。
图1-6“生成工程”对话框图1-7“工程属性”对话框
8.运行可执行文件
在E盘的VBSY文件夹下双击Vbsyl—1.exe文件,运行该可执行文件。
启动该程序后的窗口如图1-5所示。
‘
(实例4)使用VB的帮助。
选择“帮助”→“内容”菜单命令,弹出“MSDNlibraryVisualStudi06.0”窗口。
1.利用目录浏览主题
选择“目录”标签,在左侧主题窗口中依次单击“ⅥsualBask文档”→“使用Ⅵsual BaSic”→“程序员指南”→“ⅥSual BaSiC基础”→“窗体、控件和菜单”,最后选择“设计窗体”主题,此时右侧窗口中显示出相应内容。
2.利用索引查找信息
选择“索引”标签,在“键入要查找的关键字”输入框中输入“SelectCase”,此时光标定位在索引项的列表的“SelectCase块”项目上,单击“显示”按钮,右侧窗口中即显示出相应内容。
简单程序设计
1.建立一个简单的应用程序,其窗体界面如下,单击窗体,则在窗体上显示“欢迎使用VisualBasic!
”,反复练习建立一个VisualBasic应用程序的步骤。
自行设计练习:
(1)建立一简单用户登录界面,并在其上分别放置Label、Text、Command控件,更改其相应属性;
(2)建一简单窗体,其上有一Command控件,并实现当点击此控件时,其Caption属性为1+2+3+…+99+100的和值。
实验二VB中窗体和基本控件应用
一、实验目的
(1)掌握VB6.0窗体的常用属性、常用事件和重要方法。
(2)掌握在VisualBasic6.0窗体上生成控件的方法。
(3)掌握设置启动窗体的方法。
(4)了解窗体的生命周期。
(5)掌握标签、命令按钮、文本框的常用属性、重要事件和基本方法。
(6)熟练掌握在窗体上创建上述控件的操作方法。
二、实验准备
1局域网多媒体微机实验室;
2vb6.0软件
三、实验要求
写出实验报告。
四、实验内容与步骤
(一)基础知识
1、窗体是VB中的对象,具有自己的属性、事件和方法。
●属性:
窗体的属性决定了窗体的外观和操作。
窗体属性既可以在程序设计时在“属性”窗口中手工设置,也可以在程序运行时由代码来实现。
●常用事件:
窗体常用的事件有Load、Click、DblClick、Activate和Deactivate等。
其中Load事件是当窗体被装入工作区时触发的事件,常用来在启动应用程序时对属性和变量进行初始化。
Activate是当一个窗体成为活动窗口时所触发的事件,Deactivate是当另一个窗体或应用程序被激活时,当前窗体所发生的事件。
●常用方法:
窗体的方法很多,其中许多方法都调用文本和图形,用于直接在窗体表面上输出、写或画,如:
Print、Circle等。
还有一些方法对窗体的行为产生影响,如Show方法使—个窗体可见;Hide方法用于隐藏一个窗体。
2、在窗体上添加控件
窗体是设计VB应用程序的一个基本平台,几乎所有的控件都是添加在窗体上的。
对于生成的控件,可以调整控件大小、移动控件位置、使用网格精确定位控件;对于多个控件,还可以对它们进行排列、调整大小等操作。
另外,在VB中还允许可视地创建和编辑控件数组,这对于编组使用选择框、命令按钮等控件提供了很大方便。
3、设置启动窗体
在默认情况下,应用程序中的第一个窗体被指定为启动窗体。
应用程序开始运行时,此窗体就被显示出来。
如果想在应用程序启动时显示别的窗体,可以将其他窗体设置为启动窗体。
4、窗体的生命周期
VB窗体在整个存活期中有4种状态,即创建状态、加载状态、可见状态和卸载状态。
一些程序运行所必须的初始化操作和退出前的善后工作(例如退出应用程序前提示存盘),往往要在窗体创建以及退出时被激活的事件过程中进行。
5.VisualBasic6.0的常用控件
VB窗体上可以放置各种不同的部件,即控件对象,简称控件。
控件按广义可分为:
内部控件、ActiveX控件和可插入的对象3种。
(1)控件的属性
每一个控件都有自己的属性,不同的控件虽然有许多不同于其他控件的自己独有的属性,但也有许多属性是许多控件都具有的,它们在各自控件中的含义也相同。
(2)焦点的概念
焦点是接收用户鼠标或键盘输入的能力。
大部分控件可以接收焦点,但Frame、Label、Menu、Line、Shape、Image和Timer等不能接收焦点。
(3)Tab键顺序
所谓Tab顺序,就是按(Tab)键时焦点在各个控件上移动的顺序。
当窗体上有多个控件时,系统会对这些控件分配一个Tab顺序,并将该顺序存放在TabIndex属性中。
通过设置控件的TabIndex属性也可以人为设置Tab顺序。
(4)控件默认属性
VB中把某个控件的最重要属性称为该控件的值或默认属性。
对于默认属性,在程序运行时,可以直接使用控件名改变属性的值,而不必指定该控件的哪个属性。
(5)命令按钮控件
命令按钮是Windows应用程序中最常用的控件,它一般用于完成某种功能,主要接收Click事件,当用户单击它时将引发相应的事件过程。
(6)标签控件
标签控件主要用来在窗体上相对固定的位置上显示文本信息。
标签控件不能作为输入信息的界面,所以它通常用于注释功能,或输出显示结果。
(7)文本框控件
TextBox控件也称作编辑控件,常用来接收用户的输入信息,也可以在运行时通过代码赋予控件内容作为输出信息。
在TextBox控件中还可以显示多行文本。
(二)实验举例
VB中窗体:
实例1窗体的属性设置。
建立一个新的工程,并按表2-1内容设置窗体属性。
表2-1窗体的属性
(名称)属性
Caption
Picture
MaxButton
MinButton
ControlBox
FrmExpl
窗体属性设置
图片文件
False
False
true
设置Icon属性,选中此属性,单击“Icon”属性框右边的…(省略号),打开—个“加载图标”对话框。
在该对话框中选择VB安装目录下的vb6\Common\Graphics\Icons文件夹,从中选择某一个图标文件,并按“确定”按钮装入。
设置picture属性,选中此属性,单击“picture”属性框右边的…(省略号),打开—个“加载图片”对话框。
在该对话框中选择某文件夹下的一个图片文件,并按“确定”按钮装入。
单击工具栏上的启动按钮►运行程序。
此时观察窗体界面,标题栏左侧的控制菜单框图标为刚刚选定的图标,在窗体最小化时也以该图标显示。
在此基础上,将窗体的ControlBox属性设为False,再运行程序,则结果怎样?
●Moveable属性:
选中此属性,在右边列中选择“False”,然后,用鼠标单击工具栏上的启动按钮►运行程序。
此时窗体为不可移动状态,用鼠标不能拖动窗口。
●Borderstyle属性:
选中此属性,在右边列中选择“1一FixedSingle”,然后单击启动按钮►运行程序。
观察界面,此时窗体边框为可调状态还是不可调状态?
①
●ShowinTaskbar属性:
在窗体的controlbox属性为true的情况下,选中此属性时,右边列中默认值为“True”。
单击工具栏上的启动按钮►运行程序,发现该程序图标出现在Windows任务栏中,单击工具栏上的结束按钮■,或单击窗口的关闭按钮,结束程序运行。
重新设置ShowInTaskbar属性值为“False”,然后再一次运行程序,发现该程序没出现在Windows任务栏中。
VB中窗体:
实例2窗体的常用事件。
建立一个新的工程,将窗体的(名称)属性设为“FrmExp2”,在窗体上建立一个Picturebox控件,(名称)属性默认为“Pictureboxl”。
(1)Load事件
Load事件通常用来在启动应用程序时对属性或变量进行初始化
在Load事件过程编写代码如下:
PrivateSubForm_Load()
FrmExp2.CaptiOn=”窗体Load事件”
Picturel.Picture=LoadPicture(”C:
\windows\Clouds.bmp”)
EndSub
运行程序。
此时窗口标题栏为“窗体Load事件”、窗体中显示出什么,这说明了什么?
②
(2)Click事件
为窗体的Click事件过程编写代码如下:
PrivateSubForm_Click()
FrmExp2.Caption=”窗体click事件”
Picture1.Picture=LoadPicture(””)
EndSub
运行程序。
此时窗体标题栏仍为“窗体Load事件”,这说明在启动应用程序时先触发的是Load事件。
用鼠标单击窗体,此时窗体标题栏变为“窗体click事件”、窗体中Picturebox中的图片被清除,说明单击窗体时,触发了Click事件。
VB中窗体:
实例3控件的常用属性。
在窗体上创建两个命令按钮、一个标签控件和一个文本框,按表2-2所示设置它们的属性。
表2-2属性值
控件名称
(名称)属性
Caption属性
HeightWidth
Visible属性
Enabled属性
Forml
FrmExpl
控件的常用属性
Commandl
CmdDispl
命令按钮1
500,1300
False
Command2
CmdDisp2
命令按钮2
500,1300
Textl
TxtInput
1100,2500
False
Labell
LblDispl
请输入文字:
240,3000
False
单击工具栏上的启动按钮►运行程序。
观察程序
基本控件应用:
实例1大小写转换
建立应用程序用户界面与设置对象属性
选择“新建”工程,进入窗体设计器,在窗体中增加一个标签Label1、一个文本框Text1和三个命令按钮Command1~Command3,将Label1中的标题设置为“请输入英文字母”,将Command1的标题设置为“转大写”,将Command2的标题设置为“转小写”,将Command3的标题设置为“复原”。
将标签Label1的字体属性设置成宋体、四号;文本框Text1的字体属性设置成宋体、四号;三个命令按钮Command1~Command3的标题设置成隶书、四号;并将他们排列好,如图1-1所示。
图1-1设计界面
2设计代码
首先设计文本框的KeyUp(键抬起)事件代码,使得输入的字符存入文本框的Tag属性中:
PrivateSubText1_KeyUp(KeyCodeAsInteger,ShiftAsInteger)
Text1.Tag=Text1.Text
EndSub
编写命令按钮Command1(转大写)的事件代码:
PrivateSubCommand1_Click()
Text1.Text=Ucase(Text1.Tag)
EndSub
编写命令按钮Command2(转小写)的事件代码:
PrivateSubCommand2_Click()
Text1.Text=Lcase(Text1.Tag)
EndSub
编写命令按钮Command3(复原)的代码:
PrivateSubCommand3_Click()
Text1.Text=Text1.Tag
EndSub
3运行程序
首先在文本框中输入英文字符“abcdEFGHijki”,如图1-2所示。
然后按“转大写”命令按钮,此时输入框内的字符变成如图1-3所示。
按“转小写”命令按钮,此时输入框内的字符如图1-4所示。
按“复原”命令按钮,此时输入框内的字符如图1-5所示。
图1-2输入英文字符图1-3转大写
图1-4转小写图1-5复原
基本控件应用:
实例2求圆的面积、表面积和体积
1建立应用程序用户界面与设置对象属性
选择“新建”工程,进入窗体设计器,在窗体中增加八个标签Label1~Label8和一个命令按钮Command1。
对象属性如表1-1所示。
表1-1对象属性
对象
属性
值
Label1
Caption
已知圆半径r=
Label2
Caption
圆面积为
Label3
Caption
球面积为:
Label4
Caption
球体积为:
Label5~
Label8
Caption
Borderstytle
1-fixedsingle
对标签和命令按钮的属性进行设置,并将他们排列好,如图1-6所示。
图1-6设计界面图1-7运行界面
2设计代码
命令按钮的代码为:
PrivateSubCommand1_Click()
Constpi=3.14
Label5.Caption=Val(InputBox("输入圆半径","计算"))
r=Label5.Caption
s=pi*r^2
f=4*pi*r^2
v=4/3*pi*r^3
Label6.Caption=s
Label7.Caption=f
Label8.Caption=v
EndSub
3运行程序
首先运行程序,此时程序界面如图1-7所示。
单击计算按钮,出现对话框,在半径值内输入10,如图1-8所示,单击ok,则出现运行结果,如图1-9所示。
图1-8输入半径图1-9结算结果
基本控件应用:
实例3 计算两个给定日期之间的相隔天数
1建立应用程序用户界面与设置对象属性
选择“新建”工程,进入窗体设计器,在窗体中增加三个标签Label1~Label3、三个文本框Text1~Text3和一个命令按钮Command1,将Label1中的标题设置为“起始时间”,将Label2中的标题设置为“终止时间”,将Label3中的标题设置为“相隔天数”,将Text1~Text3的Text属性均设置为空,将Command1的标题设置为“计算”。
将标签Label1~Label3的字体属性设置成隶书、四号;文本框Text1的字体属性设置成宋体、四号;命令按钮Command1的标题设置成隶书、三号;并将他们排列好,如图1-10所示。
2设计代码
首先设置窗体代码属性,使text1(起始时间)的日期默认为系统当前日期。
PrivateSubForm_Load()
Text1.Text=Date
EndSub
command1(计算)的代码为:
PrivateSubCommand1_Click()
DimaAsDate,bAsDate,cAsInteger
a=val(Text1.Text)
b=val(Text2.Text)
c=b-a
Text3.Text=c
EndSub
图1-10设计界面
3运行程序
首先运行程
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 环境 信息系统 实验 指导书