工资管理系统数据图_工资管理系统实训报告_工资管理系统需求规格说明书(30)

表 3-4 工资发放查询表 字段名称 职员 ID 部门 ID 姓名 发放日期 数据类型 Char Char Char Datetime10字段大小 10 10 10 8备注月份 基本工资 效益工资 工龄工资 补贴 奖金合计 请假扣除 考勤扣除 合计 医疗保险 社保金 工会费 应发金额合计 应扣金额合计 工资合计 个人所得税 实发金额 备注 3、系统设置相关表 表 3-3 字段名称 操作员编号 操作员名称 密码Char money money money money money money money money money money money money money money money money varchar2 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 50 操作员信息表数据类型 varchar varchar varchar字段大小 10 10 10备注第三章 详细设计根据需求分析、概要设计的结果，采用 Visual Basic6.0 做开发工具，实现公司工资管理 各模块的功能。

3.1 创建公共模块 在进行系统设计时，应当将那些可能被重复使用的功能编写成通用的过程或函数，这样 可以减少代码量，使得程序流程明了，减少程序员编写以阅读程序工作量，方便系统的日常 维护。在该系统中主要通用的模块代码如下所示。

（1）声明公共变量。用来放置用户在程序中要使用到的数据集变量。

Option Explicit Public text As String, czy As String Public tb As String, tb1 As String, sql As String, sql1 As String Public intTag As Integer Public strStartDate As String, strEndDate As String Public ck As String11（2）创建 cnn（）函数。从效率上考虑，建立与灵气的连接是一个比较费时的操作，因此， 连接设计为小修 模块公用，创建 cnn（）函数，在程序启动时创建与的连接。

Public Function cnn() As ADODB.Connection 定义函数 Set cnn = New ADODB.Connection 返回一个连接 cnn.Open "Driver={SQL Server};Server=;Database=xsgl;Uid=sa;Pwd="

End Function （3）定义设置 Toolbar 控件上按钮状态的函数过程。

Public Function tlbState(tlb As Toolbar, state As Boolean) With tlb If state = True Then .Buttons(1).Enabled = False .Buttons(2).Enabled = False .Buttons(3).Enabled = False .Buttons(6).Enabled = False .Buttons(4).Enabled = True .Buttons(5).Enabled = True Else .Buttons(1).Enabled = True .Buttons(2).Enabled = True .Buttons(3).Enabled = True .Buttons(6).Enabled = True .Buttons(4).Enabled = False .Buttons(5).Enabled = False End If End With End Function （4）创建 CmdEnd（）函数。用于退出作用中窗体，使 frm_main 主窗体有效。

本文来自电脑杂谈，转载请注明本文网址：
https://www.pc-fly.com/a/ruanjian/article-31446-30.html