vb如何把选中的access数据进行修改 rt

如题所述

  1、对于选中的记录修改其字段值,然后更新记录集即可。

  2、工具:vb6

  3、用adodc连接数据库,用find方法(也可以使用其它方法)选中记录,用Fields().Value修改字段值,用update更新记录集,代码示例如下:

Private Sub Form_Load()
   Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
           "Data Source=C:\db1.mdb;Persist Security Info=False"
   Adodc1.RecordSource = "select * from Categories"
   Adodc1.CursorLocation = adUseClient
   Adodc1.Refresh
   Debug.Print Adodc1.Recordset.RecordCount
   Set DataGrid1.DataSource = Adodc1
End Sub

Private Sub Command1_Click()
   Adodc1.Recordset.Find "CategoryID=" & Val(Text1.Text)
End Sub

Private Sub Command2_Click()
  Adodc1.Recordset.Fields("CategoryName").Value = Text2.Text
  Adodc1.Recordset.Update
  Adodc1.Recordset.Requery
  
End Sub

  4、注意:本例中可以不使用Requery重新查询,但使用它是好习惯。

温馨提示:答案为网友推荐,仅供参考
第1个回答  2016-05-31
例如修改用户名称和密码
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields("用户名称") = Trim(Text1.Text)
Adodc1.Recordset.Fields("用户密码") =Trim(Text2.Text)
Adodc1.Recordset.Update
Adodc1.Recordset.MoveLast
第2个回答  2016-06-20
rs.Open "select * from 表名 where 列明 = '原来的值'', cn, adOpenKeyset, adLockOptimistic
rs("列名")="修改后的值"
rs.update
rs.close
第3个回答  2016-06-12
用update 表名 set 字段1=值1,字段2=值2……where 主键=值语句
数据库都是用SQL语句的。
第4个回答  2016-05-19
update。。。。。。

只能说这么多了 剩下的就看悟性了本回答被网友采纳
相似回答