Kirjautuminen

Haku

Tehtävät

Keskustelu: Ohjelmointikysymykset: VB.NET: Projektin lomakkeiden läpikäynti

AimoKulaus [24.11.2007 09:35:14]

#

Onko mahdollisuutta käydä läpi For - Each silmukalla kaikki projektissa olevat lomakkeet?

Ohjelmana Visual Basic 2005

Siis jotain tähän tapaan, mutta kun en ole keksinyt mitä tuohon kohtaan "KaikkiProjektinFormit" pitäisi laittaa?

Dim f As Form
For Each f In KaikkiProjektinFormit
    f.Text = "Helou!"
Next

Antti Laaksonen [24.11.2007 10:58:40]

#

Oikea sana lienee My.Application.OpenForms:
http://msdn2.microsoft.com/en-us/library/eh13dca9.aspx

AimoKulaus [24.11.2007 22:31:48]

#

Tuo mainitsemasi siis etsii kaikki avoimet Formit.

Jos tekee Collectionin, niin sillä saa tietoja kaikista lomakkeista, olipa ne auki tai ei.

Projektissa on kaksi lomaketta, ensimmäisessä myös Button1

Public Class Form1

    Dim Alustettu As Boolean = False
    Dim formit As New Collection

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        HaeFormienNimet()
    End Sub

    Public Sub Alustus()
        If Alustettu = True Then Exit Sub

        ' Lisää tähän kaikki projektin formit
        formit.Add(Me)
        formit.Add(Form2)

        Alustettu = True
    End Sub


    Public Sub HaeFormienNimet()
        Dim n As Integer
        Dim c As Control
        Dim Teksti As String
        Dim Forminnimi As String

        Alustus()
        For n = 1 To formit.Count
            c = formit(n)
            Forminnimi = c.Name
            Teksti = c.Text
        Next
    End Sub
End Class

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Tietoa sivustosta