listbox y label

15/10/2007 - 19:37 por daniel | Informe spam
Hola a todos
Necesito lo siguiente
tengo un listbox1 con datos y 20 label (label1 ,label2..label20)
necesito que al pulsar un boton los datos del listbox se pongan cada uno en
un label en el caption
Ejmplo:
listbox1
1
2
3
4
.
pues los label tendrian que quedar asi
label1 = 1
label2 = 2
label3 = 3
label4 = 4
..



un saludo y muchas gracias
Daniel
 

Leer las respuestas

#1 Ivan
15/10/2007 - 20:46 | Informe spam
hola Daniel,

tengo un listbox1 con datos y 20 label (label1 ,label2..label20)
necesito que al pulsar un boton los datos del listbox se pongan cada uno en
un label en el caption



suponiendo que estas hablando de controles en un userform, que los
nombres de los label son como indican y van del Label1 al Label20, y
que el listbox contiene al menos 20 elementos podrias hacer algo
parecido a esto (en el boton o al menos en algun proc. del modulo del
formulario) =>

dim n as byte
for n = 1 to 20
controls("Label" & n).caption = Listbox1.List(n, 0)
next

creo que podria valerte

un saludo
Ivan

Preguntas similares