在此本人使用ADO对象访问ACCESS数据库,但ADO对象在使用前你先要进行添加,启动VB6后,单击菜单“工程-引用”,打开引用对话框,选择“Microsoft ActiveX Data Objects 20 Library”,将其勾选,(以20版本为例,实际可以选择系统中的最高版本如本人的就是26版本),然后在当前目录下建立一个名为“学生”的ACCESS数据库,其中表名为“表”,字段共有:学号,姓名,年龄,性别四个字段,接下来就是设计界面了(自己设计)
现在介绍如何使用代码访问ACCESS数据库:
在代码窗口中编写一个返回字符型的函数
Function Connection() As String
'数据库的连接设置配置
Connection = "Provider=MicrosoftJetOLEDB40;Data Source=" & AppPath + "\学生mdb"
End Function
该函数用于连接数据库用
Private Form_Load()
Dim cnn As New ADODBConnection
Dim Rst As New ADODBRecordset
cnnOpen Connection
Set Rst = New ADODBRecordset
RstOpen "select from 表", cnn, adOpenKeyset, adLockOptimistic
End Sub
注:
Dim cnn As New ADODBConnection创建一个ADO数据库连接对象
Dim Rst As New ADODBRecordset为创建一个ADO数据库记录对象
select from 表 是SQL查询语言,这里为数据源,意思就是打开数据库“学生”中的表“表”
下面是将数据库表中的字段值显示出来的一个过程
Sub View()
Dim i As Integer
For i = 0 To 2
Text1(i) = RstFields(i)'text1为控件数组
Next
If (RstFields(3) = True) Then
Text1(3) = "男"
Else
Text1(3) = "女"
End If
End Sub
要访问ACCESS数据库就这样可以实现,访问SQL也差不多,稍有不同,回答完毕,如还有问题请继续和我联系,本人是专使用VB+SQL/Delphi+SQL开发数据库管理系统的程序员。
别忘了采纳我的回答,谢谢!
MDB是一种文件格式,就像word的Doc文件一样。
MDB文件是Access数据库文件
office里面包含了Access
应该是用Micorsoft
Access打开,因为MDB就是Access数据库的文件。
如果您的机子上没有Micorsoft
Access,不必为了打开这个文件安装Access,毕竟它体积不小。
以上就是关于如何打开MDB数据库全部的内容,包括:如何打开MDB数据库、扩展名为MDB是什么文件~~、等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)