【文章內(nèi)容簡介】 使用 UpdateControls方法將綁定控件的內(nèi)容恢復為其初始值，如同用戶更改了數(shù)據(jù)，然后又決定取消了這些更改。除了不會導致任何事件的發(fā)生之外，這個方法產(chǎn)生的效果與使當前行再次成為當前行一樣。由于此方法不會調(diào)用任何事件，可以使用這個方法來簡化一個更新操作，因為它不會觸發(fā)任何多余的驗證和更改世間過程。 （ 11） Refresh方法 Refresh方法用來重新建立或顯示與 Ado Data控件相連的數(shù)據(jù)庫記錄集。如果在程序代碼中改變了 ConnectionString、 RecordSource、 CommandType的屬性值，就必須用 Refresh方法來刷新記錄集。 Refresh方法的語法為： Ado Data 控件直接操縱數(shù)據(jù)庫 使用 Ado Data控件訪問數(shù)據(jù)庫，可以完全不用編寫代碼，只需通過簡單設(shè)置和操縱其屬性就可以實現(xiàn)與數(shù)據(jù)庫的連接，通過綁定數(shù)據(jù)感知控件就能提供一個訪問數(shù)據(jù)庫的界面，用來對數(shù)據(jù)庫數(shù)據(jù)的瀏覽、添加、刪除、修改等操作。 連接數(shù)據(jù)庫 使用 Ado Data控件連接到數(shù)據(jù)源要相對簡單得多，基本上可以用鼠標的操作來完成。具體的操作步 驟如下： ? 創(chuàng)建一個標準的 Visual Basic 工程，按前面介紹的方法將 Ado Data 控件添加到窗體中。 ? 在 Ado Data控件上單擊鼠標右鍵，在快捷菜單上選擇“屬性”命令，打開 Ado Data 控件的屬性對話框，如圖 24 所示。 Ado Data 控件的屬性對話框共有 5個選項卡，常用的是“通用”選項卡、“身份驗證”選項卡和“記錄源”選項卡。在“通用”選項卡中設(shè)置 Ado Data 控件的數(shù)據(jù)源屬性，在“身份驗證”選項卡中，設(shè)置訪問數(shù)據(jù)源時有關(guān)的安全信息，在“記錄”選項卡中，設(shè)置 Ado Data控 件返回記錄的記錄源。 ? 在“通用”選項卡中，選擇“使用連接字符串”單選按鈕，并單擊“生成”按鈕，打開“數(shù)據(jù)鏈接屬性”對話框，如圖 25所示。使用該對話框可以方便地建立和數(shù)據(jù)源的連接，而在應用程序的開發(fā)過程中，使用連接字符串有許多優(yōu)點（例如客戶端不用配置 ODBC數(shù)據(jù)源名稱等）。 ? 在“數(shù)據(jù)鏈接屬性”對話框中，第一步要做的工作是選擇數(shù)據(jù)源提供者程序。使用哪一種數(shù)據(jù)源，就選擇哪一種提供者程序。例如，使用本例的數(shù)據(jù)庫。就選擇 Microsoft OLE DB Provider，然后 單擊“下一步”按鈕。設(shè)計器切換到“連接”選項卡，如圖 26 所示，讓用戶設(shè)置使用的數(shù)據(jù)源。 ? 選擇或輸入數(shù)據(jù)庫的名稱。數(shù)據(jù)庫可以在本機硬盤上，也可以在網(wǎng)絡(luò)上。單擊數(shù)據(jù)庫名稱文本框旁邊的命令按鈕，然后在 Windows標準對話框中選擇作為數(shù)據(jù)源的 Microsoft Jet數(shù)據(jù)庫。 ? 單擊“測試連接”命令按鈕，測試剛才的設(shè)置是否正確及數(shù)據(jù)庫是否可用。如果當前設(shè)置的數(shù)據(jù)源可用，則 Visual Basic 給出一個連接成功的對話框。否則，警告連接失敗并給出失敗的原因。 ? 在“屬性”對話框中，切換到“身份驗證”選項卡， 如圖 27 所示。因為在設(shè)置連圖 24 Ado Data 控件的屬性對話框 圖 25 “數(shù)據(jù)鏈接屬性”對話框 接字符串時，已經(jīng)向 Ado Data 控件提供了身份驗證信息，所以當前不用再進行設(shè)置。如果連接不是用“數(shù)據(jù)連接屬性”對話框創(chuàng)建的，或者輸入的字符串中沒有包含身份驗證信息，則必須設(shè)置本選項卡，以便讓數(shù)據(jù)源的數(shù)據(jù)庫管理系統(tǒng)確定用戶權(quán)限。 ? 屬性對話框中，切換到“記錄源”選項卡。在“記錄源”選項卡中，可以在“命令類型”下拉列表框中選擇用于記錄源的命令類型?？捎玫倪x擇 ,如下表所示： 表 21 記錄源命令列表 ? 把該屬性設(shè)定為 2adCmdTable，把“表或存儲過程名稱”屬性設(shè)置為需要用的表。 ? 單擊“確定”按鈕，關(guān)閉屬性對話框，完成所有的設(shè)置。 移動記錄 根據(jù)前面的介紹可以知道， Ado Data控件必須通過綁定數(shù)據(jù)感知控件才能提供一個訪 屬性值 含義 8adCmdUnknow 未知類型，用戶在“命令文本”框中輸入創(chuàng)建命令對象所使用的 SQL語句 1adCmdText 文本類型，用戶在“命令文本”框中輸入創(chuàng)建命令對所使用的SQL語句 2adCmdTable 表類型，在“表或存儲過程名稱”下拉列表框中選擇一個表的名稱， Visual Basic 用該表創(chuàng)建一個命令對象，相當于輸入了“ Select * from Table”語句 4adCmdStoreProc 存儲過程，在“表或存儲過程名稱”下拉列表框中選擇一個查詢的名稱 表 1 記錄源命令類型表 問數(shù)據(jù)庫的界面，用來對數(shù)據(jù)庫數(shù)據(jù)的瀏覽、添加、刪除、修改等操作。 為了體現(xiàn)用 Ado Data控件直接進行記錄的移動，這里就要引入 DataGrid控件來進行數(shù)據(jù)的顯 示。具體的操作步驟如下： ? 在前面創(chuàng)建的項目中，按照 Ado Data控件的方法，在部件屬性框的控件標簽頁中選擇“ Microsoft Data Grid Control （ OLEDB）”控件，然后引入該控件。 ? 在工具箱中單擊 DataGrid控件的圖標，在前面創(chuàng)建的窗體中添加該控件。如圖 28所示。 ? 設(shè)置 DataGrid控件的 DataSource 屬性為 Adodc1。這樣就完成了 DataGrid 控件同Adodc1控件的綁定。 ? 然后保存該項目，接著運行便會看到如圖 29所示的運行結(jié)果。 ? 在 該運行窗口中直接單擊 Adodc1控件中的箭頭圖標即可實現(xiàn) DataGrid 控件中選定數(shù)據(jù)的上下移動。 增、刪、改記錄 增、刪、改記錄的操作同樣借助 DataGrid控件來實現(xiàn)。具體的步驟如下： ? 在上節(jié)完成的基礎(chǔ)上，只要設(shè)置 DataGrid控件的屬性即可實現(xiàn)對記錄的增、刪、改操作。右鍵單擊 DataGrid控件，在彈出的快捷菜單中選擇“屬性”，便會彈出如圖 210 所示的對話框。 圖 28 添加完 DataGrid控件 圖 29 運行窗口 ? 選中“允許添加”、“允許刪除”、“允許更新”復選框，代表 DataGrid控件可以進行記錄的 添加、刪除、更新。 ? 保存設(shè)置，運行程序，如圖 29 所示，最后一行是空白行，用來添加新的數(shù)據(jù)，選中整行之后，單擊鍵盤上的 Delete 鍵就可以刪除該行信息，隨便選中某個單元格，就可以進行數(shù)據(jù)的更改。 Ado Data 控件結(jié)合代碼操縱數(shù)據(jù)庫 使用代碼將 Ado Data 控件與數(shù)據(jù)庫進行連接，主要是在代碼中來完成上面介紹的手工設(shè)定 Ado Data 控件的屬性。由上面手工設(shè)置的步驟可以看出，主要對 Ado Data 控件的ConnectionString 屬性、 CommandType 屬性、 RecordSource 屬性進行了設(shè)置，因此可以在代碼中對以上屬性進行設(shè)置，代碼如下： 移動記錄 定位是指在一個記錄集中來回移動當前記錄指針或者改變當前記錄 .如 的 ,可以利用 Ado Data 控件上的箭頭按鈕瀏覽記錄集中的數(shù)據(jù) ,這些箭頭具有相應的RecordSet 對象方法 ,可以使用代碼完成相應的功能。 Ado Data 控件的單箭頭對應于RecordSet對象的 MoveNext和 MovePrevious方法，而雙箭頭對應于 MoveFirst和 MoveLast=” Provider=?！?_ amp?！?Data Source=F:\畢業(yè)設(shè)計 \企業(yè)工資管理系統(tǒng) .mdb?！?_ amp?！?Persist Security Info=False” =adCmdTable =” 部門信息表 ” 方法。 1） 當前記錄 當 前記錄是記錄集中可以被訪問的記錄，在任何時刻只有一條記錄是記錄集中的當前記錄，與 Ado Data 控件綁定的數(shù)據(jù)感知控件中顯示的數(shù)據(jù)也是該記錄的數(shù)據(jù)。 BOF和 EOF這兩個屬性的狀態(tài)決定了當前記錄的位置，可以用代碼來檢驗這兩個屬性的值，從而確定當前記錄。 1. 移動當前記錄 這里利用了 RecordSet 對象的 4種方法來移動記錄： MoveFirst， MoveLast， MoveNext和 MovePrevious方法。 ①． 如果想讓記錄集中的第一條記錄成為當前記錄，可以使用 MoveFirst方法。例如： ② 如果想讓記錄集中最后一條記錄成為當前記錄，可以使用 MoveLast 方法。例如： ③ 如果想讓記錄集中的下一條記錄成為當前記錄，可以使用 MoveNext方法。 MoveNext方法常用來逐個瀏覽數(shù)據(jù)庫中的數(shù)據(jù)。例如： 使用 MoveNext 方法時要注意 : 當 Ado Data 控件位于記錄集的最后一條記錄上是，如果再向后移動記錄 ,就會使得記錄集的 EOF屬性變?yōu)?True。如果將 Ado Data控件的 EOFAction屬性置為 1，那么這時當前記錄不再有效，并且清除被綁定的數(shù)據(jù)感知控件上的數(shù)據(jù)。這時不能再繼續(xù)執(zhí)行 MoveNext 方法，否則會產(chǎn)生一個可以捕獲的錯誤。所以在使用 MoveNext之前，最好先判斷記錄集對象的 EOF值，防止出錯，可以使用如下代碼： ④ 如果想讓記錄集上的上一條記錄成為當前記錄，可以使用 MovePrevious方法。例如：If =False Then End If . MovePrevious 和 MoveNext方法類似，使用 MovePrevious方法時要注意如果已經(jīng)把 BOFAction屬性設(shè)為 1，當 RecordSet 的 BOF 為 True 時，不能再繼續(xù)執(zhí)行 MovePrevious 方法，所以在使用MovePrevious方法前，最好先進行判斷記錄集對象的 BOF值，可以使用如下代碼： 增、刪、改記錄 除了移動記錄或查找特定的記錄外，還可以使用代碼來更新數(shù)據(jù)庫中的數(shù)據(jù)。在修改記錄集中的數(shù)據(jù)前，要先檢查數(shù)據(jù)庫和記錄集對象的 Updatable屬性是否為 True，如果為 True，說明該記錄集對象的數(shù)據(jù)是可以修改的。對于快照型的記錄集，無法修改它的數(shù)據(jù)。另外，還必須把 Ado Data控件的 ReadOnly屬性設(shè)置為 False。 1） 添加新記錄 如果確定可以更新數(shù)據(jù)庫和記錄集的數(shù)據(jù)，就可以向該記錄集添加記錄。添加新記錄的步驟是： 使用 AddNew方法創(chuàng)建一條空的新記錄，系統(tǒng)將保存當前記錄指針并移動到該新記錄。 給該新記錄的各字段賦予新值。 用 Update方法保存新記錄，同時當前記錄指針恢復為原值。 如下面的例子，在代碼中給各字段賦予新值： 2）編輯當前記錄 If =False Then End If (“ 姓名 ” )=” 王聰 ” (“ 性別 ” )=” 男 ” ?? . Update 要改變數(shù)據(jù)庫中的數(shù)據(jù)，必須先把要編輯的記錄設(shè)為當前記錄，然后在被綁定的數(shù)據(jù)感知控件中完成修改。要保 存數(shù)據(jù)的修改，只需把當前記錄指針移到其他記錄上，或者使用Update方法保存數(shù)據(jù)。 使用代碼編輯修改當前記錄的步驟如下： 把當前記錄定位到要編輯的記錄上。 修改當前記錄中各個字段的值。 使用 Update、 Move、 Find和 Seek方法中的任何一種保存數(shù)據(jù)的修改。 例如下面的代碼修改姓名為 ” 王聰 ” 的記錄的 ” 年齡 ” 字段的值 : 另外，也可以定位到要編輯的記錄后，使用 Edit 方法，然后用戶可以在被綁定的數(shù)據(jù)感知控件中修改數(shù)據(jù)，最后用 Update方法保存修改后的數(shù)據(jù)。 3）刪除記錄 要在記 錄集中刪除一個記錄，首先要將當前記錄指針定位到刪除的記錄上，然后使Delete 方法刪除該記錄。要注意的是，在每次刪除以后，在移動到其他記錄之前已刪除的記錄將保持為當前狀態(tài)，必須使用 MoveNext方法或 MovePrevious方法來改變當前記錄，因為已刪除的記錄不再包含有效的數(shù)據(jù)，繼續(xù)訪問該記錄將導致錯誤。 ” 姓名 =’ 王聰 ’” ‘ 查找王聰?shù)?記錄 If Then Msgbox” 沒有該學生的記錄 !” Else (“ 年齡 ” )=” 22” ‘ 修改字段值 ‘ 保存修改 End If 第 3 章 軟件設(shè)計 功能分析 開發(fā)這個系統(tǒng)的目的就是幫助 高校 的財務(wù)主管部門提高工作效率，實現(xiàn) 高校 工資信息管理的系統(tǒng)化、規(guī)范化和自動化。系統(tǒng)最終應主要實現(xiàn)如下功能： ? 系統(tǒng)：包括修改用戶密碼和 退出系統(tǒng)。 ? 工資管理部分：包括 教師 基本工資的設(shè)置、 教師 考勤信息的統(tǒng)計、 教師 工資的結(jié)算和固