【文章內(nèi)容簡介】 ，不能以空格開頭，但字段名中間可以包含空格。字段名不能包含句點 (.)、驚嘆號 (!)和方括號 ([])，因為 Access 已經(jīng)將這些符號用于特殊目的了。 Access 中包含的有效數(shù)據(jù)類型和它們的用法及大小如表 所示。 字段說明可以幫助用戶記住某個字段的用途或使未來的用戶了解該字段的作用和目的， Access 在屏幕下方的狀態(tài)欄中顯示字段的說明。 字段數(shù)據(jù)類型只是指明該字段存放的類型，字段的屬性則是對字段所存放的數(shù)據(jù)作進一步的描述和限定。不同的數(shù)據(jù)類型具有不同的字段屬性，但有些字段屬性是大部分數(shù)據(jù)類型都有的，下面簡要介紹一下常用的字段屬性。 表 中的有效數(shù)據(jù)類型 數(shù)據(jù)類型 用法 大小 文本 文本、數(shù)字或它們的組合，例如地址、 電話等 最多 255個字符 備注 長文本及數(shù)字，例如備注或說明 最多 64K個字符 數(shù)字 可用來進行算術(shù)計算的數(shù)字數(shù)據(jù)，涉 及貨幣的計算除外 (使用貨幣類型 ) 或 8 個字節(jié) 日期 /時間 早期和時間類型數(shù)據(jù) 8個字節(jié) 貨幣 帶貨幣符號的數(shù)據(jù) 8個字節(jié) 自動編號 在添加記錄時自動插入的唯一順序號或隨機編號 4個字節(jié) 是 /否 字段只包含兩個值中的一個，例如“是 /否”、“真 /假”、“開 /關(guān) ” 1bit OLE對像 在其它程序中使用 OLE協(xié)議創(chuàng)建的對象 (例如 Word文檔、 Microsoft EXCEL電子表格、圖象、聲音或其它二進制數(shù)據(jù) ) 最大可為 1GB(取決于磁盤可用空間 ) 超級鏈接 存儲超級鏈接的字段，超級鏈接可以 是 UNC路徑或 URL 最多 64K個字符 “標題”屬性：所有數(shù)據(jù)類型都有一個“標題”屬性，可以為字段定義另外一個標題，便在報表或數(shù)據(jù)輸入窗囗中替代原有的字段名。 “字段大小”屬性：使用字段大小屬性可以設(shè)置在具有文本、數(shù)字或自動編號數(shù)據(jù)類型的字段中可保存數(shù)據(jù)的最大容量。字段大小的長度根據(jù)所選擇的數(shù)據(jù) 畢業(yè)設(shè)計（論文） 13 形式，由系統(tǒng)內(nèi)部設(shè)定。 “格式”屬性：用于定義顯示時該字段的數(shù)據(jù)樣式，可以選擇預定義的格式或輸入自定義的格式，對于不同的數(shù)據(jù)類型， Access 使用不同的設(shè)置格式?！?格式”屬性只影響數(shù)據(jù)的顯示方式，不影響數(shù)據(jù)的保存方式。 輸入掩碼：使用輸入掩碼屬性，可以使數(shù)據(jù)輸入更容易，并且可以控制用戶在文本框類型的控件中的輸入值。例如，可以為“電話號碼”字段創(chuàng)建一個輸入掩碼，以便向用戶顯示如何準確地輸入新號碼。 默認值：“默認值”屬性指定一個缺省值，在添加新記錄時默認值將自動輸入到字段中，它在輸入過程中可以被修改。定義默認值可以減少輸入量，也可以確保輸入數(shù)據(jù)的準確性。 有效性規(guī)則和有效性文本：“有效性規(guī)則”屬性用于對輸入到記錄、字段或控件中的數(shù)據(jù)作出要求。當輸入的數(shù)據(jù)違反了“有效性規(guī) 則”的設(shè)置時，將顯示“有效性文本”屬性指定的顯示給用戶的提示消息。 必填字段：可以使用“必填字段”屬性指定字段中是否必須有值，如果此屬性設(shè)置為“是”則輸入數(shù)據(jù)時，必須在此字段或綁定到此字段的控件中輸入 數(shù)值，而且此數(shù)值不能為 Null。 索引：可以使用“索引”屬性來設(shè)置單一字段索引，索引可加速對索引字段的查詢，還能加速排序及分組操作?？梢愿鶕?jù)需要，把多個字段設(shè)置為索引。索引在保存表時創(chuàng)建，并且在更改或添加記錄時，自動更新索引。任何時候都可以在表“設(shè)計視圖”中添加或刪除索引。 創(chuàng)建新表 打開已建數(shù)據(jù)庫“財物管理 系統(tǒng)”，出現(xiàn)如圖 所示窗口，選中“使用設(shè)計器創(chuàng)建表”，單擊“打開”按鈕，或雙擊數(shù)據(jù)庫窗口的對象列表中的“使用設(shè)計器創(chuàng)建表”，直接進入“設(shè)計視圖”窗口。 畢業(yè)設(shè)計（論文） 14 圖 使用設(shè)計器創(chuàng)建表 輸入各字段名稱，數(shù)據(jù)類型，并設(shè)置字段的屬性，表中未提到的屬性值取缺省值。 保存表：單擊菜單欄的“文件”菜單，然后單擊“保存”命令，則彈出“另存為”窗，在文本框中輸入表名“ billtriptab” ,然后單擊“確定”按鈕，這時，彈出一對話框“尚未定義主鍵”因為此系統(tǒng)的設(shè)計不需要定義主鍵。單擊“否”即可。 Access 即保存 新建表“ billtriptab”。這時，在表對象列表欄中，出現(xiàn)新的表對象“ billtriptab”。 單擊“打開”按鈕，或雙擊“ billtriptab”，打開表，輸入數(shù)據(jù)。如圖 所示。單擊“文件”菜單下的“保存”按鈕，保存該表的修改。 圖 “ billtriptab” 輸入數(shù)據(jù) 單擊數(shù)據(jù)庫視圖中的“新建”，選擇數(shù)據(jù)視圖，按上述方法，依次建立表：offtab 和密碼表。分別保存數(shù)據(jù)如圖 和 所示。 數(shù)據(jù)庫轉(zhuǎn)換 用 Access2021 創(chuàng)建的數(shù)據(jù)庫不能直接被 Visual 訪問，必須經(jīng)過轉(zhuǎn)換，操作步驟如下。 在 Access 的主窗囗的菜單欄中單擊“工具 (T)”菜單，然后依次選擇“數(shù)據(jù)庫實用工具 (D)”、“轉(zhuǎn)換數(shù)據(jù)庫 (T)”、“到早期 Access 數(shù)據(jù)庫版本 (P)”子菜單。 單擊“到早期 Access 數(shù)據(jù)庫版本 (P)”子菜單后，彈出的對話框，在“文件名 (N)”文本框中輸入“財物管理”，然后單擊“保存 (S)”按鈕即可。注意：如果的同一目錄下保存，轉(zhuǎn)換后的文件名不能與原文件名相同，否則無法轉(zhuǎn)換。這 畢業(yè)設(shè)計（論文） 15 里將轉(zhuǎn)換后的文件名存為“財物管理”，即以后在創(chuàng)建此商校財務管理 系統(tǒng)中所用到的數(shù)據(jù)庫。 圖 offtab 圖 密碼表 畢業(yè)設(shè)計（論文） 16 第 3章 窗體界面設(shè)計與操作 在這個程序中，一共出現(xiàn)了十一個窗體，它們分別是首頁、登陸、系統(tǒng)功能菜單、密碼修改、差旅費支出輸入表及打印、辦公用品費用支出輸入表及打印、查詢選擇、查詢及關(guān)于作者窗體。下面介紹這些窗體的界面設(shè)計和要實現(xiàn)的功能。 首頁窗體設(shè)計 該窗體作為商校財務管理系統(tǒng)的初始界面，用戶通過單擊窗體上的按鈕進行登錄或退出操作。窗體界面如圖 所示。 圖 首界面 其程序為： Private Sub Command1_Click() End Sub Private Sub Command2_Click() End 創(chuàng)建新工程 啟動 Visual Basic 后，單擊 Visual Basic 集成開發(fā)環(huán)境的“文件”菜單，然后單擊“新建工程”子菜單，系統(tǒng)彈出“新建工程”對話框 (如圖 )， 畢業(yè)設(shè)計（論文） 17 選擇“標準 EXE”工 程類型，然后單擊“打開 ” 按鈕，結(jié)果如圖 所示， Visual Basic 產(chǎn)生一個缺省名為“工程 1”的新工程，這個新工程自動添加一個缺省名為“ Form1” 的窗體。將 Form1 窗體的“ Caption” 屬性設(shè)置為“首頁。 圖 新建工程 圖 創(chuàng)建一個新工程 添加控件 完成窗體的添加和設(shè)計之后，就要在窗體上添加和設(shè)計控件，以完成應用程序用戶界面的設(shè)計。在窗體中添加控件的方法： (1)用鼠標雙擊工具箱中的控件圖標按鈕，該控件會以默認的大小和形狀出 畢業(yè)設(shè)計（論文） 18 現(xiàn)在窗體中央?？梢杂檬髽藢⒖丶系胶线m的 地方，并調(diào)整它的大小。 (2)用鼠標單擊工具箱中的控件圖標按鈕時，鼠標將變?yōu)槭中危诖绑w的適當位置單擊并托動鼠標，該控件便會添加到窗體中。 (3)如果在窗體中添加多個相同的控件，則按下面步驟進行。 先按住 Ctrl 鍵，然后用鼠標單擊工具箱中的控件圖標。 在窗體的適當位置單擊并托動鼠標，然后釋放就可以在窗體中添加一個控件。 重復前一步，可以添加多個控件。 首頁窗體包含一個標簽，兩個按鈕。 Label 控件是圖形控件，可以顯示用戶不能直接改變的文本。此處 Label 標簽用來顯示此系統(tǒng)的題目，設(shè)置 Label 屬性如圖 所示。 圖 設(shè)置 Lable屬性 CommandButton 按鈕在用戶選定命令或操作后執(zhí)行它，可以開始、中斷或者結(jié)束一個進程。將兩個 CommandButton 按鈕屬性的 Caption 值分別設(shè)為“進入”、“退出”。圖略。字體設(shè)置為宋體四號粗體。 編寫代碼格式 打開代碼窗口，在左面的列表中選擇要編寫代碼的控件，在右面的列表中選擇事件，即可以編寫代碼。代碼的編寫如圖 所示。 畢業(yè)設(shè)計（論文） 19 圖 編寫代碼 保存工程和窗體文件 在完成控件的設(shè)計和代碼的編寫后，可以保存過程和窗體文件 (實際上也可以在開發(fā)過程中隨時保存過程和窗體文件 )。單擊 Visual Basic 集成環(huán)境中的“文件 (F)”，然后單擊“保存工程”命令，即彈出“文件另存為”的對話框，詢問保存的窗體文件名，單擊“保存”按鈕即可。即可保存窗體文件 。然后 Visual Basic 繼續(xù)彈出“工程另存為”的對話框，將工程保存在自建的文件夾“商校財務管理系統(tǒng)”中，單擊“保存”按鈕即可。 登錄窗體設(shè)計 表 登錄窗體控件屬性列表 控件 屬性配置 控件 屬 性配置 Label1 Caption1:管理員序號 Data1 Visible:False DatabaseName:E:\vb\商校財務管理系統(tǒng) \財物管理 .mdb Connect:Access RecordSource:密碼表 Label2 Caption2:輸入密碼 Text1 Text1: Text2 Text2: Command1 Caption1:返回 此窗體包括兩個 Label、兩個 TextBox、一個 CommandButton 及一個 Data控件。 TextBox 控件用來在運行時顯示用戶輸入的信息，或者在設(shè)計或運行時為控件的 Text 屬性賦值。添加 Data 控件用來連接和讀取 Access 數(shù)據(jù)庫。界面設(shè)計如圖 所示。設(shè)置控件屬性列表，如表 所示。 畢業(yè)設(shè)計（論文） 20 圖 登錄窗體 “登錄”的程序設(shè)計得十分巧妙，只要管理員帳號輸入正確，就可以直接輸如密碼，如管理員帳號輸入錯誤系統(tǒng)將提示“帳號輸入錯誤，請重新輸入！”。此窗體只設(shè)計了一個“返回”按鈕，可見只要密碼輸入正確即可進入系統(tǒng)。窗體設(shè)計之簡單其程序如下 ： Private Sub Text1_Change() If Len() = 6 Then If IsNumeric() = True Then s = admin= x = (s + x) If Then MsgBox 帳號輸入錯誤，請重新輸入！ , , 登錄 SendKeys {home}+{end} Else = False End If Else MsgBox 您必須輸入數(shù)字內(nèi)容 畢業(yè)設(shè)計（論文） 21 SendKeys {home}+{end} End If End If End Sub Private Sub Text2_Change() If Len() = 4 Then If (mima) = Then = = = True Else MsgBox 密碼錯誤，請重新輸入！ , , 登錄 SendKeys {home}+{end} End If End If End Sub 系統(tǒng)功能菜單窗體設(shè)計 概述 該窗體向用戶展示本系統(tǒng)所具備的主要功能并供用戶選擇使用。如圖 所示。菜單欄出現(xiàn)在窗體的標題欄下面，并包括一個或多個菜單標題。當單擊一個菜單標題時，包含菜單 項目的列表就 被拉下來。菜單項可以包括命令 (如“新建”和“退出” )、分隔條和子菜單標題。我們能看到的每個菜單項與在“菜單編輯器”中定義的一個菜單控件相對應。 有些菜單直接執(zhí)行動作，如“退出系統(tǒng)”菜單項，將關(guān)閉應用程序。而有的菜單項顯示一個對話框，即要求用戶提供應用程序執(zhí)行動作所需信息的窗口。如此設(shè)計中的“關(guān)于”子菜單。 使用“菜單編輯器”可向現(xiàn)存的菜單中增加新命令、用自己的命令、產(chǎn)生新的菜單和菜單欄，改變和刪除現(xiàn)存的菜單和菜單欄?！安藛尉庉嬈鳌钡闹饕獌?yōu)點是使用方便，可以在只用很少的全交互方式中快速自定義菜單。 畢業(yè)設(shè)計（論文） 22 圖 系統(tǒng)功能菜單窗體 其中包括了系統(tǒng)設(shè)置、明細帳輸入、查詢、計數(shù)器等，系統(tǒng)設(shè)置中可修改密碼、返回界面，查詢功能則可以查詢到所有出差過老師的時間等。雖然只是一個小小窗體但里面包含了豐富的內(nèi)容，如下程序： Public lbl As Byte Private Sub about_Click() 1 End Sub Private Sub back_Click() Unload main End Sub Private Sub BILLOFF_Click() 1 End Sub Private Sub BILLTRIP_Click() 1 End Sub Private Sub CAL_Click() a = Shell(c:\windows\) End Sub Pri