张艺兴 曼妥思:救命!!!急!!!visual foxpro6.0 编程

来源:百度文库 编辑:中科新闻网 时间:2024/05/04 05:52:33
我们学校让用visual foxpro6.0编写一个公司职员情况查询系统,前面的数据库,表单和报表我都会建,但是要求通过一个窗口进行查询,还要有进去时的密码只类,这些我是一点也不会,我需要详细的过程,很急!

现有职工管理数据库ZG_DB,数据库重有ZG,ZC两个表。其中ZG的结构是职工编码C(4),姓名C(8),职称代码C(1),工资N(7,2),新工资N(8,2)。ZC表的结构是职称代码C(1),职称名称C(10),增加百分比N(6,2)。

设计一个菜单MENU2,菜单中有两个菜单项:"计算"和"退出"
程序运行时,单击“计算”菜单项完成下列操作:
现在要给每个人增加工资,请计算ZG表的新工资字段,计算方法时根据ZC表中的相应职称的增加百分比来计算:
新工资=工资×(1+增加百分比/100)
单击“退出”菜单项,程序终止运行

1.选择“文件”菜单中的“新建”选项,在“文件类型”中选择“菜单”,在单击“新建文件”按钮
2.在弹出的“新建菜单”对话框中选择“菜单”,弹出“菜单设计器”对话框
3.在“菜单设计器”中输入菜单项及相关的结果。“关闭”菜单项的结果选择“命令”,在后面输入set sysmenu to default命令,表示关闭此菜单,恢复系统菜单;“计算”菜单项要完成计算的功能,结果选择“过程”,单击后面的“创建”,弹出过程编辑窗口
4.在过程编辑窗口输入如下程序:
open database ZG_DB
SELECT 2
use ZG
select 1
use ZC
do while .not. eof()
scatter to A
select 2
replace all 新工资 with 工资*(1+A[3]/100) for 职称代码=A[1]
select 1
skip
enddo
close all
return
5.选择“菜单”菜单中的“生成...”选项,弹出确认保存的对话框。点击“是”,弹出“另存为”对话框,输入文件名MENU2,点击“保存”按钮
6.在弹出的“生成菜单”对话框中,输入“输入文件”名,点击“生成”按钮即可生成可执行的菜单程序文件
7.选择“程序”菜单中的“运行...”选项,选择菜单程序名menu2.mpr,运行菜单。