Datenstruktur für den Tree lasen
[Visual Basic] Public Function Load_SubStruktur( _
ByRef Node As TreeNode, _
ByVal Details As Integer, _
ByVal Suchstring As String, _
ByVal AktiveVertraege As CheckState _
) As Object
Abhängig vom Type wird die Struktur nach Vertragspartner oder Vertragstyp aufgebaut
[Visual Basic] Public Function Load_SubStruktur(ByRef Node As TreeNode, ByVal Details As Integer, ByVal Suchstring As String, ByVal AktiveVertraege As CheckState)
Dim x As Treenode_Descriptor = Node.Tag
Dim substrukturdata As New DataTable
Select Case x.Type
Case "Vertragspartner"
Me.xVertragspartnernr = x.Vertragspartnernr
substrukturdata = Get_SubStruktur(0, x.Vertragspartnernr, Details, Suchstring)
Case "Vertragstyp"
substrukturdata = Get_SubStruktur(x.Vertragstypnr, 0, Details, Suchstring)
End Select
Update_Node(substrukturdata, Node, x.Type, Details, AktiveVertraege)
End Function
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