調用系統對話框

 Dim Message As String = "Would you like to continue?"
  Dim buttons As MessageBoxButtons = MessageBoxButtons.OKCancel
  System.Windows.MessageBox.Show(Message, "ZWCAD+", buttons)