access职工考勤管理系统实验报告.docxVIP

登 登 陆 考 勤 管 理 职 员 管 理 职 员 信 息 管 理 员 管 理 考 勤 录 入 考 勤 统 计 Access 实 现 职 工 考 勤 管 理 系 统 一 、 系 统 介 绍 管 理 员 可 通 过 登 录 名 与 密 码 进 入 考 勤 系 统 ， 通 过 输 入 职 工 编 号 及 日 期 时 间 来 记 录 员 工 的 考 勤 情 况 ， 也 可 以 对 员 工 的 职 员 信 息 ， 考 勤 统 计 信 息 , 管 理 员 信 息 ， 进 行 查 询 ， 增 添 ， 删 改 ， 报 表 预 览 等 操 作 。 二 、 设 计 分 析 1) 需 求 总 结 ， 设 计 系 统 功 能 ， 画 出 如 下 功 能 模 块 结 构 图 针 对 职 工 管 理 系 统 的 功 能 图 ， 现 具 体 描 述 其 功 能 ： 管 理 员 登 陆 ： 系 统 对 其 合 法 性 进 行 检 查 考 勤 录 入 ： 管 理 员 通 过 录 入 职 工 编 号 及 时 间 记 录 考 勤 信 息 考 勤 统 计 ： 通 过 一 些 条 件 查 询 职 工 考 勤 记 录 并 预 览 报 表 职 员 信 息 ： 可 以 查 询 修 改 所 有 职 员 的 信 息 管 理 员 管 理 ： 可 以 修 改 管 理 员 密 码 或 增 加 管 理 员 2) 全 部 表 信 息 ： 职 员 信 息 ( 职 员 编 号 ， 姓 名 ， 部 门 编 号 ， 职 位 ， 性 别 ， 民 族 ， 教 育 程 度 ， 联 系 电 话 ) 考 勤 记 录 ( 职 员 编 号 ， 出 勤 日 期 ， 出 勤 时 间 ) 公 司 部 门 ( 部 门 编 号 ， 部 门 名 称 ) 管 理 员 信 息 （ 管 理 员 编 号 ， 管 理 员 姓 名 ， 管 理 员 密 码 ） 3 ） 实 体 E-R 图 1 考 勤 记 考 勤 记 录 职 员 信 息 本 系 统 根 据 上 面 的 设 计 规 划 出 的 实 体 有 ： 职 员 信 息 实 体 ， 考 勤 信 息 实 体 ， 管 理 员 信 息 实 体 。 职 工 考 勤 实 体 E-R 图 出 勤 时 职 工 编 号 职 员 信 息 实 体 E-R 图 间  出 勤 日 期 职 工 编 号  联 系 电 话 教 育 程 度 姓 名  民 族 部 门 编 号  性 别 职 位 管 理 员 信 息 实 体 E-R 图 ： 管 员  理 管 理 员 编 号  管 理 员 姓 名 2  管 理 员 密 码 学 生 选 课 系 统 主 要 是 为 学 生 选 课 的 管 理 提 供 全 面 、 准 确 、 科 学 的 管 理 方 法 ， 方 便 快 捷 地 处 理 选 课 的 管 理 信 息 ； 避 免 了 信 息 处 理 错 误 ， 提 高 了 信 息 管 理 的 工 作 效 率 ， 大 大 地 节 省 人 力 和 物 力 的 开 支 。 本 章 主 要 阐 述 了 系 统 的 业 务 流 程 ， 根 据 业 务 流 程 画 出 绘 制 出 了 E-R 图 。 三 、 模 块 代 码 及 界 面 设 计 通 过 管 理 系 统 总 界 面 可 以 进 入 考 勤 录 入 ， 考 勤 统 计 ， 职 工 信 息 ， 管 理 员 设 置 等 功 能 。 其 主 要 实 现 窗 口 如 下 图 主 界 面 创 建 主 界 面 主 要 是 方 便 各 种 功 能 的 选 择 , 而 后 创 建 分 界 面 来 实 现 具 体 的 系 统 功 能 。 如 下 图 ： 考 勤 录 入 界 面 ， 录 入 按 钮 的 事 件 代 码 ： Private Sub Command8_Click() If Text0 = Or Text4 = Or Text10 = Then MsgBox 记 录 数 据 不 能 为 空 ！ Else CurrentDb.Execute INSERT INTO 考 勤 记 录 VALUES ( Text0 3 , Text4 , Text10 ) Text0 = Text4 = Text10 = Text0.SetFocus MsgBox 考 勤 录 入 成 功 ！ End If End Sub 考 勤 统 计 界 面 ， 该 界 面 包 括 考 勤 统 计 ， 考 勤 统 计 查 询 子 窗 体 ， 其 中 查 询 按 钮 的 事 件 代 码 为 ： Private Sub Command15_Click() 4 Me. 考 勤 统 计 查 询 子 窗 体 .Requery 这 句 是 关 键 End Sub 职 工 信 息 界 面