vb中如何修改数据库数据

在VB中可以使用ADO（ActiveX Data Objects）来连接数据库并修改数据。以下是一个简单的示例代码：

Dim conn As Object
Dim rs As Object

Set conn = CreateObject("ADODB.Connection")
conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\path\to\your\database.accdb;"
conn.Open

Set rs = CreateObject("ADODB.Recordset")
rs.Open "SELECT * FROM YourTable WHERE ID = 1", conn, 3, 3

If Not rs.EOF Then
    rs.Fields("ColumnName1").Value = "NewValue1"
    rs.Fields("ColumnName2").Value = "NewValue2"
    
    rs.Update
End If

rs.Close
conn.Close
Set rs = Nothing
Set conn = Nothing

在这个示例中，首先创建一个连接对象conn，并打开连接到数据库。然后创建一个记录集对象rs，并打开一个查询来获取需要修改的数据行。接着在记录集中修改数据，并调用Update方法来保存修改。最后关闭记录集和连接，并释放对象。

需要根据具体的数据库类型和结构来修改连接字符串和SQL语句，以确保正确连接到数据库并修改数据。