none
como copiar archivos utilizando una barra de progreso en vb 2010 RRS feed

  • Pregunta

  • hola a todos, por favor necesito ayuda con esto tengo este codigo y no se porque no me funciona ya que me muestra el comando copyfile como error no se porque y no se si realmente funciona este codigo lo que quiero es que la barra de progreso balla moviendose a medida que se va copiando los archivos e visto varios codigos y ninguno me funciona y no se si este funciona gracias... espero que me puedan ayudar en esto 

    PrivateSub CopyWithProgress(ByValParamArray filenames AsString()) ' Display the ProgressBar control. pBar1.Visible = True' Set Minimum to 1 to represent the first file being copied. pBar1.Minimum = 1 ' Set Maximum to the total number of files to copy. pBar1.Maximum = filenames.Length ' Set the initial value of the ProgressBar. pBar1.Value = 1 ' Set the Step property to a value of 1 to represent each file being copied. pBar1.Step = 1 ' Loop through all files to copy. Dim x AsIntegerfor x = 1 To filenames.Length - 1 ' Copy the file and increment the ProgressBar if successful. If CopyFile(filenames(x - 1)) = TrueThen' Perform the increment on the ProgressBar. pBar1.PerformStep() EndIfNext x EndSub

    eh trtado de poner my.computer.filesystem.copyfile y me lo marca como error, gracias....

                  

    sábado, 9 de agosto de 2014 15:51

Respuestas