Feedback

Treenode-Tags zur verwendung abfragen [für Anfänger]

Sprache: VB

Mit diesem Code kann man in VB.net über die Treenode-Tags z.B. Einen Explorer ähnlichen aufbau erzeugen
Private Sub TreeView1_NodeMouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.TreeNodeMouseClickEventArgs) Handles TreeView1.NodeMouseClick
        Dim varOpen As String
        Dim n As TreeNode
        n = e.Node
        If n.Tag Is Nothing Then Exit Sub
        varOpen = n.Tag.ToString()
        Select Case varOpen
        'Dann mit den cases die treenode-tags abfragen 
            Case "Beispiel"
        'Verarbeitung.....
        End Select
        End Sub
Private Sub TreeView1_NodeMouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.TreeNodeMouseClickEventArgs) Handles TreeView1.NodeMouseClick
        Dim varOpen As String
        Dim n As TreeNode
        n = e.Node
        If n.Tag Is Nothing Then Exit Sub
        varOpen = n.Tag.ToString()
        Select Case varOpen
        'Dann mit den cases die treenode-tags abfragen 
            Case "Beispiel"
        'Verarbeitung.....
        End Select
        End Sub

1 Kommentar

  1. kleiner gehts mit
    [code]
    Private Sub TreeView1_NodeMouseClick(ByVal sender As Object, ByVal e As TreeNodeMouseClickEventArgs)

    Select Case e.Node.Tag.ToString

    Case „Beispiel“
    ‚…
    Case Else
    ‚…
    End Select

    End Sub
    [/code]