Re: Obtener El Contenido De Una Columna De Un Columnview
...yo quiero que me muestre lo que hay sobre la columna que pulse
Uhmmm... no sé si es posible conseguir
directamente (es decir con los recursos del objeto
ColumnView) lo que tu pides. Lo intenté, pero no he logrado.
...pero encontré una
estratagema.
El objeto
ColumnView, lo que usas, está formado tambien por un objeto
children: un objeto
GridView . Se trata por tanto de utilizar la propiedad "
.current.text " del objeto
GridView (hijo del objeto
ColumnView) .
Como en este ejemplo:
Private ob As Object
Public Sub Form_Open()
Dim b As Byte
With ColumnView1
.Columns.Count = 5
.Add("fila", Null)
End With
' Manejamos el objeto children "GridView" con una variable de tipo "Object":
ob = ColumnView1.Children[0]
For b = 0 To ColumnView1.Columns.Max
' Adsignmos un texto ejemplificador a las columnas del objeto "ColumnView":
ColumnView1.Columns[b].Text = CStr(b)
' Tenemos que adsignar el mismo texto tambien al objeto 'children' "GridView":
ob[0, b].Text = CStr(b)
Next
End
' Siendo el objeto "GridView" un objeto 'children' del objeto "ColumnView", al pulsar sobre una columna del "ColumnView",
' pulsamos contemporaneamente tambien sobre una correspondiente columna del objeto hijo "GridView".
Public Sub ColumnView1_Click()
' Usamos las capacidades de la propiedad ".current.text" del objeto "GridView":
Print ob.current.text
End