vb.net - 使用第二种形式作为“请稍候......”-信息：奇怪的外观

Question

我目前正在开发一个访问数据库的程序。在局域网中搜索主机/实例的过程中，我想在我的主窗体顶部显示第二个窗体，这表明程序正在“处理它”。我想这很好用，但是“请稍候..”的外观仍然被破坏了。

这是我试图处理它的方式：

Private Sub Cbox_database_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbox_database.MouseClick
    Try
        Dim frmloading As New loading
        loading.Show()
        cbox_database.Items.Clear()
        loadInstances(cbox_database)
    Finally
        loading.Close()
        cbox_database.DroppedDown = True
    End Try
End Sub

Sub loadInstances(cbox As ComboBox)
    Dim dt As DataTable = SqlDataSourceEnumerator.Instance.GetDataSources
    For Each dr As DataRow In dt.Rows
        cbox.Items.Add(String.Concat(dr("ServerName"), "\", dr("InstanceName")))
    Next
End Sub

由于我是初学者，我相信有更好的方法来做到这一点。我愿意接受任何建议。

谢谢。

标签： vb.net