VB操作 access数据库问题

来源：百度知道 编辑：UC知道 时间：2024/06/21 17:16:01
数据库形式为：
高压柜 一次电流 二次电流
4a11 1 2
4a22 12 33
需要把每一个点的内容（4a11、1、2）都读取到VB中，如何做到？以用DATA和数据库建立链接。可以的话，请写下基本的程序模板。
sql=select * from 表名
说是语法错误

是不是只需把ACCESS数据库与vb联系起来就可以了？
是的话方法如下：
先把你的数据写入ACCESS数据库中（怎样写就不说了），然后打开access
点工具 实用数据库工具 转换数据库 转换为access 97 文件格式，保存
退出。
进入vb，在窗体中加入一个data控件和一个MSFlexGrid控件（工具栏右键 部件 控件窗口中选择microsoft MSFlexGrid Control6.0 （sp6）确定），单击DATA控件（窗体上的）在属性窗口中设置DATAbaseName为你编写的数据库路径，connect为access 不是access 2000，在accordsource选择你的数据库表名。
再单击MSFlexGrid控件属性窗口中设置datasource为data1.
完成以上操作就把你的数据库读到vb中了。

实在要写点代码的话，如果你不是用的MS控件来显示，用的text来显示的话，可以加如下代码：
Private Sub Data1_Validate(Action As Integer, Save As Integer)
If Not Data1.Recordset.BOF And Not Data1.Recordset.EOF Then
Data1.Recordset.MoveNext
Else
Data1.Recordset.MoveLast
End If
End Sub

sql=select * from 表名
rs.open sql,cn

rs.addnew
ra.fields("高压柜")="4a11"
ra.fields("一次电流")="1"
ra.fields("二次电流")="2"
rs.update

rs.clsoe
cn.clsoe
set rs=nothing
set cn=nothing