Wednesday, July 6, 2011

How to display all selected nodes in TreeVirw VB

    Private Sub btnUpdate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnUpdate.Click
        Dim names As String = ""
        Dim values As String = ""
        For Each parentNodes As TreeNode In trvIndustrySelections.Nodes
            For Each childNodes As TreeNode In parentNodes.Nodes
                If (childNodes.Checked) Then
                    names = childNodes.Text + "; " + names
                    values = childNodes.Name + "; " + values
                End If
            Next
        Next

        txtCurrentSelectNames.Text = names
        txtCurrentSelectValues.Text = values
    End Sub

No comments: