Przykład tutaj
Ciemnawy CancelChanges Jako DialogResult = MessageBox.Show ("Twój zmiana gubić, być ty pewny? ", "Odwoływać Zmiana", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
Jeżeli CancelChanges = Windows.Forms.DialogResult.No Wtedy
Wyjście Okręt podwodny
Kończyć Jeżeli