Mostrar Barra Progreso al entrar a Tab

[Aquaventus]

Disculpame la demora Highlander, tuve problemas de conexion a internet, ahora, lo que hize fue crear un formulario aparte llamado por ejemplo frmProgreso2.cs dentro de el :

Código vb:

Public Delegate Sub trabajo()
 
Public Property Delegado() As trabajo
    Get
        Return m_Delegado
    End Get
    Set
        m_Delegado = Value
    End Set
End Property
Private m_Delegado As trabajo
 
Public Sub New(delegado__1 As trabajo)
    InitializeComponent()
    Delegado = delegado__1
End Sub
 
Private Sub frmProgreso2_Load(sender As Object, e As EventArgs)
    backgroundWorker1.RunWorkerAsync()
End Sub
 
Private Sub backgroundWorker1_DoWork(sender As Object, e As DoWorkEventArgs)
    progressBar1.Style = ProgressBarStyle.Marquee
    Delegado()
End Sub
 
Private Sub backgroundWorker1_ProgressChanged(sender As Object, e As ProgressChangedEventArgs)
    progressBar1.Style = ProgressBarStyle.Marquee
End Sub
 
Private Sub backgroundWorker1_RunWorkerCompleted(sender As Object, e As RunWorkerCompletedEventArgs)
    progressBar1.Style = ProgressBarStyle.Blocks
    DialogResult = DialogResult.OK
    Me.Close()
End Sub
 

luego para llamar a ese formulario seria por ejemplo en una carga de datos seria de esta manera :

Código vb:

Dim proceso As New frmProgreso2(listarDatos)
If proceso.ShowDialog(Me) = DialogResult.OK Then
    dgUsuarios.DataSource = dg1.DataSource
End If
 

donde listar datos es un sub que hago la carga a un datagrid, que en este caso es dg1, una vez terminado lo paso al datagridview y es ahi donde puedes hacer lo que quieras una vez terminado espero te sea de utilidad, pero ojo que aqui :

Dim proceso As New frmProgreso2(listarDatos) - todo aquel que entre dentro de frm progreso tiene que ser un sub sin paramatros, tiene que tener esta estructura:

Código vb:

Public Sub listarDatos() 'Debe ser asi como te dije sin parametro
'aqui dentro ya haces el llenado a un grid para que luego lo pases los datos
    dg1.DataSource = objusu.LISTADOUSU()
End Sub
 

si puedes mejorarlo en buena hora, esta hecho con BackgroundWorker, puedes investigar de ello y manejarlo mucho mejor . Espero te sea de utilidad. Saludos!.

PDT: Lo tengo hecho en c# tuve que pasarlo a vb