How do I Pass a parameter to a child form from parent form in VB.net?

[dav61000]

I have a parent form that uses a Treeview Control and I would like to pass the node selected to a child form where the user will add update or delete the record selected using a dataset. Is there a way to pass the selected node as a parameter to the child form?

Here's my code thanks in advance!

Private Sub PopulateTreeView(ByVal inParentID As Integer, ByRef inTreeNode As TreeNode)
objConn.Open()
myReader = objCmd.ExecuteReader

' Dim Reader As OleDb.OleDbDataReader = objCmd.ExecuteReader()
While myReader.Read
For Columns = 0 To myReader.FieldCount - 1
Category = myReader.Item(Columns)
Next
On Error Resume Next
Parentnode = "AHS System Users"
Childnode = Split(Category, "")(0)
If Childnode = Nothing Then
TreeView1.Nodes.Add(Parentnode)
'LastNodeSet = Parentnode
LastNodeSet = Childnode
NodeRootRow += 1
Else
If Parentnode = LastNodeSet Then
TreeView1.Nodes(NodeRootRow).Nodes.Add(Childnode). ToString()
Else
TreeView1.Nodes.Add(Parentnode).Nodes.Add(Childnod e).ToString()
'TreeView1.Nodes.Add(Childnode).Nodes.Add(Childnod e).ToString()
LastNodeSet = Parentnode
NodeRootRow += 1
End If
End If
Parentnode = Nothing : Childnode = Nothing
End While

myReader.Close()
objConn.Close()

End Sub

Private Sub TreeView1_AfterSelect(ByVal sender As System.Object, ByVal e As System.Windows.Forms.TreeViewEventArgs) Handles TreeView1.AfterSelect
Dim pnode = "AHS System Users"
Dim Selectnode = e.Node.Text
If e.Node.Text <> pnode Then
Dim F5 As New Form5()
F5.MdiParent = Me
F5.Show()
End If

[vanc]

Of course you can pass tree view node to your child form.
e.g. Child form provides method accept TreeViewNode as parameter and Parent form calls it passing the selected node. Is it what you want?
Cheers.

[dav61000]

yes thats exactly what I need to do I am new to vb.net can you show me how to do that using my code?

for example I have a parent form called form4 and I want to pass the selected node from the treeview residing on the form4 and pass this node as a parameter to the child form5.

Dim Selectnode As String
Selectnode = e.Node.Text
If e.Node.Text <> pnode Then

Dim F5 As New Form5()
F5.MdiParent = Me
F5.Show()
End If

Thanks

[Shashi Sadasivan]

Override the constructor of Form5 to accept a parameter.
An pass the node as a parameter to Form5 using the new constructor.

If you want code about this, There will be a lot of OOP's for begineers tutorial around

Please look at that rather than getting a sloution from the forums (the tutorials will also give you a lot of conceptual knowledge )
Cheers

[dav61000]

I have looked at numerous tutorials and thought I found what I was looking for however I am having trouble understanding how to override or overload the constructor of the form to include a parameter. I am using Visual studio 2005 and when I key in examples from different tutorials such as this one I get an error.
"Too many arguments to 'Public Sub New()"

Please help me understand
thank you

for example trying to overload form6
by saying

Private otherform As new form6(Selectnode)

[Shashi Sadasivan]

Please have a look at this wiki

You havent tried examples....looks very obvious!

[dav61000]

ok so maybe I should have looked at the tutorials a little closer before asking for help but now I think I am really close but I am having a problem loading the variable into the parameter to be passed. I can't seem to pass the selectnode as a variable but I am able to pass it as a string literal example
selectnode = "john" vs. selectnode = e.node.text

thanks for your help!

here's my code:

For Form1:

Public Shared Selectnode As String
Public Shared otherForm As New Form2(Selectnode)

Public Sub TreeView1_AfterSelect(ByVal sender As System.Object, ByVal e As System.Windows.Forms.TreeViewEventArgs) Handles

TreeView1.AfterSelect
Dim pnode = "Client"
Dim Selectnode = e.Node.Text
If e.Node.Text <> pnode Then
CLIENTABLE2TableAdapter.Fill(Me.AHSCLIENT2DataSet. CLIENTABLE2, Selectnode)
otherform.show()
End If
End Sub

form2 code:
Public Class Form2
Inherits System.Windows.Forms.Form

' Windows Forms Designer generated code region

Public param As String

Public Sub New(ByVal newparameter As String)
MyBase.New()
InitializeComponent()
param = newparameter
End Sub


Public Sub Button1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Button1.Click
MessageBox.Show(param)
End Sub
End Class