VB.NET WinForm子窗体传值：Form2 TreeView选中值同步到Form1 ComboBox

你的代码存在3个核心错误导致传值失效：

• 混淆了VB.NET默认窗体实例与自定义实例的区别：你在MainForm中通过New ChildForm1()创建并放到Panel里的是实际显示的实例，但你直接调用ChildForm1.objForm2_Passvalue时访问的是VB.NET自动生成的默认全局窗体实例，和你显示的实例不是同一个对象，所以操作默认实例的ComboBox自然不会在界面上生效。
• 事件注册时机错误：你在ShowDialog()返回之后才注册ChildForm2的按钮点击事件，此时ChildForm2的按钮已经点击完成、窗体已经关闭，事件永远不会被触发。
• 静态类存储值后没有主动同步到显示的ChildForm1实例：就算你把选中值存在了PageDetail静态类里，也没有主动把值写到当前正在显示的ChildForm1的ComboBox中。

这里推荐更简洁的对话框返回后主动同步值方案，不需要额外注册事件，代码更易维护：

1. 调整MainForm代码 #

首先把currentChildForm的类型明确为ChildForm1，在ChildForm2关闭后如果返回OK，直接把静态类的值加到当前显示的ChildForm1的ComboBox中：

Public Class MainForm ' 注意你之前的代码里把MainForm类名误写为Form1，需对应纠正
    Private currentChildForm As ChildForm1 = Nothing ' 明确类型为ChildForm1，不要用Form基类

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        OpenChildForm(New ChildForm1())
    End Sub

    Private Sub OpenChildForm(childForm As ChildForm1)
        If currentChildForm IsNot Nothing Then
            currentChildForm.Close()
        End If
        currentChildForm = childForm ' 保存当前显示的ChildForm1实例引用
        childForm.TopLevel = False
        childForm.FormBorderStyle = FormBorderStyle.None
        panelFormContainer.Controls.Clear()
        panelFormContainer.Controls.Add(childForm)
        childForm.Dock = DockStyle.Fill
        childForm.BringToFront()
        childForm.Show()
    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim dialogForm As ChildForm2 = New ChildForm2()
        Dim result = dialogForm.ShowDialog()
        ' 对话框关闭后直接判断返回值同步数据
        If result = DialogResult.OK Then
            currentChildForm.ComboBox1.Items.Add(PageDetail.PageTitle)
            ' 可选：自动选中新增的项
            currentChildForm.ComboBox1.SelectedIndex = currentChildForm.ComboBox1.Items.Count - 1
        End If
    End Sub
End Class

2. 可选优化（无需静态类，更规范） #

可以去掉PageDetail静态类，直接在ChildForm2里加公共属性存选中值，避免全局变量污染：

修改ChildForm2代码： #

Public Class ChildForm2
    ' 新增公共属性，外部直接取选中值
    Public ReadOnly Property SelectedNodeText As String
        Get
            Return If(TreeView1.SelectedNode IsNot Nothing, TreeView1.SelectedNode.Text, String.Empty)
        End Get
    End Property

    Private Sub ChildForm2_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        TreeView1.ExpandAll()
        Button1.DialogResult = DialogResult.OK
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Me.Close()
    End Sub
End Class

对应调整MainForm的Button1_Click代码： #

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim dialogForm As ChildForm2 = New ChildForm2()
    Dim result = dialogForm.ShowDialog()
    If result = DialogResult.OK AndAlso Not String.IsNullOrEmpty(dialogForm.SelectedNodeText) Then
        currentChildForm.ComboBox1.Items.Add(dialogForm.SelectedNodeText)
        currentChildForm.ComboBox1.SelectedIndex = currentChildForm.ComboBox1.Items.Count - 1
    End If
End Sub

• 不要直接访问VB.NET的默认窗体实例，所有操作都用自己创建、保存的实例引用，避免多实例操作混乱。
• ComboBox的Modifiers属性要改成Public或者Friend，否则MainForm无法直接访问，也可以在ChildForm1里加一个公共方法专门用来添加选项，封装性更好。
• 操作TreeView选中节点前要加判空，避免未选节点时点击按钮报空引用错误。

内容的提问来源于stack exchange，提问作者coding_cs