windows-mobile - MsgBoxが閉じているときに何かをする

Question

NS BASIC / CEでユーザーに警告を表示するプログラムを作成していますが、ユーザーがMsgBox（[OK]をクリックして）閉じると、アプリケーションでAfterWarnSubを実行する必要があります。どうすればこれを行うことができますか？

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