spacesister
Grünschnabel
Hallo,
ich bastel grade an meiner ersten VB.net Anwendung. Diese wird in einem MDI Frame gehalten. Ich habe 4 child forms, jedes dieser Form wird in einem anderen Projekt gehalten. Die Forms werden jeweils mit dem Form gespeichert und dem mdiParent zugeordnet. Zusätzlich hat jedes form noch einen controller in dem verschiedene Functions ausgeführt werden.
Nun zu meinem Problem...beim Programmstart lade ich alle (4) forms, nun möchte ich nachdem ich einige funktionen im ersten form durchlaufen habe eine methode im 2. aufrufen. Dabei wurden wenn ich einfach
mache mehre neue child form erstellt und meine schöne s´grafische Anwendung findet nicht statt ... ok, also child wieder verwenden, aber wie?
Das hier ist mein ansatz:
das richitge child finde ich ja, aber wie bitte weise ich das dann zu? und ist der ansatz überhaupt richtig?
Über schnelle Hilfe wäre ich sehr dankbar ...
Gruß
Spacesister
ich bastel grade an meiner ersten VB.net Anwendung. Diese wird in einem MDI Frame gehalten. Ich habe 4 child forms, jedes dieser Form wird in einem anderen Projekt gehalten. Die Forms werden jeweils mit dem Form gespeichert und dem mdiParent zugeordnet. Zusätzlich hat jedes form noch einen controller in dem verschiedene Functions ausgeführt werden.
Nun zu meinem Problem...beim Programmstart lade ich alle (4) forms, nun möchte ich nachdem ich einige funktionen im ersten form durchlaufen habe eine methode im 2. aufrufen. Dabei wurden wenn ich einfach
Code:
Dim myForm2 as new project2.form2
Das hier ist mein ansatz:
Code:
Private Function getMdiChildren()
Dim nCount As Integer
Dim i As Integer
Dim mdiCarPark As Object
Dim mdiParkCast As mdiFrame.mdiFrm
nCount = MymdiFrm.MdiChildren.Length
Console.WriteLine("mdi childern:" + nCount.ToString)
For i = 0 To nCount - 1
mdiCarPark = MymdiFrm.MdiChildren(i)
If TypeOf mdiCarPark Is ParkingPlace.FrmParkingPlace Then
'define return type
'textbox = DirectCast(obj, TextBox)
mdiCarPark = DirectCast(mdiCarPark, mdiFrame.mdiFrm)
'mdiParkCast = CType(mdiCarPark, mdiFrame.mdiFrm)
Return mdiParkCast
End If
Next
End Function
Über schnelle Hilfe wäre ich sehr dankbar ...
Gruß
Spacesister