在vb.net控制台应用程序中发出蜂鸣声，直到按空格键为止

Question

在按下键之前，如何继续在vb.net控制台应用程序中进行处理？ 我基本上是想每半秒循环播放一次哔声，直到用户按下任何键为止。 我有循环并发出哔哔声：

Do Until <key is pressed>
   Console.Beep()
   Sleep(500)
Loop

问题是，如何实现“ <key is pressed> ”条件？

Answer 1

看这个简单的例子，创建一个简单的程序来制作类似东西的打字机。

int i;
char c;
while (true)
{
 i = Console.Read ();
 if (i == -1) break;
 c = (char) i;
 Console.WriteLine ("Echo: {0}", c);
}
Console.WriteLine ("Done");
return 0;

您可以像所有初学者一样在C中创建一些小型控制台游戏时进行无限循环。只需制作一个exit语句，让您的程序打破流程。 只需按下一个Escape键

您可以点击Tariqulazam注释链接，该链接可以帮助您在.net中实施。

Console.WriteLine("Press any key to stop");
do {
    while (! Console.KeyAvailable) {
        // Do something
   }       
} while (Console.ReadKey(true).Key != ConsoleKey.Escape);

尝试使用此方法Beep（int，int）。 按照此链接。

http://msdn.microsoft.com/zh-CN/library/4fe3hdb1.aspx

Windows Vista和Windows XP的64位版本不支持Beep方法。

Answer 2

我知道这是一个老问题，但是我只需要这样做，就发现了我认为是一种更简单的循环方法，直到按下某个键为止。

While Not Console.KeyAvailable
'do stuff
Loop

在Win 7的.NET 4.0下，它运行良好。一旦按下某个键，便退出循环。