1
Abra un proyecto de Visual Basic 2008 en modo de diseño . Haga doble clic en el control " ProgressBar " para agregarlo al formulario. Haga doble clic en el control "Button" para añadirlo a la forma también. Colocar los controles en el formulario como desee que aparezcan.
2
Abra la ventana de código. Tipo " Importa System.IO " en la línea superior para hacer su programa de llamar a funciones de entrada y salida del sistema. Esto es necesario para abrir y leer un archivo .
3
Abra la función " Button1_Click " . Escriba lo siguiente:
cuenta Dim As Integer = 0
entrada As StreamReader = New StreamReader ("c : \\ archivo.txt ")
líneas Dim ( 1000 ) As String
total de Dim como Integer
La primera declaración declara una variable de contador simple. El segundo se abre un objeto StreamReader que lee un archivo de texto llamado " archivo.txt ". La tercera declaración crea una matriz de cadenas con capacidad para 1.000 líneas del archivo de texto . La última declaración crea una variable entera que va a utilizar para actualizar la barra de progreso
4
Escriba lo siguiente : .
Mientras
líneas
No input.EndOfStream ( count) = input.ReadLine ()
cuenta
+ = 1 End While
Este bucle lee el archivo de texto y las tiendas y almacenes de cada línea en un punto en la matriz hasta que cada línea ha sido leído
5
Escriba lo siguiente : .
progreso = cuenta
ProgressBar1.Minimum = 0
ProgressBar1.Maximum = progreso
establece la variable " progreso" al valor que la variable "cuenta" , y selecciona el valor mínimo de la barra de progreso a cero y el máximo para el valor que el "progreso ", sostiene .
6
Escriba lo siguiente :
For i = 0 To curso - 1
callToSomeFunction (array )
progreso - = 1
ProgressBar1.Value = i
Siguiente I Love
ciclos Este bucle a través de cada elemento de la matriz y realiza una acción sobre el mismo en la línea " callToSomeFunction (array ) " . A medida que se procesa cada elemento de la matriz , la variable "progreso " se disminuye en uno y el valor de la barra de progreso se cambia para reflejar el estado del bucle.