コンソールウィンドウを開くにはどうすればいいですか？ VB

Question

Visual Basicで自分のコンソールウィンドウを開きたいです。私が持っているコードでは、私は1行だけを要求することができ、次にウィンドウが閉じます。私のコードは次のとおりです：

Module Module1 

Sub Main() 

    If (Console.ReadLine = "e") Then 
     Console.WriteLine("Test") 
    End If 

    Console.ReadKey() 

End Sub 

End Module 

このコードを実行すると、 "e"と入力することができます。単語が「Test」と表示され、1つのキーを押すとコンソールが閉じます。しかし、私は特別な言葉を書くまでそれを開かせたい。ここで

Answer 1

は愚かな例です：

Sub Main() 
    Dim password As String = "007" 

    Dim response As String 
    Do 
     Console.Write("Password: ") 
     response = Console.ReadLine 
     If response <> password Then 
      Console.WriteLine("Incorrect Password!") 
     End If 
    Loop While response <> password 

    Console.WriteLine("Welcome James Bond!") 
    Console.Write("Press [Enter] to proceed...") 
    Console.ReadLine() 
End Sub