[VB.NET] Modificare proprietà ForeColor di diversi Button

[m.alverman]

Buonasera forum,
ho una form con 50 button nominati btnMem1, btnMem1, .... btnMem50
da una certa funzione vorrei poter modificare la proprietà forecolor di tutti i button.

Avendo un for che va da 1 a 50 come posso fare questa operazione

cioè
for a = 1 to 50
btnMem & a.forecolor= .....
next

Spero di essere stato chiaro.

Grazie, Alberto

[m.alverman]

Scusate dimenticavo che la domanda è per vb.net

[escocat]

Dim b(50) As Button
        b(1) = Me.Button1
        b(2) = Me.Button2
        b(3) = Me.Button3
        ....
        b(50)=Me.Button50

        Dim c As Color = Color.FromName("Red")

        For i As Integer = 1 To 50
            b(i).ForeColor = c
        Next

[oregon]

Direi che è meglio usare una for each ...

[escocat]

Me.Controls.Add(Button1)
Me.Controls.Add(Button2)
Me.Controls.Add(Button3)
  ...
Me.Controls.Add(Button50)

Dim ctrl As Control
Dim c As Color = Color.FromName("Red")
For Each ctrl In Me.Controls
     ctrl.ForeColor = c
Next

[m.alverman]

Grazie !!

un'altra domanda

Se per i 50 bottoni in ogni bottone devo fare una chiamata ricorsiva come posso evitare di fare così ?

Private Sub btnMem1_Click(sender As System.Object, e As System.EventArgs) Handles btnMem1.Click
Call SendMem("01")
End Sub

Private Sub btnMem2_Click(sender As System.Object, e As System.EventArgs) Handles btnMem2.Click
Call SendMem("02")
End Sub

Private Sub btnMem3_Click(sender As System.Object, e As System.EventArgs) Handles btnMem3.Click
Call SendMem("03")
End Sub

............

Private Sub btnMem50_Click(sender As System.Object, e As System.EventArgs) Handles btnMem50.Click
Call SendMem("50")
End Sub


Grazie, Alberto

[oregon]

Una chiamata ricorsiva?

[m.alverman]

Non so come chiamarla
Ad ogni pressione di un bottone devo chiamare la stessa sub e la sub deve sapere da che pulsante viene chiamata

[oregon]

Una chiamata ricorsiva è ben altra roba ...

Il nome del bottone lo puoi passare tramite

sender.name.ToString()