[/align]图5-5系统退出界面
5.5.2功能选择界面设计 本模块主要是为用户提供一个功能选择界面,根据用户所需的不同选择,打开不同的下级菜单并提供相应的功能服务。本模块利用一个表单可以实现其功能。
下面将功能选择界面设计为例详细介绍本模块的设计。首先新建一个表单Form1,将其保存为“main
menu”,选择路径。在表单上添加1个“Option
group”控件、1个“Image”控件和2个“Command”控件,各控件的主要属性见表5-2。
控件名称
属性名称
属性值
Forml
Caption
功能选择界面
Deskeop
.T._True
Height
263
left
84
Forml
Top
92
Width
256
Optiongroupl
Buttoncount
8
Height
192
Left
12
Top
24
Width
336
Value
1
Optiongroupl中的Option1
Caption
培训需求管理
Optiongroupl中的Option2
Caption
培训计划管理
Optiongroupl中的Option3
Caption
基本信息管理
Optiongroupl中的Option4
Caption
培训效果评价
Optiongroupl中的Option5
Caption
培训计划实施
Optiongroupl中的Option6
Caption
培训资源管理
Optiongroupl中的Option7
Caption
系统管理
Optiongroupl中的Option8
Caption
其他
Command1
Caption
确定
Command2
Caption
退出
Image1
Stretch
3_stretch
Picture
.\\33.jpg
下面为表中各事件添加代码。在“确定”按钮的“Click”事件中添加代码如下:
do case
case thisform.optiongroup1.option2.value=1
do form .\\form\\pxjhg1
case thisform.optiongroup1.option3.value=1
do form .\\form\\jbxxg1
case thisform.optiongroup1.option4.value=1
do form .\\form\\pxxqgpj
case thisform.optiongroup1.option6.value=1
do form .x\\form\\pxzyg1
case thisform.optiongroup1.option7.value=1
do form .\\form\\xtg1
dcase
*根据用户的不同选择打开不同的下级表单
在“退出”按钮的“Click”事件中添加代码如下“
do form .\\form\\end
thisform.release
*执行退出界面表单,同时释放本表单
将该表单保存后这一模块就建好了。功能选择模块的设计结果如图5-6所示
[align=center]