
15/12/2008, 08:20
|
| | Fecha de Ingreso: mayo-2007
Mensajes: 38
Antigüedad: 17 años, 9 meses Puntos: 0 | |
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() |