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。