时间戳

首页 > 解决方案 > 如何显示等待打开表单子项

vb.net - 如何显示等待打开表单子项

问题描述

我需要从 MDI 表单打开一个子表单并使用以下代码段：

Dim frmSearchServer As frmSetServerSql = New frmSetServerSql
frmSearchServer.MdiParent = Me
frmSearchServer.Show()
TSInfo.Text = frmSearchServer.Text

因为打开之前的子表单会搜索数据源并使用 sql server 的可用实例填充 DataTabledtServer = LoadInstanceServer()

我将在一个循环中添加一个 ServerSqlData 列表：

For Each row As System.Data.DataRow In dtServer.Rows
     itemServerName = New ServerSQLData

     With itemServerName
        . ServerName = dtServer.Rows(0). Item(0)
        . Instance = dtServer.Rows(0). Item(1)
        . PathName = .ServerName & "\" & .Instance
     End With
     listDT.Add(itemServerName)
Next

我将在组合框中显示：

cboServerName.DataSource = listDT
cboServerName.DisplayMember = "PathName"
cboServerName.SelectedItem = -1

现在直到整个事情完成之前，表格不会在 MDI 表格中打开，因为这需要一些时间，我怎么能以某种方式让用户明白他必须等待片刻？ 谢谢你的任何建议。（我用的是VB2012！）

标签： vb.netwinforms

解决方案

自从我上次说意大利语以来已经有一段时间了，但是如果我正确理解了您的评论，您希望我给您举个例子。

尝试这样的事情：

Cursor = Cursors.WaitCursor
Dim frmSearchServer As frmSetServerSql = New frmSetServerSql
frmSearchServer.MdiParent = Me
frmSearchServer.Show()
Cursor = Cursors.Default

推荐阅读