Controles en tiempo de ejecucion
Hola, intento crea un listview en tiempo de ejecucion. la linea de codigo que pongo es:
dim withevents LVaux as ListView
en el procedimiento:
set LVaux = form1.controls.add("VB.Listview", "LV")
Lv es un listview creado en diseño y me da un error diciendo que LV ya existe. He mirado por internet, he probado de otras formas pero no lo puedo solucionar.
Espero que me echeis una mano :,)
dim withevents LVaux as ListView
en el procedimiento:
set LVaux = form1.controls.add("VB.Listview", "LV")
Lv es un listview creado en diseño y me da un error diciendo que LV ya existe. He mirado por internet, he probado de otras formas pero no lo puedo solucionar.
Espero que me echeis una mano :,)
Trata de hacerlo con un arrya de controles, es decir, que LV sea un ListView con Index = 0 (elemento inicial o semilla)
Luego, vas creando controles con la instrucciòn Load
Load LV(ProximoIndice)
' Lo ubicas en algún lugar
LV(ProximoIndice).Left = xxxx
LV(ProximoIndice).Top = xxxx
' lo pones visible, ya que se crean invisibles
LV(ProximoIndice).Visible = true
Luego sigues con la carga de datos o lo que desees hacer, pero siempre haciendo referencia a LV con el índice de array correspondiente
Espero que sirva
Saludos desde Argentina
Luego, vas creando controles con la instrucciòn Load
Load LV(ProximoIndice)
' Lo ubicas en algún lugar
LV(ProximoIndice).Left = xxxx
LV(ProximoIndice).Top = xxxx
' lo pones visible, ya que se crean invisibles
LV(ProximoIndice).Visible = true
Luego sigues con la carga de datos o lo que desees hacer, pero siempre haciendo referencia a LV con el índice de array correspondiente
Espero que sirva
Saludos desde Argentina
con el sistema que tu utilizas solo se puede crear un control con el nombre LV, si ya tenias uno en tiempo de diseño no podras agregar otro con el mismo nombre (osea tendrias que crear un LV2 y agregarle todaaaaas las propiedades y eventos de vuelta).
utiliza una matriz que es mas comoda
utiliza una matriz que es mas comoda