Originariamente inviato da massimo
adesso non funziona più...:quipy:
Scusa mi errore
codice:
Private Sub mnuModificaAnnulla_Click()
 If mnuModificaAnnulla.Caption = "annulla" Then
  mnuModificaAnnulla.Caption = "ripeti"
Else
  mnuModificaAnnulla.Caption = "annulla"
 End If
End Sub

Toeke