Keskustelu: Koodit: VB.NET: Kontrollien läpikäynti For Each -silmukalla

VB6:sta tuttua kontrollien indeksointi ei vb.net:stä löydy. Vastaava asia tehdään For Each loopilla.

Esimerkki käy läpi formin ne kontrollit, joiden nimessä on "Label" ja kirjoittaa Text ominaisuuteen "Hello man".

Sijoita jonkin buttonin tapahtumaan:

Dim st As String
' Käy läpi kaikki kontrollit formilla
For Each MyObject As Object In Me.Controls
    st = CStr(MyObject.name)
    If st.IndexOf("Label") >= 0 Then
        'Tähän oma koodi
        MyObject.text = "Hello man"
    End If
Next

Aika hieno :D