Сделать что-то, когда MsgBox закрыт

Question

Я делаю программу в NS BASIC / CE, которая показывает пользователю предупреждение, но когда пользователь закрывает MsgBox (нажимая OK), я хочу, чтобы приложение выполняло AfterWarn Sub. Как я могу это сделать?

Answer 1

Извините, я немного не правильно прочитал Но ее:

Dim varResponse As VbMsgBoxResult
vResult = Msgbox("Are you sure you wanted to make this change?.",vbOkCancel)
If result = vbOk Then
    AfterWarn()
Else
   'Do something else?
End if