Visual Basic - AYUDA ERROR ADODC CONSULTA

URGENTE: Que significa el error al ejecutar mi consulta de UPDATE que dice que no se puede realizar la consulta, debido a que el objeto esta cerrado??
La consulta me la hace, osea que no entiendo el porque del error. Gracias

Solamente que hayas cerrado la conexion del objeto, pero mejor expon tu codigo aqui para que lo podamos ver todos..saludos!!!

Gracias Miguel, mi codigo es el siguiente.

Private Sub CommandButton1_Click()
Dim men As Integer
On Error GoTo errores

If Text1.Text = "" Or Text2.Text = "" Or Text3.Text = "" Or Text4.Text = "" Or Text5.Text = "" Or Text6.Text = "" Or Text7.Text = "" Or Text8.Text = "" Or Text9.Text = "" Then
men = MsgBox("Todos los campos deben estar rellenos", vbExclamation, "ATENCIÓN")
End If
consulta_modificar = "UPDATE Presupuestos SET Fecha_presupuesto='" + Text2.Text + "' WHERE Referencia='" + Text1.Text + "'"
men = MsgBox(consulta_modificar, vbOKOnly, "CONSULTA")

Adodc1.CommandType = adCmdText
Adodc1.RecordSource = consulta_modificar
Adodc1.Refresh

errores:

End Sub