为什么 Form.Shows 它发生在内部的控件加载 VB.NET

问：

对不起，我的英语不好。

我试图在主表单显示后做一些事情，这是一个 porgress bar，问题是在图像绘制表单内部的内容之前它被填满了。我想看里面的图像和标签，然后开始循环。

我想要像javascript的Window.onload函数这样的东西

Private Sub FRM_CargaInicial_Shown(sender As Object, e As EventArgs) Handles MyBase.Shown
        LBL_Carga.Visible = True
        Dim Dt As DataTable = New DataTable
        If conexion.EjecutarSQL("EXEC [GIM_RECURSOS].[IMAGEN].[SP_IMPORTAR]", Dt) Then
            PRB_Carga.Maximum = Dt.Rows.Count
            PRB_Carga.Value = 0
            For Each fila As DataRow In Dt.Rows
                Iconos.Add(New OBJIcono(fila.Item("ID_INFORMACION"), fila.Item("CLAVE"),     fila.Item("VALOR")))
                PRB_Carga.Value += 1
            Next fila
        End If
        Me.Hide()
        FRM_Ingreso.Show()
    End Sub

我尝试了 PictureBox.LoadComplete 和其他事件，所有这些事件都是在表单加载完成之前抛出的。