ListBox中操作其他UserControl控件的实现问题

方案一：通过视觉树查找父级ListBox（无需额外传参） #

在UserControl1的按钮点击事件中，先设置当前按钮文本为"Yes"，再通过视觉树定位所在的ListBox，遍历所有Item并区分当前控件与其他控件，修改对应按钮文本：

完整代码实现 #

Private Sub ButtonNotify_Click(sender As Object, e As RoutedEventArgs) Handles ButtonNotify.Click
    ' 设置当前按钮文本为Yes
    ButtonNotify.Content = "Yes"
    
    ' 查找当前UserControl所在的ListBox
    Dim parentListBox As ListBox = FindVisualParent(Of ListBox)(Me)
    If parentListBox IsNot Nothing Then
        ' 遍历ListBox中所有项
        For Each item In parentListBox.Items
            ' 将Item转换为UserControl1类型
            Dim targetUC As UserControl1 = TryCast(item, UserControl1)
            If targetUC IsNot Nothing Then
                ' 排除当前控件，其余设置为No
                If targetUC IsNot Me Then
                    targetUC.ButtonNotify.Content = "No"
                End If
            End If
        Next
    End If
End Sub

' 辅助方法：递归查找视觉树中的父级控件
Private Function FindVisualParent(Of T As DependencyObject)(child As DependencyObject) As T
    Dim parentObj = VisualTreeHelper.GetParent(child)
    If parentObj Is Nothing Then Return Nothing
    
    ' 尝试转换为目标类型
    Dim parentT As T = TryCast(parentObj, T)
    If parentT IsNot Nothing Then
        Return parentT
    Else
        ' 递归向上查找
        Return FindVisualParent(Of T)(parentObj)
    End If
End Function

方案二：给UserControl传递ListBox引用（更直接） #

在添加UserControl到ListBox时，直接传递ListBox的引用，省去视觉树查找的步骤：

步骤1：在UserControl1中添加关联属性 #

' 用于存储关联的ListBox引用
Public Property AssociatedListBox As ListBox

步骤2：添加UserControl时传递ListBox引用 #

For i = 0 To 2
    Dim TestItem As New UserControl1
    TestItem.ButtonNotify.Content = "Blank"
    ' 传递ListBox引用
    TestItem.AssociatedListBox = MyListBox
    MyListBox.Items.Add(TestItem)
Next

步骤3：修改按钮点击事件代码 #

Private Sub ButtonNotify_Click(sender As Object, e As RoutedEventArgs) Handles ButtonNotify.Click
    ButtonNotify.Content = "Yes"
    
    ' 直接使用关联的ListBox遍历
    If AssociatedListBox IsNot Nothing Then
        For Each item In AssociatedListBox.Items
            Dim targetUC As UserControl1 = TryCast(item, UserControl1)
            If targetUC IsNot Nothing AndAlso targetUC IsNot Me Then
                targetUC.ButtonNotify.Content = "No"
            End If
        Next
    End If
End Sub

关键注意点 #

• 使用TryCast进行类型转换：避免ListBox中存在非UserControl1类型的项时引发错误
• 排除当前控件：确保只有被点击的按钮显示"Yes"，其余显示"No"

内容的提问来源于stack exchange，提问作者video.baba