Charango
04 de Julio del 2004

Tengo un problema al hacer visible un texbox que esta junto con un progress bar

este es el codigo

Private Sub Command1_Click()

Text1.Visible = True

For x = 0 To 50000

Bar1.Value = x
Next

End Sub

Private Sub Form_Load()
Text1.Text = "Formateando Disco Local"
Text1.Visible = False
Bar1.Min = 0
Bar1.Max = 50000
End Sub

a simple vista esta bueno , pero no me muestra el contenido del texto.

cualquier aporte o comentario es bienvenido.

Gracias

Bartolom
04 de Julio del 2004

Si el texto no cambia, déjalo fijo en teimpo de diseño, o si no agrega la línea Text1.Text = "Formateando Disco Local" en el evento click, después de hacerlo visible.

Saludos!
Bartolom
Chile

kinoscar
04 de Julio del 2004

lo que cuentas es un problema similar que he tenido tambien con el progressbar, al parecer tiende a no mostrar el resultado de algunos eventos, la solucion que yo encontre y que me funciono muy bien es abrir otro formulario unicamente con el progressbar donde el caption del form contiene el texto sobre lo que se esta hacien en tu caso "formateando disco", todo esto controlado desde el form original

espero esto te sirva
suerte

sdf
04 de Julio del 2004

lo que tienes que hacer es actualizar el contenido del textbox por lo menos una vez ai::
Private Sub Command1_Click()

Text1.Visible = True

For x = 0 To 50000
if x=0 text1.refresh
Bar1.Value = x
Next

End Sub