codice:
Private Sub cmd_modifica_avviso_Click()

Dim Nuovo_Avviso As String

Nuovo_Avviso = txt_avviso.Text
Set Rs = Conn.Execute("UPDATE Avviso SET Avviso= '" & Nuovo_Avviso & "' WHERE ID='1' ")
MsgBox "Aggiornato!", vbOKOnly, "Avviso"
txt_avviso.Text = Nuovo_Avviso

End Sub
Ho una TXT contente un testo, tramite un CMD modifico il DB con il nuovo Avviso, solo che, se eseguo la modifica e provo a uscire dalprogramma tramite la croce in alto a destra esce questo messaggio:

L'operazione non è consentita se l'oggetto è chiuso

Se invece non premo il tasto e quidni non aggiorno il DB (Access) l'errore non me lo da..

Ho provato a fare Rs.Close ma non succede niente (anzi mi da errore)

Che può essere?