VB如何使用ADO修改ACCESS数据

想请教，如果数据库里不仅仅有一条数据，当数据库里有“材料名称”和“材料数量”两项内容，textbox1中的数据是名称，textbox2中的数据是数量，如何在access数据库中查找到textbox1中输入的名称的数据并使“材料数量”变为原数据减去textbox2中的数据？

举报该文章

其他看法

第1个回答 2018-04-08

Public dbConn As ADODB.Connection '定义一个ADODB连接
Public stuRs As ADODB.Recordset '定义Recordset对象
Public SqlFindStr As String

Public Function Conn2DB() As Boolean
'公共Access数据库连函数

Dim connStr As String
Dim dbName As String

dbName = App.Path & "\" & "StudentDB.mdb" '返回程序所在路径

' Access连接字符串
conStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dbName

Set dbConn = New ADODB.Connection '定义一个ADODB连接对象

If dbConn.State <> adStateOpen Then '判断ADODB连接是否打开
dbConn.Open conStr '如果不是打开状态就打开连接
End If

Conn2DB = True
End Function

Public Function ExcSQL(ByVal sql As String) As ADODB.Recordset
Dim rst As ADODB.Recordset

'执行一条SQL查询,得到一个记录集
Set rst = New ADODB.Recordset
rst.Open Trim$(sql), dbConn, adOpenKeyset, adLockOptimistic '得到记录

Set ExcSQL = rst
End Function
自己修改下

VB编程如何实现ACCESS数据库记录的查询?
一、查询数据库记录要查询数据库中的记录，首先需要创建一个连接对象，并使用其执行SQL查询语句。具体步骤如下：创建ADO连接对象并建立与数据库的连接。创建一个命令对象，并设置其类型为“查询”。在命令对象中编写SQL查询语句，例如：`"SELECT * FROM Students WHERE Age = '99'"`。 ...

VB如何用ADO向ACCESS数据库插入和修改记录?
1、Microsoft Access窗口中，选择文件菜单中的打开选项，打开一个已有的数据库。2、数据库中有两张表格，如下图所示。3、数据库中，表格学生信息是课程成绩的子表。4、如果直接在子表中插入记录，会提示不能添加或修改。5、其实，只需在主表中，插入相关的主键和记录。6、接着，就可以在子表中插入...

VB6.0 用ADO修改Access数据库中指定某行某列的单元内数据
一 ADO类，在工程找到引用，在引用里找到Data Object 2.5以上版本，Command事件中写：Dim cnn As ADODB.ConnectionDim rs As ADODB.RecodeSetSet cnn As New ADODB.ConnectionSet rs As New ADODB.RecordSetcnn.ConnectionString="Provider=Microsoft.ACE.OLEDB.12.0;Data Source="+ACCESS相对完整路...

怎样通过VB程序联接ACCESE数据库
在VB程序中，使用ADO连接Access数据库，通常需要创建一个ADODB.Connection对象，并使用Open方法建立连接。连接建立后，可以使用ADODB.Command对象执行SQL查询，将查询结果存储到ADODB.Recordset对象中，然后通过该对象访问查询结果。Data控件是VB中用于数据绑定的控件，包括DataGrid、DataGridView、DataControl等。使用...

vb 修改使用中的access数据库
VB6可以使用数据访问API——“ADO”连接局域网中的Access数据库，然后用SQL语言读写数据库。下面是VB操纵网络中ACCESS数据库示范代码，供参考请注意与MSSQL、MySQL等大中型数据库不同，网络中的ACCESS数据库必须存放在共享文件夹下才能被网络中的其它电脑访问。如果ACCESS数据库所驻留的电脑有防火墙，那么...

vb中如何调用Access数据表中的某一个记?
1. 首先，确保在项目中添加ADO控件。在“工程”菜单下的“部件…”选项中，选择并添加Microsoft ActiveX Data Objects 2.5 到工具箱。2. 将ADO控件拖至窗体，然后在代码编辑器中编写代码，通过ADO对象连接Access数据库。例如： `Dim con As ADODB.Connection`，`con.Open "Provider=Microsoft.Jet....

vb修改access数据
VB6新建工程,添加登录对话框,修改其代码,用ADO数据控件连接ACCESS数据库,将txtPassword文本控件的DataSource属性写为ADODC1,属性DataField写为数据表的密码字段名,并将Adodc1的属性ConnectionString中的数据库路径改写为你的数据库路径,代码如下:Private Sub Form_Load()Text3 = ""End Sub Private Sub ...

VB如何修改ACCESS数据库中指定的记录
首先定位到这条记录，用recordset的find方法或者直接select返回该条记录，然后使用delete删除，修改的话直接改，之后update一下就可以了。