Me.Adodc1.Recordset.Update出现报错-----(改变在通知期间取消;没有列改变)---为被更新
关于adodc 和textbox的捆绑的小问题!
'用me.Adodc1.Recordset.Update方法时,修改某个字段时并不为空时,可以update!但为空时,则会报出以下错误:
'(改变在通知期间取消;没有列改变)---未被更新
原代码如下:
Private Sub Command1_Click()
Dim rs As New ADODB.Recordset
Dim i As Integer
Me.Adodc1.Recordset.Update '
'出现报错-----(改变在通知期间取消;没有列改变)---为被更新
Me.Adodc1.Refresh
End Sub
Private Sub Form_Load()
Dim i As Integer
For i = 0 To Me.Adodc1.Recordset.Fields.Count - 1
If i <> 0 Then
Load Me.Text1(i)
End If
Me.Text1(i).DataField = Me.Adodc1.Recordset.Fields(i).Name
Me.Text1(i).Visible = True
If i <> 0 Then
Me.Text1(i).Top = Me.Text1(i - 1).Top + 1.5 * Me.Text1(0).Height
End If
Next i
End Sub