Member Avatar for westsiderailway

hi there ,
i would like to use the select statement in this event and not sure how to proceed...

 Private Sub TreeView1_AfterSelect(sender As Object, e As TreeViewEventArgs) Handles TreeView1.AfterSelect
        Dim NS As String = ""
        Select Case NS
            Case "Monday"
                If NS And e.Node.Text = "Monday" Then
                    MessageBox.Show("The user clicked on the Child Node " & e.Node.Text, " Which Node Selected", MessageBoxButtons.OK, MessageBoxIcon.Information)
                End If
            Case "Tuesday"
                If e.Node.Text = "Tuesday" Then
                    MessageBox.Show("The user clicked on the Child Node " & e.Node.Text, " Which Node Selected", MessageBoxButtons.OK, MessageBoxIcon.Information)
                End If
            Case "Wednesday"
                If e.Node.Text = "Wednesday" Then
                    MessageBox.Show("The user clicked on the Child Node " & e.Node.Text, " Which Node Selected", MessageBoxButtons.OK, MessageBoxIcon.Information)
                End If
            Case "Thursday"
                If e.Node.Text = "Thursday" Then
                    MessageBox.Show("The user clicked on the Child Node " & e.Node.Text, " Which Node Selected", MessageBoxButtons.OK, MessageBoxIcon.Information)
                End If
            Case "Friday"
                If e.Node.Text = "Friday" Then
                    MessageBox.Show("The user clicked on the Child Node " & e.Node.Text, " Which Node Selected", MessageBoxButtons.OK, MessageBoxIcon.Information)
                End If
            Case "Saturday"
                If e.Node.Text = "Saturday" Then
                    MessageBox.Show("The user clicked on the Child Node " & e.Node.Text, " Which Node Selected", MessageBoxButtons.OK, MessageBoxIcon.Information)
                End If
            Case "Sunday"
                If e.Node.Text = "Sunday" Then
                    MessageBox.Show("The user clicked on the Child Node " & e.Node.Text, " Which Node Selected", MessageBoxButtons.OK, MessageBoxIcon.Information)
                End If
        End Select
    End Sub

Thanks for all your replys. :-)

  • 2 Contributors
  • 2 Replies
  • 300 Views
  • 8 Hours Discussion Span
  • Latest Post Latest Post by westsiderailway
Member Avatar for Santanu.Das

Do not understand, why are you using same messagebox repeatedly for each weekdays. You can do it simply in 1 line. It should be

 Private Sub TreeView1_AfterSelect(sender As Object, e As TreeViewEventArgs) Handles TreeView1.AfterSelect
        MessageBox.Show("The user clicked on the Child Node " & e.Node.Text, " Which Node Selected", MessageBoxButtons.OK, MessageBoxIcon.Information)

        Select Case e.Node.Text
            Case "Monday"
                'Write your codes  here
            Case "Tuesday"
                'Write your codes  here
            Case "Wednesday"
                'Write your codes  here
            Case "Thursday"
                'Write your codes  here
            Case "Friday"
                'Write your codes  here
            Case "Saturday"
                'Write your codes  here
            Case "Sunday"
                'Write your codes  here
        End Select
    End Sub

Hope it can help you.

Member Avatar for westsiderailway

Thank you for tiding up my code. :-)

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.