vb怎么更新数据库中一条数据

添加： ’下面这句连接数据库指定表的所有字段 Adodc1.RecordSource = "select * from 库存表" ’下面这句添加记录 Adodc1.Recordset.AddNew 下面4句就是通过4个TEXTBOX控件输入字段的数据，如果是数字类型可以加VAL Adodc1.Recordset.Fields

需要声明使用CommandBuilder对象，你是 SQL 数据库还是 ACCESS 数据库，这两者的对象不一样的。

对于：SQL server

Dim Mybuilder As SqlCommandBuilder = New SqlCommandBuilder(da)

da.Update(dt) '使用Update方法实现更新到数据库

对于：ACCESS

Dim Mybuilder As OleDbCommandBuilder = New OleDbCommandBuilder(da)

da.Update(dt) '使用Update方法实现更新到数据库

要么用记录集的方式 AddNew，要么用SQL命令“Insert”，你两者同时使用是怎么回事？

另外Text1.text只在你的程序里有效，在构建SQL串时要读出其内容再传递给SQL串。

下面是SQL命令的形式：

Adodc1.CommandType = adCmdText

Adodc1.RecordSource = "insert into 用户管理(姓名,身份z,电话,存款,取款,利率) values('" &Text1.Text &"','" &Text2.Text &"','" &Text3.Text &"','" &Text4.Text &"','" &Text5.Text &"','" &Text6.Text &"')"

Adodc1.Refresh

MsgBox ("添加成功！")

'

Adodc1.RecordSource = "select * from 用户管理"

Adodc1.Refresh

还有一点，你的“存款,取款,利率”都是字符型的？如果不是，把SQL命令里的对应字段的单引号去掉

---