Consoleで終了・続行を選択
Console.WriteLine(String.Format("ごにゃごにゃしますがよろしいですか?{0}続行:0{0}終了:1{0}", vbCrLf)) Dim Input As String = Console.ReadLine() If Input = 1 Then Console.WriteLine(String.Empty) Console.WriteLine("処理が終了されました") Console.ReadLine() Exit Sub End If