UC知道VB中addnew添加一条记录，然后返回该记录的位置显示为-1，这是怎么回事啊？
来源：百度知道 编辑：UC知道 时间：2024/06/30 23:32:30
Adodc1.Recordset.AddNew
For i = 0 To 4
Adodc1.Recordset.Fields(i) = Trim(Text(i).Text)
Next i
Adodc1.Recordset.Update
recs = recs + 1
MsgBox "添加记录成功。", vbOKOnly, "提示"
然后在adodc1.movecomplete中
Private Sub Adodc1_MoveComplete(ByVal adReason As ADODB.EventReasonEnum, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
Dim j As Integer
DataGrid1.Caption = Adodc1.Recordset.AbsolutePositio
exit sub
For i = 0 To 4
Adodc1.Recordset.Fields(i) = Trim(Text(i).Text)
Next i
Adodc1.Recordset.Update
recs = recs + 1
MsgBox "添加记录成功。", vbOKOnly, "提示"
然后在adodc1.movecomplete中
Private Sub Adodc1_MoveComplete(ByVal adReason As ADODB.EventReasonEnum, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
Dim j As Integer
DataGrid1.Caption = Adodc1.Recordset.AbsolutePositio
exit sub
我刚才试过了，
For i = 0 To 4 这一句可能有点问题
如果你的表格有 4 列的话,就改成 For i=1 to 4
如果有 5 列的话，就改成 for i=1 to 5
然后就没有问题了.可能 Filed(0) 的话代表编号那一列，系统自动添加的，如果自己写数据进去可能会出问题。