In verschiedenen Formen, gleiche Elemente ansprechen!

[mmike]

Hallo,

in meinem Projekt habe ich mehrere Formen und in diesen Formen sind gleiche Element vorhanden (aber nicht in allen Formen), kann ich diese irgendwie zusammen ansprechen ?

Danke

Mike

 

[Woll0r]

zusammen ansprechen wüsste ich jetzt nicht, aber du kannst z.B. innerhalb von form1 ein label in form2 ansprechen

label1.caption = "test"
form2.label1.caption = "test"

ka ob dir das weiterhilft

 

[Alex F.]

zum beispiel so

Public function FormatAllControls (ctls as controls)
 dim ctl as control 
 for each ctl in ctls
    Select Case TypeOf(ctl) 
        case is Label 
                    ctl.caption = "Meine Labels haben alle den gleichen Text"
         case is Textbox 
                  ctl.Text = "TextboxText" 
         case is PictureBox 
                   ctl.Picture = LoadPicture("c:\immerdasgleichebild.bmp")
          case else 
                  call msgbox ("Control" & ctl.name & " nicht erkannt!")
      end select 
  next ctl

end function

der Aufruf erfolgt dann jeweils über

call FormatAllControls (me.Controls)

Grüsse bb

PS: Mangels fehlender VB-Umgebung ist der Code ungetestet sollte Dir aber zumindest die Richtung zeigen.

 

[mmike]

Ja genau richtig, das habe ich gesucht !

Danke

Mike