Aktives MDIChild und dessen Elemente
ID | 3 |
---|---|
Link Reference | Not set |
Link Credits | Not set |
Link Technical Documentation | Not set |
PlCodelang | VB.NET |
PlGroup | GUI, MDI-Fenster |
PlItemTitle | Aktives MDIChild und dessen Elemente |
Code | If Me.ActiveMdiChild IsNot Nothing Then Dim frm As SubForm = CType(Me.ActiveMdiChild, SubForm) frm.textBox1.Text = "......." End If ' Beispiel: If Me.ActiveMdiChild IsNot Nothing Then If Me.ActiveMdiChild.Name="frmHotel" Then Dim frm As frmHotel = CType(Me.ActiveMdiChild, frmHotel) MessageBox.Show(frm.hotelid) End If End If |
Result Example |