
Msg = "continuo a cancellare????" Style = vbyesno Title = " a t t e n z i o n e" risp = MsgBox(Msg, Style, Title) If risp = 2 Then GoTo cancella If risp = 4 Then GoTo fine |
vbOK 1 Pulsante OK premuto vbCancel 2 Pulsante Annulla premuto vbAbort 3 Pulsante Termina premuto vbRetry 4 Pulsante Riprova premuto vbIgnore 5 Pulsante Ignora premuto vbYes 6 Pulsante Sì premuto vbNo 7 Pulsante No premuto |
