這里以鏈接access數(shù)據(jù)庫為例。第一部分是通過語句鏈接，第二部分是通過控件鏈接一、通過語句鏈接數(shù)據(jù)庫，然后把相應(yīng)的數(shù)據(jù)賦值給某個文本框就行了。1.首先定義幾個全局變量DimcnAsNewADODB.ConnectionDimrsAsNewADODB.RecordsetDimconstrAsString2.給這些變量賦值，方便鏈接數(shù)據(jù)庫constr="Provider=Microsoft.Jet.OLEDB.4.0;"&"DataSource=D:\EffectSolution\科學(xué)效應(yīng)數(shù)據(jù)庫.mdb"紅色部分寫你自己的數(shù)據(jù)庫路徑。3.打開數(shù)據(jù)庫cn.openconstr打開表rs.open“select*from效應(yīng)表whereid=5“，cn取字符串并賦值給相應(yīng)的文本Text1.text=rs.fields(“效應(yīng)和現(xiàn)象名稱”)Text2.text=rs.fields(“文字解說”)關(guān)閉表rs.close關(guān)閉數(shù)據(jù)庫cn.close注意，最后兩步驟一定要有，不然下次打開數(shù)據(jù)庫的時候會提示出錯的，這樣的話，在窗口上建立兩個文本框就夠了。但是，在此之前還有一步一定要做，點(diǎn)"工程"-"引用"-找到"MicrosoftActiveXDataObject2.6"，如圖所示：顯示的結(jié)果如下圖所示：rs.Closecn.CloseEndSub二、通過ado控件鏈接數(shù)據(jù)庫，然后通過datagrid控件顯示數(shù)據(jù)庫中的相關(guān)表。過程示例：1.添加部件ado控件和datagrid控件，如圖所示：這樣工具欄里面會出現(xiàn)這樣兩個圖標(biāo)（最下面）：2.把這兩個控件添加到你的form1里面，這個不用演示吧3.右擊你添加的adodc1控件，選最后一個然后點(diǎn)General里面的UseConnectionString里面的那個Build，選擇microsoftJET4.0OLEDBProvider，選中之后點(diǎn)下一步；4.然后，點(diǎn)擊第一個項目右邊那個很多點(diǎn)的按鈕，找到自己的數(shù)據(jù)庫，選好之后點(diǎn)“打開“旁邊的文本框里面就有了數(shù)據(jù)路徑，像這樣：5.測試連接，成功了就行了6.點(diǎn)確定，顯示這樣一個界面：7.點(diǎn)右邊第三個RecordSource按鈕，設(shè)置成如下情況——cmdtext選擇1，然后輸入SQL語句，Select*from效應(yīng)表（表名，必填）8.設(shè)置好之后點(diǎn)確定就行了，這樣就通過adodc1控件連接到了數(shù)據(jù)庫中的這張表接下來是對datagrid控件的設(shè)置：9.把datag