crystalelle
New member
- Joined
- Mar 4, 2008
- Messages
- 4
- Programming Experience
- Beginner
Hi,
I am currently using treeview child node to load tabcontrol. The following is my code.
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ListNodes(TreeView1.Nodes(0))
With TreeView1.Nodes.Item("ResourceMenu")
.Nodes(0).Nodes.Item("ModEnqCust").Tag = TabEnqCust
End With
End Sub
Private Sub TreeView1_AfterSelect(ByVal sender As System.Object, ByVal e As System.Windows.Forms.TreeViewEventArgs) Handles TreeView1.AfterSelect
If PreviousTab IsNot Nothing Then
PreviousTab.Visible = False
End If
If e.Node.Tag IsNot Nothing Then
Dim ActiveTab As TabControl = CType(e.Node.Tag, TabControl)
ActiveTab.Visible = True
ActiveTab.Dock = DockStyle.Fill
PreviousTab = ActiveTab
End If
End Sub
My problem is I need some of the child node to load new form as well. How do I modify this code to allow child node for example
.Nodes(0).Nodes.Item("CustStatement").Tag to load Form2.
Please guide.
Thanks
I am currently using treeview child node to load tabcontrol. The following is my code.
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ListNodes(TreeView1.Nodes(0))
With TreeView1.Nodes.Item("ResourceMenu")
.Nodes(0).Nodes.Item("ModEnqCust").Tag = TabEnqCust
End With
End Sub
Private Sub TreeView1_AfterSelect(ByVal sender As System.Object, ByVal e As System.Windows.Forms.TreeViewEventArgs) Handles TreeView1.AfterSelect
If PreviousTab IsNot Nothing Then
PreviousTab.Visible = False
End If
If e.Node.Tag IsNot Nothing Then
Dim ActiveTab As TabControl = CType(e.Node.Tag, TabControl)
ActiveTab.Visible = True
ActiveTab.Dock = DockStyle.Fill
PreviousTab = ActiveTab
End If
End Sub
My problem is I need some of the child node to load new form as well. How do I modify this code to allow child node for example
.Nodes(0).Nodes.Item("CustStatement").Tag to load Form2.
Please guide.
Thanks