Message è una classe che dispone di 5 metodi:
- ERROR
- INFO
- WARNING
- QUESTION
- DELETE
a ciascun metodo puoi associare un messaggio per l'utente ed un massimo di tre pulsanti, ad eccezzione del metodo info cui puoi associare un solo pulsante. I metodi ritornano un integer che identifica il tasto premuto.
Nel tuo caso potresti usare qualcosa tipo:
Public Sub Form_Close()
Dim iAnswer As Integer = Message.Question("Esco?", "si", "no")
If (iAnswer = 1) Then
Me.Close
Else
Stop Event
Endif
End