Vertragspartner anzeigen / bearbeiten
[Visual Basic] Private Sub TreeStrukturVertragspartnerAnzeigenToolStipMenuItem_Click( _
ByVal sender As Object, _
ByVal e As EventArgs _
) Handles _
TreeStrukturVertragspartnerAnzeigenToolStipMenuItem.Click
[Visual Basic] Private Sub TreeStrukturVertragspartnerAnzeigenToolStipMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TreeStrukturVertragspartnerAnzeigenToolStipMenuItem.Click
Dim tmptag As TKB.VV.Vertrag.Treenode_Descriptor = Me.TreeStruktur.SelectedNode.Tag
If tmptag.Type = "Vertragspartner" Then
Dim f As New frmVertragspartner(tmptag.Vertragspartnernr, Me.FormReadonly)
f.MdiParent = Me.MdiParent
f.Show()
End If
End Sub
Plattformen: Windows 98, Windows 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition