VB怎么修改数据库指定单元格里的数据

给你一个例子

Dim Conn As New ADODBConnection

Dim Rs As New ADODBRecordset

RsOpen "SELECT FROM 报警记录 where " & TeTag & "='" & Text1Text & "'", Conn

If RsRecordCount = 0 Then

MsgBox vbCrLf & "“" & RsFields(0) & "”查找失败！", vbInformation, " 提 示"

RsClose

RsOpen "select from 报警记录", Conn, adOpenStatic, adLockOptimistic

End If

Set DataGrid1DataSource = Rs

For Each Col In DataGrid1Columns '修改列表

If ColDataField = "序号" Or ColDataField = "备注" Then ColVisible = False '隐藏不想显示的字段

Next Col

DataGrid1Columns(11)Caption = "电压"‘替换显示将数据库里的字段

if RsFields(4)="10" then msgbox "数值过低！"'第5（从0开始）个单元格数值

For I = 0 To 14

DataGrid1Columns(I)Caption = Space(((DataGrid1Columns(I)Width - Len(DataGrid1Columns(I)Caption) 150) \ 2) \ 150) & DataGrid1Columns(I)Caption '标题居中

DataGrid1Columns(I)Alignment = dbgCenter

Next

连接 srv 数据库的语句略

strSQL = "Select From card"

RSOpen strSQL, db, 3, 3

Do While Not RSEOF '使历遍整个数据表

RS("字段名")=Int(RS("字段名")) '用 Int 取整函数取整

'也可以

RS("字段名")=Round(RS("字段名"),0) '可以使用 Round 函数，四舍五入，取掉小数部分

RSUpDate

RSMoveNext

Loop

RSClose

Set RS = Nothing

ADO+DataGrid1例子先点击DataGrid1要修改的数据项,调用DataGrid1_click事件，把点击该项数据在Textbox中显示出来（运行状态下）DataGrild_click()Text2

=

Adodc1Recordset(7)

Text3

=

Adodc1Recordset(9)

Text4

=

Adodc1Recordset(10)

Text5

=

Adodc1Recordset(3)然后在Textbox中修改数据后，点击"保存"按扭

执行保存command_save

click()Adodc1Recordset(11)

=

DTPicker1Value

Adodc1Recordset(1)

=

Text1Text

Adodc1Recordset(6)

=

DTPicker2Value

Adodc1Recordset(7)

=

Text2Text

Adodc1Recordset(8)

=

Text_taobiaoText

Adodc1Recordset(9)

=

Text3Text

Adodc1RecordsetUpdateBatch

adAffectAllChapters添加new_click()Adodc1RecordsetAddNew

Adodc1Recordset(0)

=

Combo1Text

Adodc1Recordset(1)

=

Text_nameText

Adodc1Recordset(2)

=

Combo__kh_nameText

Adodc1Recordset(3)

=

Combo_xdText

Adodc1Recordset(4)

=

Combo_telTextAdodc1RecordsetUpdateBatch

在datagrid的属性里面的allowupdate设为true

或者先对记录集的字段修改后然后调用Adodc1RecordsetUpdate

qq591176192

以上就是关于VB怎么修改数据库指定单元格里的数据全部的内容，包括:VB怎么修改数据库指定单元格里的数据、想用VB改下sql 数据库中某表的某一字段的内容，具体就是把这个字段的所有值班进行一个批处理取整 *** 作、如何在VB6.0数据库中修改某项数据等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！