DataGrid控制項使用出現的訊息(編號：8384)

各位高手好，我在使用DataGrid中出現了一個訊息"Multiple-step operation generated errors. Check each status value.",雖然程式出現了這一段訊息，但是按下確定後，仍會正常執行，不會中斷不算錯誤，但是使用上應該不容許這樣的訊息窗出現，因為它沒有任何的錯誤碼，所以我不知道它究竟代表什麼意義，想請教各位高手，不知道有人可以告訴我這個訊息窗是什麼意思？而且應該要如何消除它呢？，附上一段這裡執行的程式碼。
Private Sub DataGrid1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
　　　　If DataGrid1.Col = 1 Then
　　　　　　　　Set Sele_Prod = New Recordset
　　　　　　　　Sele_Prod.Open "Select * from prod'", cn_mei, adOpenStatic
　　　　　　　　　　Sele_Prod.MoveFirst
　　　　　　　　　　DataGrid1.Columns(1).Text = Sele_Prod.Fields("A1").Value
　　　　　　　　　　DataGrid1.Columns(2).Text = Sele_Prod.Fields("A2").Value
　　　　　　　　　　DataGrid1.Columns(4).Text = Sele_Prod.Fields("A3").Value
　　　　　　　　　　DataGrid1.Columns(3).Text = 0
　　　　　　　　　　DataGrid1.Col = 3
　　　　　　　　　　DataGrid1.SetFocus
　　　　End IF
　　End IF
End Sub