vb數(shù)據(jù)庫編程模式-文庫吧資料
2025-05-21 23:32本頁面
【正文】 定圖形框?！盎謴?fù)原表內(nèi)容”按鈕的指令代碼為：Private Sub Command3_Click() = 基本情況End Sub以上介紹的是在Data控件上使用SQL，如果要在ADO數(shù)據(jù)控件上使用SQL語句，最好通過代碼配合ADO數(shù)據(jù)控件完成數(shù)據(jù)庫的連接，這可給程序帶來更大的靈活性。 使用SQL的統(tǒng)計(jì)函數(shù) 有時(shí)，我們只要返回一定數(shù)量的記錄，如獲取平均成績最好的前5名，則“按平均成績統(tǒng)計(jì)前5名” 按鈕的指令代碼為：Private Sub Command2_Click() = select top 5 學(xué)號(hào),avg(成績) as 平均成績 from 學(xué)生成績表 group by 學(xué)號(hào) order by avg(成績) desc End Sub這里，“Group by 學(xué)號(hào)”短語將同一學(xué)生的各門課程的記錄合并成一條記錄，由Avg(成績)計(jì)算出該學(xué)生的平均成績，“Order By Avg(成績) Desc”短語按平均成績的降序排列數(shù)據(jù)，“Top 5”短語返回最前面的5條記錄。若希望按用戶要求的標(biāo)題顯示統(tǒng)計(jì)摘要值，可用As短語命名一個(gè)別名?！癎roup By專業(yè)”可將同一專業(yè)的記錄合并成一條新記錄。網(wǎng)格控件的DataSource=Data1。 。Select短語中字段的排列決定了所產(chǎn)生的記錄集內(nèi)每一列數(shù)據(jù)的排列順序。如果要求顯示的記錄按一定的順序排列，可使用ORDER BY子句。RecordSource屬性空缺，各文本框的DataSource=Data1，DataField屬性分別設(shè)置為學(xué)號(hào)、姓名、課程、成績，而照片字段綁定圖形框。 If Then MsgBox 無此專業(yè)!, , 提示 = 基本情況 End IfEnd Sub ，并通過數(shù)據(jù)控件瀏覽記錄集。 mzy amp。也可用SQL語句實(shí)現(xiàn)模糊查詢，命令按鈕Command5_Click事件改為如下代碼：Private Sub Command5_Click() Dim mzy As String mzy = InputBox$(請(qǐng)輸入專業(yè), 查找窗) = Select * From 基本情況 Where 專業(yè) like 39。此時(shí)，表示記錄過濾后無數(shù)據(jù)，重新打開原來的基本情況表。 39。 amp。 39。 amp。 ，顯示某專業(yè)的學(xué)生記錄。Data控件的RecordSource屬性不—定是數(shù)據(jù)表名，可以是數(shù)據(jù)表中的某些行或多個(gè)數(shù)據(jù)表中的數(shù)據(jù)組合。(步驟4)選定MSHFlexGrid數(shù)據(jù)網(wǎng)格形式的數(shù)據(jù)訪問窗口運(yùn)行結(jié)果。 數(shù)據(jù)窗體向?qū)?chuàng)建的數(shù)據(jù)訪問對(duì)話框(步驟4)選定網(wǎng)格(數(shù)據(jù)表)形式的數(shù)據(jù)訪問窗口運(yùn)行結(jié)果?？梢詫?duì)產(chǎn)生的窗體布局形式進(jìn)行調(diào)整或在此基礎(chǔ)上加上其他控件對(duì)象。步驟7：進(jìn)入“數(shù)據(jù)窗體向?qū)А淹瓿伞睂?duì)話框。 其中，“記錄源”下拉式列表框用于選擇數(shù)據(jù)庫中的表單，本例選擇“基本情況”表；窗口中間的4個(gè)箭頭按鈕用于選定字段，“列排序按”下拉式列表框用于選擇排序依據(jù)。本例窗體名為frmjbqk，選“單個(gè)記錄”形式，使用“ADO數(shù)據(jù)控件”訪問數(shù)據(jù)。步驟4：在“數(shù)據(jù)窗體向?qū)А狥orm”對(duì)話框內(nèi)設(shè)置應(yīng)用窗體的工作特性。本例中選擇Access數(shù)據(jù)庫。 步驟1：執(zhí)行“外接程序”菜單中的“數(shù)據(jù)窗體向?qū)А泵?，進(jìn)入“數(shù)據(jù)窗體向?qū)Ы榻B”對(duì)話框，可以利用先前建立的數(shù)據(jù)窗體信息配置文件創(chuàng)建外觀相似的數(shù)據(jù)訪問窗體，選擇“無”將不使用現(xiàn)有的配置文件。 具有增、刪、改功能的數(shù)據(jù)網(wǎng)格綁定9．5．4 使用數(shù)據(jù)窗體向?qū)isual Basic ，通過幾個(gè)交互過程，便能創(chuàng)建前面介紹的ADO數(shù)據(jù)控件和綁定控件，構(gòu)成—個(gè)訪問數(shù)據(jù)的窗口。、刪、改功能的數(shù)據(jù)網(wǎng)格綁定。再次用鼠標(biāo)右鍵單擊DataGrid控件，在彈出的快捷菜單中選擇“編輯”選項(xiàng)，進(jìn)入數(shù)據(jù)網(wǎng)格字段布局的編輯狀態(tài)，此時(shí)，當(dāng)鼠標(biāo)指在字段名上時(shí)，鼠標(biāo)指針變成黑色向下箭頭。 如果要改變DataGrid網(wǎng)格上顯示的字段，可用鼠標(biāo)右鍵單擊DataGrid控件，在彈出的快捷菜單中選擇“檢索字段”選項(xiàng)。設(shè)置DataGrid網(wǎng)格控件的DataSource屬性為Adodc1，就可將DataGrid1綁定到數(shù)據(jù)控件Adodc1上。 DataGrid控件允許用戶同時(shí)瀏覽或修改多個(gè)記錄的數(shù)據(jù)。 ，并使之具有編輯功能。 Visual Basic ，又增加了DataMember與DataFormat屬性使數(shù)據(jù)訪問的隊(duì)列更加完整。這些新成員主要有DataGrid、DataCombo、DataList、DataReport、MSHFlexGrid、MSChart控件和MonthView等控件。由于ADO數(shù)據(jù)控件是一個(gè)ActiveX控件，也可以用鼠標(biāo)右鍵單擊ADO數(shù)據(jù)控件，在彈出的快捷菜單中選擇“ADODC屬性”菜單命令，打開ADO數(shù)據(jù)控件屬性頁對(duì)話框，一次完成步驟1~步驟4的全部設(shè)置。 在“命令類型”下拉式列表框中選擇“2adCmdTable”選項(xiàng)，在“表或存儲(chǔ)過程名稱”“基本情況”表，關(guān)閉記錄源屬性頁。為保證連接有效，可單擊“連接”選項(xiàng)卡右下方的“測試連接”按鈕，如果測試成功則關(guān)閉ConnectionString屬性頁。在“提供者”選項(xiàng)卡內(nèi)選擇一個(gè)合適的OLE DB數(shù)據(jù)源，選擇“Microsoft Jet OLE DB Provider”選項(xiàng)。步驟3：采用“使用連接字符串”方式連接數(shù)據(jù)源。 “使用Data Link文件”表示通過—個(gè)連接文件來完成。 步驟2：單擊ADO控件屬性窗口中的ConnectionString屬性右邊的“…”按鈕，彈出“屬性頁”對(duì)話框。3．設(shè)置ADO數(shù)據(jù)控件的屬性 。（4）MaxRecords屬性定義從一個(gè)查詢中最多能返回的記錄數(shù)。該屬性值可以是數(shù)據(jù)庫中的單個(gè)表名，一個(gè)存儲(chǔ)查詢，也可以是使用SQL查詢語言的一個(gè)查詢字符串。該屬性包含了用于與數(shù)據(jù)源建立連接的相關(guān)信息，ConnectionString屬性帶有4個(gè)參數(shù)。ADO數(shù)據(jù)控件與Visual Basic的內(nèi)部Data控件很相似，它允許使用ADO數(shù)據(jù)控件的基本屬性快速地創(chuàng)建與數(shù)據(jù)庫的連接。引用方式是執(zhí)行“工程”菜單的“引用”命令，啟動(dòng)引用對(duì)話框，在清單中選取“Microsoft ActiveX Data Objects Library”選項(xiàng)。ADO對(duì)象模型定義了—個(gè)可編程的分層對(duì)象集合，主要由三個(gè)對(duì)象成員Connection、Command和Recordset對(duì)象，以及
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1