【正文】 lseIf lPos sglSplitLimit Then = sglSplitLimit Else = lPos End If End IfEnd SubPrivate Sub imgSplit_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) SizeControls = False MDown = False SaveSetting , Config, Split, End SubSub SizeControls(X As Single) On Error Resume Next 39。定 位 上 次 分 隔 條 If Val(GetSetting(, Config, Split)) 1500 Then = 1500 Else = Val(GetSetting(, Config, Split)) End If 39。顯 示 路 徑 = 當(dāng) 前 數(shù) 據(jù) 庫 路 徑 ： amp。 Format(Date, Long Date)39。** Function Declarations: From WenxingyuanDim MouseD As Boolean, Oldx As Single, Oldy As SinglePrivate Declare Function ShellExecuteamp。設(shè) 計(jì) 時(shí) 定 義 temp dir 39。 shiftStrR Next 39。檢 查 密 碼 的 正 確 性Dim X As Long X = 39。但 是 由 于 畢 業(yè) 設(shè) 計(jì) 時(shí) 間 較 短 ， 所 以 該 系 統(tǒng) 還 有 許 多 不 盡 如 人 意 的地 方 ， 比 如 聯(lián) 機(jī) 文 檔 比 較 少 ， 網(wǎng) 絡(luò) 功 能 不 完 善 ， 用 戶 界 面 不 夠 美 觀 ，出 錯(cuò) 處 理 不 夠 等 多 方 面 問 題 。 幫 助 界 面 設(shè) 計(jì)界 面 設(shè) 計(jì) ：一 個(gè) 框 架 (Frame)、 一 個(gè) 標(biāo) 簽 (Label) 、 兩 個(gè) 按 鈕(CommandButton)、 一 個(gè) 選 擇 框 （ Check box）窗 體 運(yùn) 行 界 面 如 下 ： （ 圖 8）第 六 章 總 結(jié)經(jīng) 過 一 段 時(shí) 間 的 設(shè) 計(jì) 和 開 發(fā) ， 中 小 學(xué) 檔 案 管 理 系 統(tǒng) 基 本 開 發(fā) 完畢 。效 果 圖 如 下 ： （ 圖 6） 查 詢 模 塊通 過 主 界 面 進(jìn) 入 查 詢 窗 體 ， 查 詢 模 塊 用 于 查 詢 顯 示 滿 足 不 同 條 件學(xué) 生 的 基 本 情 況 。主 界 面 將 常 用 菜 單 項(xiàng) 設(shè) 計(jì) 為 工 具 欄 ， 在 工 具 欄 上 有 輸 入 檔 案 管 理 、目 錄 管 理 、 添 加 檔 案 、 修 改 檔 案 、 刪 除 檔 案 、 搜 索 檔 案 、 幫 助 和 退 出菜 單 。 數(shù) 據(jù) 庫 設(shè) 計(jì)數(shù) 據(jù) 庫 采 用 Access 數(shù) 據(jù) 庫 ， 使 用 VisData 或 在 Access 環(huán) 境 中創(chuàng) 建 數(shù) 據(jù) 庫 personal 學(xué) 生 信 息 表 (File)如 下 ： （ 圖 1）通 過 數(shù) 環(huán) 境 設(shè) 計(jì) 器 的 查 詢 設(shè) 計(jì) 窗 口 ， 將 學(xué) 生 信 息 表 (personal)中 的 字 段 添 加 到 設(shè) 計(jì) 器 中 。 報(bào) 表 輸 出可 以 將 查 詢 的 結(jié) 果 數(shù) 據(jù) 通 過 報(bào) 表 輸 出 ， 也 可 打 印 輸 出 。檔 案 管 理 就 是 將 上 述 信 轉(zhuǎn) 變 為 計(jì) 算 機(jī) 能 接 受 的 數(shù) 據(jù) 送 入 計(jì) 算 機(jī) ，系 統(tǒng) 包 括 學(xué) 生 檔 案 數(shù) 據(jù) 輸 入 、 信 息 查 詢 、 信 息 瀏 覽 及 報(bào) 表 輸 出 等 功 能 。 編 程編 寫 程 序 是 將 軟 件 設(shè) 計(jì) 轉(zhuǎn) 換 為 程 序 代 碼 的 過 程 ， 完 成 軟 件 設(shè) 計(jì) 中每 功 能 模 塊 程 序 設(shè) 計(jì) 。 需 求 分 析應(yīng) 確 定 哪 些 需 求 是 可 以 滿 足 的 ， 并 對(duì) 此 進(jìn) 行 描 述 ， 寫 出 軟 件 需 求說 明 書 以 及 初 步 制 作 的 系 統(tǒng) 的 草 稿 。第 四 章 學(xué) 生 檔 案 管 理 系 統(tǒng) 開 發(fā) 的 可 行 性 規(guī) 則4． 1 學(xué) 生 檔 案 系 統(tǒng) 開 發(fā) 過 程管 理 信 息 系 統(tǒng) 的 開 發(fā) 是 一 個(gè) 復(fù) 雜 的 系 統(tǒng) 工 程 。 一 個(gè) 更 高 級(jí) 的 連 接 形 式 稱 為 自 連 接 。 如 何 修 改 數(shù) 據(jù) 庫數(shù) 據(jù) 庫 的 修 改 分 為 ： 添 加 、 編 輯 和 刪 除 記 錄 。 關(guān) 系 數(shù) 據(jù) 庫 中 包 含 了 多 個(gè) 數(shù) 據(jù) 表 的 信 息 ， 數(shù) 據(jù) 庫 含有 各 個(gè) 不 同 部 分 的 術(shù) 語 ， 象 記 錄 、 域 等 。 APP 對(duì) 象 的 大 多 數(shù)屬 性 被 應(yīng) 用 程 序 用 來 提 供 常 規(guī) 的 信 息 ， 通 過 使 用 這 些 APP 提 供 的 屬性 ， 可 以 在 應(yīng) 用 程 序 和 用 戶 之 間 交 流 重 要 信 息 ， 在 項(xiàng) 目 屬 性 框 中 可 以設(shè) 置 它 的 屬 性 。 使 用 它 我 們 可 以 為 我們 編 寫 的 應(yīng) 用 程 序 生 成 一 組 幫 助 文 件 。創(chuàng) 建 工 具 條 包 括 ImageList 和 Toolbar 控 件ImageList 用 于 為 其 他 控 件 提 供 圖 像 庫 ， 將 ImageList 控 件 加入 到 工 具 箱 的 操 作 于 前 述 Toolbar 控 件 相 同 。 其 屬 性 及 對(duì) 象 如 下 ：Align 屬 性 定 義 工 具 條 在 窗 體 中 的 位 置ToolTipText 屬 性 是 字 符 串 類 型 ， 定 義 控 件 的 提 示 字 符Style 屬 性 定 義 按 鈕 外 觀 。 其 中 的 按 鈕 可以 顯 示 圖 像 和 標(biāo) 題 ， 并 按 功 能 分 組 或 加 入 分 隔 符 ， 還 可 以 圍 棋 設(shè) 置 鼠標(biāo) 停 留 在 其 上 顯 示 的 提 示 字 符 。 工 具 欄 的 實(shí) 現(xiàn) 方 法 CoolBar 控 件CoolBar 控 件 與 Office2022 中 看 到 的 CoolBar 是 類 似 的 。 使 用 應(yīng) 用 程 序 具 有 可 通 用 性 可說 擴(kuò) 展 性 和 強(qiáng) 有 力 的 功 能 。DATA 控 件 還 提 供 了 用 來 瀏 覽 不 同 記 錄 的 各 種 跳 轉(zhuǎn) 按 鈕 。DATA 控 件 在 數(shù) 據(jù) 庫 中 的 信 息 與 將 信 息 顯 示 給 用 戶 看 的 Visual Basic 程 序 之 間 架 起 了 一 座 橋 梁 。 Access 是 一 種 關(guān) 系 數(shù) 據(jù) 庫 工 具 ， 關(guān) 系 數(shù) 據(jù) 庫是 已 開 發(fā) 的 最 通 用 的 數(shù) 據(jù) 庫 之 一 。 Access 的 優(yōu) 點(diǎn) 在 于 它 能 使 用 數(shù) 據(jù) 表 示 圖 或自 定 義 窗 體 收 集 信 息 。第 二 章 開 發(fā) 工 具 簡(jiǎn) 介微 軟 公 司 的 Visual Basic 是 Windows 應(yīng) 用 程 序 開 發(fā) 工 具 ，使 目 前 最 為 廣 泛 的 、 易 學(xué) 易 用 的 面 向 對(duì) 象 的 開 發(fā) 工 具 。學(xué) 生 檔 案 管 理 系 統(tǒng) 是 我 個(gè) 人 根 據(jù) 所 學(xué) 開 發(fā) 的 信 息 管 理 系 統(tǒng) (MIS),其 開 發(fā) 主 要 包 括 后 臺(tái) 數(shù) 據(jù) 庫 的 建 立 和 維 護(hù) 以 及 前 端 應(yīng) 用 程 序 的 開 發(fā) 兩個(gè) 方 面 。隨 著 科 學(xué) 技 術(shù) 的 不 斷 提 高 ,計(jì) 算 機(jī) 科 學(xué) 日 漸 成 熟 ,其 強(qiáng) 大 的 功 能已 為 人 們 深 刻 認(rèn) 識(shí) ,它 已 進(jìn) 入 人 類 社 會(huì) 的 各 個(gè) 領(lǐng) 域 并 發(fā) 揮 著 越 來 越 重要 的 作 用 。第 一 章 學(xué) 生 檔 案 系 統(tǒng) 應(yīng) 用 分 析 及 實(shí) 現(xiàn)管 理 信 息 系 統(tǒng) （ MIS） 是 進(jìn) 行 信 息 的 采 集 、 存 儲(chǔ) 、 加 工 、 維 護(hù) 和使 用 的 系 統(tǒng) 。隨 著 科 學(xué) 技 術(shù) 的 不 斷 提 高 ,計(jì) 算 機(jī) 科 學(xué) 日 漸 成 熟 ,其 強(qiáng) 大 的 功 能已 為 人 們 深 刻 認(rèn) 識(shí) ,它 已 進(jìn) 入 人 類 社 會(huì) 的 各 個(gè) 領(lǐng) 域 并 發(fā) 揮 著 越 來 越 重要 的 作 用 。 但 一 直 以 來 人們 使 用 傳 統(tǒng) 人 工 的 方 式 管 理 文 件 檔 案 ， 這 種 管 理 方 式 存 在 著 許 多 缺 點(diǎn) ,如 :效 率 低 、 保 密 性 差 ,另 外 時(shí) 間 一 長 ,將 產(chǎn) 生 大 量 的 文 件 和 數(shù) 據(jù) ,這 對(duì)于 查 找 、 更 新 和 維 護(hù) 都 帶 來 了 不 少 的 困 難 。因 此 ， 開 發(fā) 這 樣 一 套 管 理 軟 件 成 為 很 有 必 要 的 事 情 ,在 下 面 的各 章 中 我 們 將 以 開 發(fā) 一 套 學(xué) 生 檔 案 管 理 系 統(tǒng) 為 例 ,談 談 其 開 發(fā) 過 程和 所 涉 及 到 的 問 題 及 解 決 方 法 。 但 一 直 以 來 人 們 使 用 傳 統(tǒng) 人工 的 方 式 管 理 文 件 檔 案 ， 這 種 管 理 方 式 存 在 著 許 多 缺 點(diǎn) ,如 :效 率 低 、保 密 性 差 ,另 外 時(shí) 間 一 長 ,將 產(chǎn) 生 大 量 的 文 件 和 數(shù) 據(jù) ,這 對(duì) 于 查 找 、更 新 和 維 護(hù) 都 帶 來 了 不 少 的 困 難 。 因 此 ， 開 發(fā) 這 樣 一 套 管 理 軟 件 成 為 很 有 必 要 的 事情 , 。經(jīng) 過 分 析 ,我 使 用 MICROSOFT 公 司 的 VISUAL BASIC 開 發(fā) 工 具 ,利 用 其 提 供 的 各 種 面 向 對(duì) 象 的 開 發(fā) 工 具 ,尤 其 是 數(shù) 據(jù) 窗 口 這 一 能 方 便而 簡(jiǎn) 潔 操 縱 數(shù) 據(jù) 庫 的 智 能 化 對(duì) 象 ,首 先 在 短 時(shí) 間 內(nèi) 建 立 系 統(tǒng) 應(yīng) 用 原 型 ,然后 ,對(duì) 初 始 原 型 系 統(tǒng) 進(jìn) 行 需 求 迭 代 ,不 斷 修 正 和 改 進(jìn) ,直 到 形 成 用 戶滿 意 的 可 行 系 統(tǒng) 。 數(shù) 據(jù) 庫 應(yīng) 用Access2022 就 是 關(guān) 系 數(shù) 據(jù) 庫 開 發(fā) 工 具 ， 數(shù) 據(jù) 庫 能 匯 集 各 種 信 息以 供 查 詢 、 存 儲(chǔ) 和 檢 索 。 Access 也 提 供 了 數(shù) 據(jù) 存 儲(chǔ) 庫 ，可 以 使 用 桌 面 數(shù) 據(jù) 庫 文 件 把 數(shù) 據(jù) 庫 文 件 置 于 網(wǎng) 絡(luò) 文 件 服 務(wù) 器 ， 與 其 他網(wǎng) 絡(luò) 用 戶 共 享 數(shù) 據(jù) 庫 。Visual Basic、 Access 以 及 其 他 微 軟 的 軟 件 產(chǎn) 品 都 是 通 過 共 用 JET數(shù) 據(jù) 庫 引 擎 ， 從 而 給 用 戶 提 供 了 豐 富 的 數(shù) 據(jù) 類 型 。 一 個(gè) 記 錄 集 合 是 動(dòng) 態(tài) 的 也 就 意 味 著 ， 當(dāng) 原來 的 數(shù) 據(jù) 表 中 的 容 改 變 了 以 后 ， 該 記 錄 集 合 中 的 記 錄 也 會(huì) 隨 之 改 變 。 開 發(fā) 人 員可 以 最 有 效 利 用 所 創(chuàng) 建 的 每 一 個(gè) 對(duì) 象 。您 可 以 使 用 Visual Basic 的 Application Wizard 也 可 以 使 用Visual Basic 的 菜 單 編 輯 器 建 立 菜 單 或 者 修 改 已 經(jīng) 存 在 的 菜 單 。 Toolbar 控 件Toolbar 是 工 具 條 控 件 ， 是 實(shí) 現(xiàn) 工 具 條 的 主 體 。 在 “控 件 ”選 項(xiàng) 卡 列 表 中 選 擇 “Microsoft Windows Common Controls ”后 工 具 相 中 增 加 改 控 件 。DisabledImageList 屬 性 定 義 工 具 條 按 鈕 無 效 時(shí) 顯 示 的 圖 像 。 微 軟 的MSDN 是 一 套 獨(dú) 立 于 Visual Basic 的 用 來 協(xié) 助 我 們 創(chuàng) 建 、 運(yùn) 行 于32 位 Windows 操 作 系 統(tǒng) 下 的 幫 助 文 件 的 工 具 。 Visual Basic 允 許 你 使 用 APP 對(duì) 象 來 保 存 這 些 信 息 ， APP 對(duì)象 是 一 個(gè) 預(yù) 定 義 對(duì) 象 ， 不 需 要 在 程 序 中 創(chuàng) 建 它 。 計(jì) 算 機(jī) 的數(shù) 據(jù) 庫 可 以 分 為 兩 類 ： 非 關(guān) 系 數(shù) 據(jù) 庫 （ flatfile） 和 關(guān) 系 數(shù) 據(jù) 庫（ relational） 。1． 標(biāo) 識(shí) 需 要 的 數(shù) 據(jù) ；2． 收 集 被 標(biāo) 識(shí) 的 字 段 到 表 中 ；3． 標(biāo) 識(shí) 主 關(guān) 鍵 字 字 段 ；4． 繪 制 一 個(gè) 簡(jiǎn) 單 的 數(shù) 據(jù) 圖 表 ；5． 規(guī) 范 數(shù) 據(jù) ；6． 標(biāo) 識(shí) 指 定 字 段 的 信 息 ；7． 創(chuàng) 建 物 理 表 。 一個(gè) 連 接 是 指 一 種 虛 擬 的 表 ， 這 種 表 是 在 當(dāng) 用 戶 要