listbox y datagrid
por favor necesito dos cosas
primero como hago en un listbox para hacer dos columnas y que en cada una de ellas haya distintos datos, por ejemplo en una tengo que poner tipodni y en la otra iddni
si pongo columns = 2, despues no se como cargarle los datos
y el mismo problema tengo con el datagrid, necesito ir cargando datos en dos columas y no se que instrucciones cargar, cada vez que presionan un boton tengo que cargar un dato en la columna 1 y otro en la columna dos
espero me entiendan
muchas gracias
primero como hago en un listbox para hacer dos columnas y que en cada una de ellas haya distintos datos, por ejemplo en una tengo que poner tipodni y en la otra iddni
si pongo columns = 2, despues no se como cargarle los datos
y el mismo problema tengo con el datagrid, necesito ir cargando datos en dos columas y no se que instrucciones cargar, cada vez que presionan un boton tengo que cargar un dato en la columna 1 y otro en la columna dos
espero me entiendan
muchas gracias
Para el listbox usa esto.
List1.AddItem "Aqui lo que desees 1", 1
List1.AddItem "Aqui lo que desees 2", 2
List1.AddItem "Aqui lo que desees 1", 1
List1.AddItem "Aqui lo que desees 2", 2
Primero utiliza el MSFlexGrid1, ya que funciona igual que el Datagrid.
En las propiedades del MSFlexGrid1, busca FixedCols y cambia el valor.
asi.
FixedCols = 0
MSFlexGrid1.Col = 0: MSFlexGrid1.Row = 0: MSFlexGrid1.Text = "Columna 0"
MSFlexGrid1.Col = 1: MSFlexGrid1.Text = "Columna 1"
Bueno eso es todo, espero te funcione. suerte
En las propiedades del MSFlexGrid1, busca FixedCols y cambia el valor.
asi.
FixedCols = 0
MSFlexGrid1.Col = 0: MSFlexGrid1.Row = 0: MSFlexGrid1.Text = "Columna 0"
MSFlexGrid1.Col = 1: MSFlexGrid1.Text = "Columna 1"
Bueno eso es todo, espero te funcione. suerte
Para el listbox usa esto.
Private Sub Form_Load()
'Lista en dos columnas
List1.AddItem "Aqui lo que desees 1", 1
List1.AddItem "Aqui lo que desees 2", 2
'Datagrid en dos columnas
MSFlexGrid1.Col = 0: MSFlexGrid1.Row = 0: MSFlexGrid1.Text = "Columna 0"
MSFlexGrid1.Col = 1: MSFlexGrid1.Text = "Columna 1"
End Sub
Private Sub Form_Load()
'Lista en dos columnas
List1.AddItem "Aqui lo que desees 1", 1
List1.AddItem "Aqui lo que desees 2", 2
'Datagrid en dos columnas
MSFlexGrid1.Col = 0: MSFlexGrid1.Row = 0: MSFlexGrid1.Text = "Columna 0"
MSFlexGrid1.Col = 1: MSFlexGrid1.Text = "Columna 1"
End Sub
