很多服务类的应用程序都是控制台应用程序的样子，而且酷酷的显示服务信息，但是又不允许用户输入，怎么实现的呢？其实很简单
Module Module1 Sub Main() While (True) Console.ReadKey(True) End While End Sub End Module
