codice:
Private Sub mnuModificaAnnulla_Click()
 if mnumodificaannulla.caption="annulla" then  
  mnumodificaannulla.caption ="ripeti"
 end if
 if mnumodificaannulla.caption="ripeti" then  
  mnumodificaannulla.caption ="annulla"
 end if
End Sub


Toeke