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 |