Ver Mensaje Individual
  #1 (permalink)  
Antiguo 01/10/2007, 13:31
ci2000
 
Fecha de Ingreso: abril-2005
Mensajes: 483
Antigüedad: 19 años, 1 mes
Puntos: 3
Mostrar mensaje al ejecutar FileCopy

Hola, en un botón hice que desde vb se copie un archivo de una carpeta a otra. El archivo a copiar es grande, por lo tanto el proceso de copia demora y el problema que se me presentó es que quiero mostrar un mensaje "Copiando...", pero no logro verlo. Lo que hace el programa es mostrar el label en blanco y da la impresión que se colgó.

Código:
Private Sub Command1_Click()
  DoEvents
  Label1 = "Copiando..."
  FileCopy "C:\mscomm\Centralita.mdb", "R:\Centralita.mdb"
  Label1 = "Copia realizada"
End Sub
Al finalizar se ve correctamente "Copia realizada".

También se me había ocurrido colocar un Progressbarr, pero no sé cómo hacerlo.

Gracias desde yá por las respuestas.
Saludos