vb打開資料庫
Ⅰ 如何在VB中用DAO方法創建、打開、修改資料庫
引用DAO類型庫
1、從「工程」菜單中選擇「引用」菜單項;
2、在可引用列表框中選擇「Microsoft DAO 3.51 Object Library」項。
3、最後「確定」即可
設置DAO數據類型變數
DAO數據類型變數共分成兩種:
1、Database變數
對應於Access資料庫,通常在模塊中被定義為Public全程變數:
Public AccessDBF As Database
'定義資料庫對象實例AccessDBF
2、RecordSet變數
對應於Access資料庫中的一個表,可定義為全程變數或局部變數,亦可作殲鋒為函數參數進行傳遞:
Dim thePrintTable As RecordSet
'定義一個表對象實例thePrintTable
打開DAO數據類型
1、打開Access的方法
通常可設置一個專門的Public函數用來打開一個Access資料庫,並且該函數在啟動窗體的Private Sub Form_load ( )過程中被調用,函數定義格式如下:
Public Sub OpenDatabase ( )
Dim sConeect As String
SConnect = ";PWD = 8830428; UID = admin "
'設置打開時的用戶名、口令等參數
Set AccessDBF = Nothing
'確認關閉對象實例
Set AccessDBF = WorksPaces (0 ).OpenDatabase (App.Path&&"/ToXls.MDB",False,sConnect)
'打開當前路徑的ToXls.MDB資料庫
End Sub
2、打開RecordSet的方法
RecordSet遵循即用即開的原則,所以它通常在函數中打開
Set thePrintTable = AcessDBF.OpenRecordSet ( "Table_1",dbOpenSnapshot )
相關的數據操作
數據實際需要對Access表中的記錄、欄位、數據項進行操作。下列雙早判重循環把數據氏睜晌輸出到Excel對應的單元格中:
For j = 0 To 2
For I = 0 To 3
ThePrintTable.MoveNext
Excel.Sheet.Range ( Trim ( chr ( 71+j*10+I ) )+"G").Value = thePrintTable.Fields (0)
Next I
Next j
關閉資料庫
1、關閉Database
它通常在整個應用程序的最後進行操作,即通常出現在Private Sub Form_unload (Cannel As Interger )過程中。命令格式實例如下:
AccessDBF.Close
2、關閉RecordSet
它遵循用完即關的原則,所以通常出現在函數中。當完成了相關的數據操作後就關閉它,下次再用時再打開即可:
thePrintTable.Close
Ⅱ 怎麼樣在VB中打開.mdb資料庫
1.首先在控制項箱中添加「ADODC」和「DBGRID」2個控制項.方法:右鍵點擊控制項箱,在彈出的菜單中左鍵單擊「部件」,在部件選項卡中選擇「Microsoft ADO Date Control 6.0(OLEDB)」和「Microsoft DataGrid Control 6.0(OLEDB)」復選框,然後「確定」。這樣ADODC 和DATAGRID 控制項就添加在控制項箱中了。 2.然後在窗體上放置放置一個adodc控制項,單擊控制項,在屬性窗口點擊「connectionstring」屬性右側敬唯的帶…森稿游的按鈕,選擇「使用字元串(C)」選項,點擊「生成」按鈕此銷,在彈出的「資料庫鏈接屬性」的「提供程序」選項卡中選擇「Microsoft Jet 4.0 OLE DB Provider」,點擊「下一步」,在「鏈接」選項卡中選擇你的資料庫,單擊「測試鏈接」按鈕,成功後單擊「確定」按鈕,則創建ADO Data控制項的鏈接就成功了。在ADODC屬性窗口點擊「recordsource」右側帶…的按鈕,選擇「命令類型」為「2-adcmdtable」,設置一個表或存儲過程名位記錄源。在「表或存儲過程名稱」的下拉列表中選擇你要顯示的表,單擊確定按鈕。ADODC控制項的屬性設置完成。 3.在窗體上放置一個datagrid控制項,單擊控制項,在屬性窗口點擊datasource,在右側下拉菜單中選擇adodc1,如果你的窗體上有多個數據源,這里下拉菜單中就會有多個選擇。 4.右鍵單擊datagrid控制項,然後選擇「檢索欄位(retrieve fields)命令,就會用數據源的記錄集自動填充該控制項。單擊「屬性」。使用「屬性頁」選項卡設置該控制項的適當屬性。 5.F5,這里就可以查看和修改了。 還有另外一種辦法 在vb菜單欄點擊「外接程序」,選擇「可視化數據管理器」,在彈出的「可視化數據管理器」窗口visadata中選擇「文件」「打開資料庫」選擇「microsoft access」命令打開你的資料庫。你的資料庫的大部分信息就會在新彈出的「資料庫窗口」中顯示了。窗口中有什麼功能,自己去摸索吧,我還沒完全搞清楚,只能給你講這么多了。 打字真累啊!!
Ⅲ vb打開mdb資料庫文件
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
''d:\123.mdb 這里要寫名你的文件在D盤鉛讓上的絕對路改激羨徑
Private Sub Command1_Click()
ShellExecute Me.hwnd, "核拍open", "d:\123.mdb", "", "", 1
End Sub
Ⅳ VB怎樣讀取資料庫並顯示出來
VB讀取資料庫並顯示出來的方法可參考下面用控制項的實現方法:
ACCESS資料庫,用VB6里的Data控制項,選中它,設置屬性:
DatabaseName屬性:連接到資料庫文件
RecordSource屬性:連接數據表(可以用Select語句返回記錄集)
然後使用它的:data1.Recordset.Fields(「欄位名」),就可以返回獲得你說的內容了。
Ⅳ 如何用VB(代碼)打開mdb資料庫並且可以顯示和修改裡面的內容
1.首先在控制項箱中添加「ADODC」和「DBGRID」2個控制項.方法:右鍵點擊控制項箱,在彈出的菜單中左鍵單擊豎銀「部件」,在部件選項卡中選擇「Microsoft
ADO
Date
Control
6.0(OLEDB)」和「Microsoft
DataGrid
Control
6.0(OLEDB)」復選框,然後「確定」。這樣ADODC
和DATAGRID
控制項就添加在控制項箱中了。
2.然行拆後在窗體上放置放置一個adodc控制項,單擊控制項,在屬性窗口點擊「connectionstring」屬性右側的帶…的按鈕,選擇「使用字元串(C)」選項,點擊「生成」按鈕,在彈出的「資料庫鏈接屬性」的「提供程序」選項卡中選擇「Microsoft
Jet
4.0
OLE
DB
Provider」,點擊「下一步」,在「鏈接」選項卡中選擇你的資料庫,單擊「測試鏈接」按鈕,成功後單擊「確定」按鈕,則創建ADO
Data控制項的鏈接就成功了。在ADODC屬性窗口點擊「recordsource」右側帶…的按鈕,選擇「命令類型」為「2-adcmdtable」,設置一個表或存儲過程名位記錄源。在「表或存儲過程名稱」的下拉列表中選擇你要顯示的表,單擊確定按鈕。ADODC控制項的屬性設置完成。
3.在窗體上放置一個datagrid控制項,單擊控制項,在屬性窗口點擊datasource,在右側下拉菜單中選擇adodc1,如果你的窗體上有多個數據源,這里下拉菜單中就會有多個選擇。
4.右鍵單擊datagrid控制項,然後選擇「檢索欄位(retrieve
fields)命令,就會用數據源的記錄集自動填充余帶宴該控制項。單擊「屬性」。使用「屬性頁」選項卡設置該控制項的適當屬性。
5.F5,這里就可以查看和修改了。
還有另外一種辦法
在vb菜單欄點擊「外接程序」,選擇「可視化數據管理器」,在彈出的「可視化數據管理器」窗口visadata中選擇「文件」「打開資料庫」選擇「microsoft
access」命令打開你的資料庫。你的資料庫的大部分信息就會在新彈出的「資料庫窗口」中顯示了。窗口中有什麼功能,自己去摸索吧,我還沒完全搞清楚,只能給你講這么多了。
打字真累啊!!
Ⅵ 如何用VB建立資料庫
1、首先點擊打開主菜單欄中的「外接程序」選項。
Ⅶ 請問VB編程中,如何連接SQL資料庫
1、打開代碼窗口,添加引用:梁碼Imports System.Data.SqlClient。