Tema: ProgressBAR
Ver Mensaje Individual
  #6 (permalink)  
Antiguo 15/12/2008, 08:20
virtualkaiser
 
Fecha de Ingreso: mayo-2007
Mensajes: 38
Antigüedad: 17 años
Puntos: 0
De acuerdo Respuesta: ProgressBAR

Ya me canse! una y otra vez ya no se que hacerrrrrrrr.......
Este es mi codigo, esta de esta forma ya que al hacer un click en la lista de usuarios cargados tambien carga los datos en los texbox para poder editarlos!
Si alguien podria darme una mano con esto!!!!!

Dim da As miBase_cellDataSetTableAdapters.TblUsersTableAdapt er = New miBase_cellDataSetTableAdapters.TblUsersTableAdapt er()

Dim conn As New SqlConnection("Data Source=.........")
Dim cmd1 As New SqlCommand("select count(*) as RowNumber from TblUsers", conn)
conn.Open()

Dim da1 As SqlDataReader = cmd1.ExecuteReader()
da1.Read()

Dim RowNumber As Integer = CInt(da1(0))

Me.ProgressBar1.Minimum = 0
Me.ProgressBar1.Maximum = RowNumber

Dim i As Integer
For i = ProgressBar1.Minimum To ProgressBar1.Maximum
ProgressBar1.PerformStep()
'la idea seria meter el listview aqui dentro!
Next

'de esta forma ejecuta el progressbar y luego el listview!
'osea, ejecuta uno y despues el otro!

lstbUsuarios.DataSource = da.GetDataByUsuarioEditarTodo
lstbUsuarios.DisplayMember = "Nombre" 'nombre del usuario
lstbUsuarios.ValueMember = "id"
lstbUsuarios.Refresh()

da1.Close()