本文歡迎非商業用途的轉載,但需要注明出自“編程入門網”及相應的網址鏈接。
本系統是一個很簡單的數據庫操作實例，能夠對數據庫的添加、修改及刪除記錄這幾個基本的操作。系統使用數據顯示控件MSHFlexGrid顯示數據庫中的記錄，使用數據鏈接控件Adodc鏈接數據庫作為MSHFlexGrid的數據源，使用文本框來接收系統運行時用戶輸入的數據。
步驟如下：
一、啟動vb6，新建一個標准exe工程，並將工程中的form1的caption屬性設置為“編程入門網網址管理系統”，width屬性值設為7950，height屬性值設為4620。
二、向窗體中添加一個Adodc控件。如果在工具箱中找不到Adodc控件，可以右擊工具箱，選擇“部件...”菜單項，然後在“部件”窗口的“控件”選項卡中選中“Microsoft ADO Data Control6.0(OLEDB)”。
在VB的屬性窗口我們對Adodc控件的三個個屬性值進行編輯，其余屬性值使用默認的即可：
1、ConnectionString屬性值設為：Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\vb\Access_db.mdb;Persist Security Info=False
這個屬性設置了連接Access_db.mdb這個數據庫。
2、RecordSourc屬性值設為：select * from wzdz
這個屬性值中的sql語句的作用是查詢出wzdz表中的所有記錄。
3、Visible屬性值設為False，作用是使其在運行時不可見。
三、向窗體添加一個MSHFlexGrid控件，如果工具箱中沒有MSHFlexGrid控件，可以右擊工具箱，選擇“部件...”菜單項，然後在“部件”窗口的“控件”選項卡中選中“Microsoft Hierarchical FlexGrid Control 6.0 ”。然後在vb的屬性窗口中將MSHFlexGrid控件的名稱修改為MS1，如下圖：
然後對MSHFlexGrid控件進行如下設置：
1、DataSource屬性：在vb的屬性窗口中將其值設為Adodc1，即使用Adodc控件作為其數據源。
2、BackColorBkg屬性：在vb的屬性窗口中將其值設為&H00FFE0E0&，這是設置的MSHFlexGrid控件的底色。
3、BackColorFixed屬性：在vb的屬性窗口中將其值設為&H00C0FFFF&，這是設置的MSHFlexGrid控件的顯示標題的底色。
4、width屬性：在vb的屬性窗口中將其值設為7695.
5、Height屬性：在vb的屬性窗口中將其值設為2175.
6、右擊MSHFlexGrid控件，在彈出的菜單中選“屬性”，在彈出的“屬性頁”對話框的在“通用”選項卡中修改行為4，修改列為4，修改固定行為0，修改固定列為0。如果數據鏈接正常，在“屬性頁”對話框的“帶區”選項卡中可以看到列標題和列名稱已經設置了，這裡注意應該將“帶區”選項卡中的“列標頭”選項勾選上，否則運行時無法顯示列標題，如下圖。“屬性頁”對話框的其它部分使用默認值即可。
四、向窗體中添加4個Label控件（標簽），在vb的屬性窗口為它們設置以下屬性：
1、caption屬性：分別設置為網站名稱、網站地址、網站描述及編號。
2、Alignment屬性：均設為“2-Center”。
3、AutoSize屬性：均設為True。
五、向窗體中添加4個TextBox控件（文本框），並調整它們的位置成一排與4個標簽相對應，即：網站名稱→Text1，網站地址→Text2，網站描述→Text3，編號→Text4。
六、向窗體中添加4個CommandButton控件（命令按鈕），將它們的caption屬性分別設置為“添加記錄”、“修改記錄”、“刪除記錄”和“退出系統”，並調整它們的位置成一排，放在文本框的下方。
七、在兩排文本框和命令按鈕中間，添加一個Line控件，適當拖動其兩端的控制點將長短調整至適當，並將其BorderColor屬性性設為&H00C00000&，作用是把文本框和命令按鈕隔開，這樣在視覺上似乎能好看些。
八、所有控件設置完畢後，界面如下圖所示：
下一步的工作，是為對象添加事件代碼。
查看全套“vb神童教程(續)”
