科技资讯 2009 NO.32 SCIENCE & TECHNOLOGY INFORMATION 学 术 论 坛 基于 VB 的学生宿舍管理系统设计 ( 青岛科技大学自动化与电子工程学院 山东青岛 2 6 6 0 4 2 ) 周 春 丽 摘　要:针对当前高等院校宿舍管理的特点,利用VB开发了一种应用性很强的信息管理系统。该系统的数据库包括录入模块、查询模块 和系统维护等模块。本文详述了宿舍管理系统的组成结构、主要代码及开发过程,介绍了相关窗体的管理界面。 关键词:VB 数据库 查询模块 管理系统 界面 文 献 标 识 码 :A 中 图 分 类 号 :TP31 文 章 编 号 :1672-3791(2009)11(b)-0166-02 当 前 的 计 算 机 技 术 与 现 代 信 息 技 术 以 及管理科学、行为科学和系统科学等相关学 科的飞速发展,为实现我们实验室管理信息 系统提供了坚实的理论与技术基础。随着校 园信息化的推进,计算机进入日常教学生活 和工作的各个方面已成为不可阻挡的趋势。 引入宿舍管理系统进行计算机规范化管理 必然会有效地提高管理水平和工作效率。 学 生 宿 舍 管 理 系 统 需 要 完 成 的 主 要 功 能 如 下 。 (1)有 关 在 校 学 生 的 各 种 信 息 的 输 入 , 包 括 学 生 基 本 信 息、所 在 学 院 等 。 (2)学 生 各 种 信 息 的 查 询 。 (3)学 生 各 种 信 息 的 修 改 。 (4)宿 舍 管 理 信 息 的 查 询 。 1 系统功能模块设计 如 图1所 示 。 2 创建学生宿舍管理系统的主窗体 如 图2所 示 。 窗 体 和 控 件 的 属 性 设 置 如 表 1所 示 。 3 创建主窗体菜单 如 图3所 示 。 4 卫生情况录入系统 宿 舍 卫 生 情 况 的 录 入 包 括 宿 舍 名、得 分、评 分 时 间、评 分 人 员 等 基 本 信 息 的 录 入。 其录入窗体如图4 所示。 在 这 个 窗 体 上 放 置 多 个 文 本 框 和 MSFlexGrid1控 件,用 来 输 入 和 显 示 学 生 的 基 本 信 息 ;三 个 按 钮 用 来 确 定 添 加 和 删 除 宿舍卫生信息;Data1控件用来连接数据库。 这 些 控 件 的 属 性 见 表2。 用 户 录 入 信 息 后 ,单击“ 添 加”按 钮,将 会 在 数 据 库 中 加 入 相 应 的 资 料 , 并 在 MSFlexGrid中显示出来。单击“删除”按 钮, 会 将 数 据 库 中 相 应 的 资 料 删 除 掉。其 代 码 如 下 : Private Sub addcm_Click() ‘ 添 加 按 钮 代 码 Data1.Recordset.AddNew 　　End Sub Private Sub delecm_Click() ‘ 删 除 按 钮 代 码 Data1.Recordset.Delete 图 1 系统功能模块图 图 2 学生宿舍管理系统主窗体 表 1 主 窗 体 及 其 控 件 属 性 设 置 166 科技资讯 SCIENCE & TECHNOLOGY INFORMATION 图 3 主窗体中的菜单结构 

学 术 论 坛 2009 NO.32 SCIENCE & TECHNOLOGY INFORMATION 科技资讯 Data1.Recordset.AddNew End Sub Private Sub Command1_Click()’退 出 按 钮 代 码 Unload Me End Sub Private Sub delecmd_Click(Index As Integer) Data1.Recordset.Delete Data1.Recordset.AddNew End Sub Private Sub Form_Initialize() Data1.Recordset.AddNew End Sub Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) Data1.Refresh End Sub Private Sub Text3_LostFocus() If IsDate(Text3.Text) Or Text3.Text = " " Th en 检 查 是 否 输 入 合 法 数 据 Exit Sub End If MsgBox ("输 入 错 误,请 输 入 时 间 格 式 y yy y -m m - dd！ " ) ' 将 选 取 不 合 法 的 数 据 , 以 便 重 新 输 入 , 并 使 控 制 焦 点 不 动 Text3.SetFocus Text3.SelStart = 0 Text3.SelLength = Len(Text3.Text) End Sub 5 查询系统 通 过 高 级 查 询 系 统 , 可 以 更 方 便 更 快 捷 的 查 询 ,此 系 统 设 计 了 多 个 查 询 项 ,可 全 选 也 可 部 分 选 择 , 筛 选 的 内 容 将 在 上 面 的 表 格 中 显 示。系 统 的 窗 体 如 图5所 示 。 一 个 典 型 的 数 据 库 应 用 程 序 由 数 据 结 构、用 户 界 面、查 询 选 项 和 报 表 等 组 成。在 设 计 应 用 程 序 时 , 应 仔 细 考 虑 每 个 组 件 将 提 供 的 功 能 以 及 与 其 他 组 件 之 间 的 关 系 。 良好的组织Visual Basic应用程序一般 要 为 用 户提供窗体,提供一个或多个窗体,供 数据输入并显示。同时还需要添加某些事件 响应代码,提供特定功能,保证数据完整性和 安全性。此外,还需要提供查询和报表,允许用 户从数据库中选取信息,最后生成exe文件。 6 结语 随 着 校 园 信 息 化 的 推 进 , 计 算 机 进 入 日常教学生活和工作的各个方面已成为不 可 阻 挡 的 趋 势。高 校 宿 舍 结 合 自 身 特 点 进 行的计算机信息化的规范化管理必然会有 效 地 提 高 管 理 水 平 和 工 作 效 率 。 参考文献 [1] 杨 新 芳,赵 永 乐.Visual Basic访 问 SQL Server数 据 库 方 案 的 比 较 [J].义 乌 工 商 职 业 技 术 学 院 学 报 ,2007,3:50～ 55. [2] 石晓萍.基于Visual Basic的财务管理信 息 系 统 的 设 计 [J].高 师 理 科 学 刊 ,2007, 4 : 6 3 ～ 6 8 . 科技资讯 SCIENCE & TECHNOLOGY INFORMATION 167 图 4 卫生情况录入窗体 表 2 卫 生 录 入 窗 体 各 个 控 件 的 属 性 设 置 图 5 查询窗体