ProgressBar en VB 2005

[Pablo Cesar]

Holas a todos quisiera que alguien me de una idea de código de un progressbar que se muestre mientras se cargue un formulario y luego se oculte.
teniendo en cuenta que tengo un progresbar en el Formualrio principal y deseando que ese progresbar se muestre cuando cargue un formulario secundario ojala que alguien pueda darme alguna solución Gracias.

[seba123neo]

Hola,solo le tenes que decir que cuando llege a 100 el valor de la barra entonces se oculte el form y te muestre el otro,lo tendrias que poner en un timer al codigo:

Código:

If ProgressBar1.Value = 100 Then
Timer1.Enabled = False
Me.Hide
Form2.Show
End If

y en el Load del primer formulario que tiene la barra activas el timer.

saludos.

[PanKrdo]

hola, talvez esto tambien te sirva.
Solo tienes que tener el PROGRESSBAR e insertar un control TIMER.
y escribir el siguiente codigo:

Private Sub Timer1_Timer()
With Progressbar1
.Value = .Value + 4
If .Value = 100 then
Me. Hide
Form2.Show
Unload Me
End If
End With
End Sub

*No olvides cambiar la propiedad INTERVAL del TIMER1 a 600 o el que te convenga, y verifica que la propiedad ENABLED sea TRUE

[Pablo Cesar]

holas nuevamente, el código que me enviaste es bueno , pero el problema que yo tengo es que no quiero que se oculte el formulario principal que es un (MDIParent) y que se cargue el o los formularios secundarios que son (windows forms) con ese mismo progress bar que se encuentra en el MDIParent el cual yo estoy usando.
El código que ingrese al MDIParent es el siguiente:
Creo un método para que se ejecute el progress.
Dim va As Integer = 0
Public Sub cargarprogress()
Try

var = var + 10
Me.TSProgBar.Value = var
If Me.TSProgBar.Maximum <= Me.TSProgBar.Value Then
Me.Timerprogress.Stop()
Me.TSProgBar.Value = 0
Me.TSProgBar.Visible = False
End If
Catch ex As Exception
End Try
End Sub
el cual lo invoco en el timer
Private Sub Timerprogress_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Timerprogress.Tick
cargarprogress()
End Sub
y en el load diciendo que se inicialize el timer
Private Sub mdiPrincipal_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Timerprogress.Start()
End Sub
Y al hacer clic en el el el toolstrip Se carga ese formulario
Private Sub ToolStripButton2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton2.Click
Me.MostrarFormularios(frmnavegador)
End Sub
Aaaa antes creo otro método que llamen a los formularios
Public Sub MostrarFormularios(ByVal f As Form)
Try
f.MdiParent = Me
f.Show()
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub

Como te mencionaba yo quiero que el progressbar que se encuentra en el MDIparent se cargue cuando ejecuto otros formularios el cual hasta ahora no me sale po favor quisiera que me faciliten una solución a este problema gracias.

[culd]

Tan dificil de entender es que esta necesitando realizarlo en visual basic .net 2005 que poco tiene que ver con visual basic 6.0

No le des bola, cuando vuelve me fijo, no te lo digo ya por que no le doy mucha bola al .net aparte uso SharpDevelop y hay que ver si conseguis los mismos resultados.

Saludos

Edito: Vos tenes un mdiparent, y ejecutas 1 o mas formularios, y recien cuando ejecutas esos formularios queres que se vea el progresbar del mdiparent, no?

[Pablo Cesar]

exacto quisisera saber de que forma solucionar este problemita o haber si me aconsejas otra solucion que cumpla el mismo objetivo.
saludos