Mostrar o no mostrar botones

[jhernanp]

mi aplicacion es un winform

Tengo 60 botones en mi winform todos tiene la propiedad visible en falso

quiero hacer algo para que aparezca deacuerdo a una cantidad que yo le doy

aunque esto es ilogico algo asi

cap es la cantidad que quiero mostrar

For i = 1 To i = cap Step 1
boton(i).visible=true
Next

es posible hacerlo de alguna manera

[VaRg@S]

Coloca un autonumerico en cada Tag de tus botones

Luego usa esta rutina

Private Sub Mostrar(ByVal control As Control, ByVal numero As Integer)
If control.GetType.Name = "Button" Then
If CType(control.Tag, Integer) <= numero Then
control.Visible = True
End If
End If


If control.Controls.Count > 0 Then
Dim tControl2 As Control
For Each tControl2 In control.Controls
Mostrar(tControl2, numero)
Next
End If

End Sub

La parte final del algoritmo es un poco de recursividad, suponiendo que tienes botones dentro de algún contenedor..


Ojala sirva

[jhernanp]

Como le paso el parametro control a la funcion si son 60
o tal ves es que no te entendi
mis botones se llaman S1,S2,S3...S60

[VaRg@S]

Iniciado por jhernanp

Como le paso el parametro control a la funcion si son 60
o tal ves es que no te entendi
mis botones se llaman S1,S2,S3...S60

Ok. como te decía, cada boton tiene una propiedad Tag. Coloca un numero a cada uno que sea consecutivo, de esta manera todos tendrán un número diferente....


para llamar al Metodo usa lo siguieente

Mostrar(Me, 10)
'// 10 es el numero de botones que deben verse

Suerte