Quizas el titulo no explique muy bien mi estado de locura y ansiedad actual.
Bueno lo que intento hacer es que si le das a un boton:
Es que todos los labels hagan esto:
Label1.BorderStyle = 0
Sin tener que escribir lo mismo..
¿se puede?
Lo Ideal Seria que uses Matrices entonces con un Bucle le haces eso a todos "De un saque"
Cita de: agus0 en 6 Enero 2011, 00:13 AM
Lo Ideal Seria que uses Matrices entonces con un Bucle le haces eso a todos "De un saque"
Ahora mismo, me aumenta la rabia, realmente todos los labels son iguales, pero se me ha ocurrido la brillante idea de no usar matrices, sino dejar cada label independiente..
¿Se puede o he de empezar de 0 ?
.
Esto te ayudara si no tienes un Array de controles.
Dim v As Variant
For Each v In Me.Controls ' // Me = Form Actual tambien puedes poner Form1.controls etc..
If TypeName(v) = "Label" Then
With v
.BorderStyle = 0
.BackColor = vbRed
End With
End If
Next v
Temibles Lunas!¡.
Voy a probar eso puede que me ahorre unas 70 lineas jajajja
Edito: Gracias.