Msgbox等到VB.NET

如何解决Msgbox等到VB.NET

在控制台应用程序中是否可以有一个没有按钮的MsgBox。我想弹出一个msgBox，然后在任务完成后消失。还是可以将msgBoxresult发送到某种形式的窗口，当写入文件后该窗口会消失？

MsgBox(\"The users on the domain are being gathered. A prompt will appear when all information has been gathered.\")
    Dim userFile2 As String = savefileDialog1.FileName & \".txt\"
    Dim fileExists2 As Boolean = File.Exists(userFile2)
    Using sw As New StreamWriter(File.Open(userFile2,FileMode.OpenorCreate))
        For Each d As DirectoryEntry In de.Children()
            sw.WriteLine(d.Name)
        Next
    End Using

    

解决方法

如果您想要一个带有GUI的控制台应用程序，建议您制作一个WinForms应用程序可能会更容易。只需创建一个新的小型WinForms应用程序，将默认值

Form

缩小为一个对话框，并使其仅具有一个不可见的

Close

按钮即可。 然后，只需在完成后显示

Close

按钮即可。 只需记住禁用

Form

（右上角的X向上）上的控制框，并处理可能会关闭它的任何键盘组合。 编辑：或者，如果出于任何原因您必须将其作为控制台应用程序，那么您仍然可以编写一个微型的单独应用程序，该应用程序只执行所需的GUI部分，并让控制台应用程序启动GUI应用程序，发送文本显示。     ,首先，快速点。 “ 5”是一个模式对话框，因此将暂停执行，直到用户响应为止，您将无法使用它。 通常，“控制台”应用程序应为非图形应用程序。 您不想使用控制台应用程序来显示窗口。由于.Net 4.0可用，因此您可能需要可以写入控制台的WPF应用程序。 在SO上有一篇关于使用WPF输出到控制台的文章。 您应该使用

System.ComponentModel.BackgroundWorker

在其他线程上进行工作。这将使“ 7”响应用户交互并在任务进行时进行渲染。