0

我希望菜单像这样工作:当我单击 中的任何项目时Menu,它会被选中。现在,当我从同一个项目中选择另一个项目时Menu,先前选择的项目变为未选中状态,新选择的项目显示为已选中。

<DockPanel.Resources>
    <Style TargetType="{x:Type MenuItem}">
        <EventSetter Event="Click" Handler="Onfilter_Click" />
    </Style>
</DockPanel.Resources>

<Menu DockPanel.Dock="Top" >
    <MenuItem x:Name="filtermenu" Header="_FilterType" BorderBrush="White" >
        <MenuItem Header="ShowAll" IsChecked="True" />
        <MenuItem Header="FirstPage" />
        <MenuItem Header="Secondpage"  InputGestureText="Alt+F3" />
    </MenuItem>
</Menu>

在上面的代码中,我已经处理了如何检查和取消选中项目。如果我执行下面的方法,一切都会取消选中

而且,如果我按Alt+F3,则必须处理Secondpage MenuItem,即使它得到处理,也会调用Onfilter_Click方法。我怎样才能做到这一点?

Private Sub Onfilter_Click(ByVal sender As System.Object, ByVal e As System.Windows.RoutedEventArgs)
        Dim b As MenuItem = TryCast(sender, MenuItem)

        If Not obj Is Nothing Then

            For i As Integer = 0 To filtermenu.Items.Count - 1

                Dim mni As System.Windows.Controls.MenuItem = DirectCast(filtermenu.Items(i), System.Windows.Controls.MenuItem)
                Dim s As String = mni.Header

                If Not s = b.Header Then
                    If mni.IsChecked Then
                        mni.IsChecked = False
                    End If
                Else
                    If Not mni.IsChecked Then
                        mni.IsChecked = True
                    End If
                End If
            Next
            ' b.IsChecked = True
            obj.FilterImages(b.Header)
        End If
    End Sub
4

0 回答 0