Progress Bar en MDI Form

[Malenko]

Viendo el código:

Código vb:

Dim x As Integer = 0
MDI.ToolStripProgressBar.Minimum = x
MDI.ToolStripProgressBar.Maximum = dt_total.Rows.Count
 

Está claro que el valor mínimo está controlado pero el máximo depende del número de Rows. Si falla la consulta o en algún lado se destruye el objeto (se tendría que revisar todo el código). Una solución sería mirar si el datatable no es nulo:

Código vb:

MDI.ToolStripProgressBar.Minimum = 0
 
If (dt_total Is Nothing) Then
     MDI.ToolStripProgressBar.Maximum = 100
Else
     MDI.ToolStripProgressBar.Maximum = dt_total.Rows.Count
End If