文档介绍:[案例4-1]窗体编程案例说明
程序运行后,窗体的标题为“窗体变化”,窗体的右上角无“最大化”按钮和“最小化”按钮,单击窗体中不同的按钮窗体发生相应的变化。单击“窗体变大”、“窗体变小”按钮,窗体的长和宽都会随着变大和缩小,单击“分组,将具有联系的一类控件单独分成一组放置在框架中。
(1)框架的属性和事件
(2)使用框架的注意事项
:常常成组出现,主要用于“多选一”的问题。用户在一组单选按钮中必须选择一项,并且最多只能选择一项。
:复选框(CheckBox)也称为检查框,单击复选框一次被选中,左边出现“√”号,再次单击则取消选中。清除复选框中的“√”。可同时使多个复选框同时处于选中状态,进行多种情况的组合。
第12页,共33页。
拓展知识
返回
第13页,共33页。
本案例实现一个多功能计时器的应用,以此来介绍时钟控件。用4个文本框分别用来显示“当前时间”、“开始时间”、“结束时间”、“共计耗时”,有三个命令按钮,“开始”、“停止”和“退出”。用来控制开始计时的时刻和停止的时刻,另一个按钮用来退出应用程序。当程序运行时,“开始”按钮可用,“停止”按钮不可用。当需要进行计时的时候单击一下“开始”按钮,同时“停止”按钮可用。当需要停止时,单击一下“停止”按钮,则停止计时,在“共计耗时”文本框中显示从开始计时到停止计时所花的时间,。
为了增加动感,在窗体上添加了两个图像框控件,两幅相似的图片以1秒的时间间隔交替显示,同时会发出“嘟、嘟……”的声音。
第14页,共33页。
程序实现
:在窗体上添加4个标签控件、4个文本框控件、3个命令按钮、2个图像框、1个图片框、3个时钟控件。
:
第15页,共33页。
相关知识
:定时器控件(Timer)是一种按一定时间间隔触发事件的控件,用以实现定时执行指定的操作。该控件在设计可见,而在运行时是不可见的。
(1)定时器属性:
(2)定时器事件:
:
第16页,共33页。
拓展知识
:通过喇叭发出一个声调。
Time函数:返回一个指明当前系统时间的函数。为了设置系统时间可以使用Time语句。例如:n=Time
Time语句:用来设置系统时间,时间参数可以使用任何能够表示时刻的数值表达式、字符串表达式或它们的组合。如果Time是一个字符串,系统利用时间分隔符将其转换成一个时间,如果无法转换成一个有效的时间,则会导致错误发生。
返回
第17页,共33页。
要求用输入框从键盘输入三个数,作为三角形的三条边。在计算面积之前,首先要判断这三个数作为三条边是否能构成三角形,如果不能构成三角形,则给出提示信息,并可选择重新输入或退出执行;如果能构成三角形则用“消息框”把三角形的面积显示出来。注意这两种消息框的不同之处。
第18页,共33页。
程序实现
:
:
第19页,共33页。
相关知识
:把数据输入计算机,使用VB提供的InputBox函数生成的输入框来进行数据信息的输入。
InputBox函数的一般格式为:
InputBox(<提示> [,标题] [,缺省值] [,x坐标位置] [,y坐标位置])
该函数产生一个对话框,作为输入数据的界面,等待用户输入正文或按下按钮,函数返回值是字符串类型:
几点说明:
第20页,共33页。
相关知识
:用MsgBox语句或MsgBox函数产生的,两者的不同之处在于MsgBox函数会产生一个与用户所选择按钮相对应的整数。
(1)MsgBox函数:格式为:
MsgBox(提示 [,按钮组合][,标题])
按钮组合说明:
第21页,共33页。
类别
符号常量
值
含义
按钮的类型
vbOKOnly
0
只显示“确定”按钮
vbOKCancel
1
显示“确定”和“取消”按钮
vbAbortRetryIgnore
2
显示“放弃”、“重试”和“忽略”按钮
vbYesNoCancel
3
显示“是”、“否”和“取消”按钮
vbYesNo
4
显示“是”和“否”按钮
vbRetryCancel
5
显示“重试”和“取消”按钮
图标样式
vbCritical
16
图标
vbQuestion
32
图标
vbExclamation
48
图标
vbInformation
64
图标