控制台应用程序-第一消息框未集中

Question

我正在开发一个VB。网络控制台应用程序获取ID &当用户输入无效的ID或密码时，应该弹出消息，但我在控制台应用程序中使用消息框时观察到一种特殊的行为。当显示第一个消息框时，它的out - focus &;我们明确地需要让消息框成为焦点。但是下一个后续消息框是In-Focus。

下面是示例代码:

Sub Main()
Start:
    Console.WriteLine("Press Enter")
    Console.ReadLine()
    MsgBox("Good Day")
    GoTo Start
End Sub

只是想知道为什么会发生这样的事情&应该做些什么，这样第一个消息框也会是焦点。

Answer 1

您可以使用MessageBoxOptions.ServiceNotification将对话框显示在顶部。

这是从c#应用程序转换而来的，所以不确定这是否正确。. NET(应该是这样):

MsgBox( "Good Day"
      , ""
      , MessageBoxButtons.OK
      , MessageBoxIcon.Asterisk
      , MessageBoxDefaultButton.Button1
      , MessageBoxOptions.ServiceNotification
      )

但请注意:

不应该在控制台应用程序中使用MessageBox。这只是两个不同的世界。

解释原因:

当您使用控制台远程运行此应用程序时，您期望得到什么?没有办法显示这个消息框。使用Console.WriteLine，但不同的颜色，如果你想显示的东西是错误的，或警告，或好的东西。