Console.Read()

Dim inputCode As Integer = Console.Read()

Console.Read() 等待來自使用者的輸入，並在接收時返回與輸入字元的字元程式碼相對應的整數值。如果在獲得輸入之前以某種方式結束輸入流，則返回 -1。