1、開放型數據庫訪問控件4ttT4概述KWBGrid控件是一個組態王提供的用于訪問數據庫的Active X控件，該控件是通過AD0接I I實現的。 通過該控件，在組態王界面中用戶可以很方便的訪問到數據庫、編輯數據庫。可以通過數據庫查詢窗II對 數據庫中的數據進行查詢，也可以用控件的統計函數計算出控件中數據的最人、最小值和平均值等，還可 以用函數動態的添加和刪除字段。既可以通過ODEC連接數據庫，也可以通過ADO連接數據庫顯示數據庫表中的數據，可選擇顯示字段，編輯查詢條件開發狀態可設置顯示表頭在開發和運行狀態均可選擇是否顯示視圖（虛擬表）運行狀態可編輯表格中數據運行狀態可動態設置數據源、數據庫、數據

2、表等參數運行狀態可動態選擇字段、編輯查詢條件等操作可打印表格中顯示的數據，可進行橫向和縱向分頁可通過查詢窗I I幫助用戶生成查詢語句，而無需用戶輸入創建KvdbGrid控件*1入程ft單擊工具箱中的“插入通用控件”按鈕或選擇菜單命令“編輯插入通用控件”，則彈出控件對話框。 在插入控件對話框內選擇“KvDBGnd Class”，如圖-1所示：*1入程ftCl KMXLAKI3 Bnfes3TZ耐歐妙Lvyuxl 7atw Er.d Liycat Potwr Stcrt LvyuxlEr.dLiycatStcrtruxlX*! Cantr ol LOKT Ijcrosott tcchsgQ剣05V

3、F畧g管包多LOXT破至 51彌底瞇即LOXTAbootDlc 拆必 LOXTA-rU .ox 歐煩 LDVKmpr如“ 眈!口LOVJf g班力cabg廉曲 rj7Li*tTirQ.x ?f!CT mnva5Si4i?.Df)c swld用鼠標左鍵單擊“確定”按鈕，鼠標變成十字形，然后在畫面上畫一個矩形框，KvDBGnd控件就放 到畫面上了。可以任意移動、縮放控件，如同處理一個單元圖素一樣，如圖2所示:圖2KvDBGrid控件的固有屬性選擇控件后單擊鼠標右鍵，在彈出的下拉式菜單中選擇“控件屬性”命令。彈出控件固有屬性頁，可分別設置如下屬性，如圖3所示：數據源屬性頁：該屬性頁主要定義控件連接的

4、數據源、數據表并對每個字段在控件中顯示的標題、格 式、對齊方式、小數點位數（如果是數值型的話）進行設置。也可以直接在這里指定查詢的條件，也可以 在運行時修改控件屬性以改變查詢條件。單擊“瀏覽”按鈕可選擇或新建ODEC數據源。選擇數據源后“表名稱”組合框中就自動填充了可選的表名稱，可彈出下拉列表選擇要顯示的數據所 在的表名稱，如圖4所示：圖4選擇表名稱后，“有效字段”中自動列出原表中的所有字段，可通過“添加”、“刪除S “上移S “下 移”按鈕來選擇要顯示的字段和顯示順序。選中任一顯示的字段，可在右側設置該字段顯示的標題、格式、對齊等屬性。如圖5所示：圖5最后在查詢條件”中設置限制條件（SQL語

5、法），只輸入SELECTWHERE語句之后的部分。如 查詢“報瞥口期”為2003年1月1 口的報警信息，則在該文本框中輸入：AlamiDate=,2003/l/r表格屬性頁：設置表格在運行狀態時的外觀和可操作性，如圖6所示：圖6北京亞控科技發展有限公司可設置表格的一般屬性。說明：如固定行數大于1,則第一行顯示選擇字段的標題，其它固定行不自動填充，要由使用者在設 計狀態編輯其顯示內容。顏色屬性頁：顏色屬性頁如圖7所示：I謝6 ；曲二|牛體I打卬迎IJS性.HnnoHnBackedFlx OColrFiz4Lt xtColaFixedShd-y/ColFLXQnaU：doYHnnoHnBacked

6、Flx OColrFiz4Lt xtColaFixedShd-y/ColFLXQnaU：doYKs alBlfolcc傑憶臼左#韻色.| 定 | 廉稱 | 師| 忘勸 |圖7可設置表格顏色、背景顏色、文本顏色等信息。字體屬性頁：字體屬性頁如圖8所示：圖8可設置固定行字體、普通行字體、打印頁眉、頁腳、標題字體等信息。打印設置屬性頁：打印設置屬性頁如圖9所示：圖圖9在打印設置屬性頁中可設置打印標題，頁眉，頁腳及其位置。頁碼格式和位置。可對每一頁進行單獨 的頁面設置。KVDBGrid控件的常用屬性和方法(1) Where屬性：字符串型屬性，設置查詢條件，如果不需要任何條件，則字符串為空。如按時間查

7、詢：CU1. Where二AlarmDate二2004/11/1(2 ) CurCellText屬性：字符串型屬性，可取得當前所選單元文本的值。例如： stiCuiSelText=Ctii.CurCellText：其中，strCurSelText為組態王內存字符串變屋，Ctrl為控件名稱。AddAllFields (LONGlFieldWidth, BOOLbReadOiily)方法：添加當前指定表的所有字段。 參數：LONG lFieldWidth添加的這些字段的字段寬度；BOOL bReadOnly所添加的字段是否為只讀(1表 示字段只讀，0表示字段可讀寫)。AddField (STRIN

8、G bstiName, STRING bstrTitle, LONG lFieldWidth, BOOL bReadOnly)方法： 根據指定的字段名添加字段。參數：STRING bstrName指定添加的字段的字段名；STRING bstiTitle被添加字段的實際顯示名稱；LONG lFieldWidth 字段的寬度；BOOLbReadOnly所添加的字段是否為只讀(1表示字段只讀，0表示字段可讀寫)。AddFieldNo (LONG ICol,STRING bstrTitle,LONG lFieldWidth,BOOL bReadOnly)方法：根據指 定的字段所在列號(以0開始)添加字

9、段。參數：LONGlCol指定添加的字段在數據表中以0開始的列號；STRING bstiTitle此被添加字段的實際顯示名稱，若為空格，則取缺省的名稱即該字段名作為顯示名 稱：LONG lFieldWidth 字段的寬度；BOOLbReadOnly所添加的字段是否為只讀(1表示字段只讀，0表示字段可讀寫)。添加的字段如果原來已經被添加，則方法調用失敗。AverageValueniField (LONG lCol)方法：求參數LONG lCol以0為基數的字段所在列的平均值。AverageValueliiFieldName (STRING bstrFieldName)方法：求 STRING bs

10、trFieldNaine 字段所在 列的平均值。STRING bstrFieldName為指定的字段名。CoiifigO方法：在運行狀態彈出“數據查詢選擇”對話框供用戶配置。如圖-10所示：圖-10DeleteAllFieldsQ方法：刪除所有字段。DeleteField (STRING bsUName)方法：刪除bstrNaine所指定名稱的字段。當所選字段中沒有 指定的bsUName字段，則調用返回失敗。DeleteFieldNo (LONG ICol)方法：刪除lCol所指定列(以0開始)的字段。當lCol有錯,則 調用返回失敗。DiffeiLastFirstniField (LONG

11、lCol)方法：求參數LONG lCol以0為基數的字段所在列的差值 (最后一條記錄與第一條記錄的差值)。DifferLastFirstliiFieldName (STRING bstrFieldName)方法：求 STRING bstiFieldName 字段所在 列的差值(最后一條記錄與第一條記錄的差值)。STRING bsuFieldNaine為指定的字段名。FetchData ()方法：執行數據查詢，并將查詢到的數據填充到表格中。在使用FetchData () 方法后，必須調用FetchEnd ()方法，結束本次查詢。否則回造成系統資源上的不必要的丟失。如圖-11 所示，為簡單的數據查

12、詢使用方法。圖-11GetCeitamCellText (LONGlRow,LONGlCol)方法：獲取指定單元格中的數據。調用方式： strCurSelText 二Ctrl. GetCertainCellText (4, 5);,行和列的編號是從0開始的,這里將第4+1=5行、第 5+1=6列的數據傳遞給字符串內存變量strCurSelText oMaxValuelnField (LONG ICol)方法：求參數LONG ICol以0為基數的字段所在列的最人值。MaxValuelnFieldName (STRING bstrFieldName)方法：求 STRING bsuFieldNain

13、e 字段所在列 的最人值。STRING bstrFieldName為指定的字段名。MmValueliiField (LONG ICol)方法：求參數LONG ICol以0為基數的字段所在列的最小值。MinValueliiFieldNaine (STRING bstrFieldName)方法：求 STRING bsuFieldNaine 字段所在列的 最小值。STRING bstrFieldName為指定的字段名。Pnnt()方法：打印函數。調用時總會彈出“打印機設置對話框”，此時對話框中的設置已初始化 為開發系統保存時的打印參數，給用戶在打印之前有一次修改打印參數的機會。PrmtDirectl

14、yQ方法：直接打印函數，為了滿足某些工程要求的自動定時打印，調用此函數可用 設置好的打印參數直接打印。(此函數只在專用版本中才有)RefreshDataO方法：按照上次查詢的條件，重新刷新一遍表格中的數據。RemoveAllData()方法：刪除KVDBGrid表中的所有數據。SaveToCSV (STRING bstrCSV)方法：將當前KVDBGrid表中的所有數據保存成指定的CSV格式 的文件。需要指定參數：保存路徑和文件名。ScrollToBottom()方法：鼠標焦點定位到KVDBGrid表的最底部。(26 ) SetComiectParam ( STRING bstrDNS,STR

15、ING bstiCatalog.STRING bstiUserName,STRING bstrPWD)方法：設置ODBC連接參數。參數：STRING bstrDNS ODBC連接的數據源名稱；STRING bstiCatalog指定的數據庫名稱，在SQLServer、Oracle中指定數據庫名稱，在Access數據 庫中為空，不需指定，用空格表示，不能為空字符串：STRING bsti-UserName用于登陸連接的用戶名，如為空，用空格表示，不能為空字符串；STRING bstiPWD 登陸用戶名的密碼，如為空，用空格表示，不能為空字符串。SunihiField (LONG ICol)方法：

16、求參數LONG ICol以0為基數的字段所在列的累加值。SumlnFieldName (STRING bstrFieldName)方法：求 STRING bstrFieldName 字段所在列的累 加值。STRING bstrFieldName為指定的字段名。KVDEGnd控件查詢屬性：可通過調用QueyDialogO方法實現查詢條件的配置。函數調用方法：Ctrl. QueiyDialogO;參數：無返回值：0 -查詢窗II按取消返回，查詢窗II按確定返回。執行函數后將彈出如圖-12所示的“查詢條件對話框”：圖J2此對話框可以設置四組查詢條件的組合，并可以對查詢數據進行排序。在對話框的左側有四個復選框 可以選擇，可用于確定共有幾組查詢條件。用戶可從下拉框中選擇查詢條件所需要的字段，之后依次選擇 比較操作符，構成條件所需要的數值。如果選擇的字段為口期或時間型的類型，可以方