用新的控件改进人事管理（二）

发布: 2007-7-02 11:08 | 作者: admin | 来源: | 查看: 8次 | 进入软件测试论坛讨论

这一课讲用组合框选择输入部门和职务。之所以要用选择输入，是因为对于同一值不同人在不同时候输入是不一样的，比如“人事部门”，有人可能会输入成“人事部”，再加上无意识的输入错误，使得一个部门会有好几种说法，这将给查询、统计等带来很大问题，因此我们对于一个其内容只有有限个选择的字段的输入，最好采用选择输入。

从我们前面所讲过的控件中可以看出，复选框、选项按钮组、列表框、组合框都可以用作选择输入，那么时候该用哪一个控件呢？一般原则是：

1、对于具有“是”、“否”两种选择的，用复选框；

2、选项是固定的，并且选项不太多，可以用选项按钮组；

3、对于选项是可变的，并且选项不是非常多，可用列表框；

4、对于选项是可变的，并且选项非常多，可用组合框，因为选项非常多的情况下，用列表框找起来是很麻烦的，而组合框可以直接输入，只是在必要的时候才查一下。另外如果不希望该输入控件占太多地方，也可用组合框，因为它平时只占一行，拉下时才显示框，而列表框始终要占一块位置，当然您高兴也可以让列表框只占一行，但那样操作起来一定别扭。

要实现选择输入，就要将可选择的项目事先准备好，对于选项来说有两种情况，一种是固定的、一种是可变的。比如性别就是固定的，而部门就可能是不固定的，因为一个单位随时可以增减部门。

固定的选项可以在编程时编好，而不固定的一般就要有个数据表来存放选项，而且这个表可由使用的人任意增删和修改，下面我们就来讲讲怎样实现这种功能。

在人事档案数据库中建立一个数据表，就一个字段，字段名为“部门”；
在菜单中加一项“维护”，下面有一个子菜单项“部门字典”使用的命令是：
do form bmzd name bmzd
建立一个表单，界面如；

在“新增”按钮的click事件中写入如下程序：

if this.caption=@#新增@# &&假如本按钮的标题为“新增”，表示第一次新增
this.caption=@#继续新增@# &&将本按钮标题设为“继续新增”
endif &&结束假设

select bmzd &&选择部门表
append blank &&加一空记录

thisform.grid1.readonly=.f. &&将表格设为非只读，即可以修改

thisform.grid1.refresh &&表格刷新
thisform.grid1.setfocus &&将焦点放到表格上以利于输入