如何用VB(代码)打开mdb数据库并且可以显示和修改里面的内容?

如何用VB(代码)打开mdb数据库并且可以显示和修改里面的内容?,第1张

1.首先在控件箱中添加“ADODC”和“DBGRID”2个控件.方法:右键点击控件箱,在d出的菜单中左键单击“部件”,在部件选项卡中选择“Microsoft

ADO

Date

Control

6.0(OLEDB)”和“Microsoft

DataGrid

Control

6.0(OLEDB)”复选框,然后“确定”。这样ADODC

和DATAGRID

控件就添加在控件箱中了。

2.然后在窗体上放置放置一个adodc控件,单击控件,在属性窗口点击“connectionstring”属性右侧的带…的按钮,选择“使用字符串(C)”选项,点击“生成”按钮,在d出的“数据库链接属性”的“提供程序”选项卡中选择“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菜单栏点击“外接程序”,选择“可视化数据管理器”,在d出的“可视化数据管理器”窗口visadata中选择“文件”“打开数据库”选择“microsoft

access”命令打开你的数据库。你的数据库的大部分信息就会在新d出的“数据库窗口”中显示了。窗口中有什么功能,自己去摸索吧,我还没完全搞清楚,只能给你讲这么多了。

打字真累啊!!

在此本人使用ADO对象访问ACCESS数据库,但ADO对象在使用前你先要进行添加,启动VB6后,单击菜单“工程-引用”,打开引用对话框,选择“Microsoft ActiveX Data Objects 2.0 Library”,将其勾选,(以2.0版本为例,实际可以选择系统中的最高版本如本人的就是2.6版本),然后在当前目录下建立一个名为“学生”的ACCESS数据库,其中表名为“表”,字段共有:学号,姓名,年龄,性别四个字段,接下来就是设计界面了(自己设计)

现在介绍如何使用代码访问ACCESS数据库:

在代码窗口中编写一个返回字符型的函数

Function Connection() As String

'数据库的连接设置配置

Connection = "Provider=Microsoft.Jet.OLEDB.4.0Data Source=" &App.Path + "\学生.mdb"

End Function

该函数用于连接数据库用

Private Form_Load()

Dim cnn As New ADODB.Connection

Dim Rst As New ADODB.Recordset

cnn.Open Connection

Set Rst = New ADODB.Recordset

Rst.Open "select * from 表", cnn, adOpenKeyset, adLockOptimistic

End Sub

注:

Dim cnn As New ADODB.Connection创建一个ADO数据库连接对象

Dim Rst As New ADODB.Recordset为创建一个ADO数据库记录对象

select * from 表 是SQL查询语言,这里为数据源,意思就是打开数据库“学生”中的表“表”

下面是将数据库表中的字段值显示出来的一个过程

Sub View()

Dim i As Integer

For i = 0 To 2

Text1(i) = Rst.Fields(i)'text1为控件数组

Next

If (Rst.Fields(3) = True) Then

Text1(3) = "男"

Else

Text1(3) = "女"

End If

End Sub

要访问ACCESS数据库就这样可以实现,访问SQL也差不多,稍有不同,回答完毕,如还有问题请继续和我联系,本人是专使用VB+SQL/Delphi+SQL开发数据库管理系统的程序员。

别忘了采纳我的回答,谢谢!


欢迎分享,转载请注明来源:内存溢出

原文地址:https://54852.com/sjk/9381343.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-04-27
下一篇2023-04-27

发表评论

登录后才能评论

评论列表(0条)

    保存