Puedes hacer lo que te comentaron, sumarle un valor al progressbar dentro del bucle, podria ser algo asi...
Cita:
Iniciado por steffyn_90 Bueno basicamente es este el proceso que hago, pero son muchas tablas a la vez.
Código vb:
Ver originalCall ConnectDatabaseLanmark()
Dim cmd12 As New Odbc.OdbcCommand
cmd12.Connection = Conection
cmd12.CommandText = "SELECT code, ""desc"" FROM MARKCAT"
cmd12.CommandType = CommandType.Text
Dim dr12 As Odbc.OdbcDataReader = cmd12.ExecuteReader()
[COLOR="Red"] ProgressBar1.Value = 0
ProgressBar1.Maximum = 0[/COLOR] "Despues aqui tendrias que encontrar la cantidad de registros que tienes para asignarle al valor maximo"
While dr12.Read()
k = dr12.Item("code")
l = dr12.Item("desc")
Call ConnectDatabase()
Dim MyCommand12 As New SqlCommand
MyCommand12.Connection = MySqlConnection
MyCommand12.CommandText = "Insert INTO dbo.MARKCAT VALUES('" & k & "', '" & l & "' )"
MyCommand12.CommandType = CommandType.Text
MyCommand12.ExecuteNonQuery()
[COLOR="Red"] ProgressBar1.Value += 1[/COLOR]
Call DisconnectDatabase()
End While
Muchas Graciaaaas por la ayuda.
Espero te sirva o te de una idea para que lo implementes a tu codigo.....