0

我有一个Window和一个Page。有Window3 个按钮，默认情况下禁用。有Page1 个按钮，当单击 10 次时会显示一条消息，并且应该启用Window.

Page在单击 10 次按钮后，如何启用 Window 中的 3 个按钮？

主窗口 XAML：

 <Window x:Class="MainWindow"
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    Title="MainWindow" Height="350" Width="525">
    <Grid x:Name="Window1Grid">
        <Grid x:Name="FrameGrid">
            <Button IsEnabled="False" Content="Button" Height="23" HorizontalAlignment="Left" Margin="18,56,0,0" Name="Button1" VerticalAlignment="Top" Width="75" />
            <Button IsEnabled="False" Content="Button" Height="23" HorizontalAlignment="Left" Margin="18,112,0,0" Name="Button2" VerticalAlignment="Top" Width="75" />
            <Button IsEnabled="False" Content="Button" Height="23" HorizontalAlignment="Left" Margin="18,165,0,0" Name="Button3" VerticalAlignment="Top" Width="75" />
        </Grid>
        <Frame Source="Page1.xaml" Height="250" HorizontalAlignment="Left" Margin="114,38,0,0" Name="Frame1" VerticalAlignment="Top" Width="300" />

    </Grid>
</Window>

主窗口 .vb

   Public Class MainWindow

End Class

第 1 页 .Xaml

<Page x:Class="Page1"
  xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
  xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
  xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006" 
  xmlns:d="http://schemas.microsoft.com/expression/blend/2008" 
  mc:Ignorable="d" 
  d:DesignHeight="250" d:DesignWidth="300"
  Title="Page1">
<Grid x:Name="Page1Grid" Background="Red">
    <Button Content="Button" Height="23" HorizontalAlignment="Left" Margin="113,166,0,0" Name="Button1" VerticalAlignment="Top" Width="75" />
    <TextBlock Height="23" HorizontalAlignment="Left" Margin="14,12,0,0" Name="Page1TxtBlock" Text="Page1" VerticalAlignment="Top" />
</Grid>

第 1 页 .vb

Class Page1
Dim clicks As String
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.Windows.RoutedEventArgs) Handles Button1.Click
    Try


        clicks += 1

        If clicks >= 10 Then
            MessageBox.Show("Window Buttons should be enabled")
            clicks = 0

        End If
    Catch ex As Exception

    End Try
End Sub

End Class
4

1 回答 1

1

按照评论中的要求进行编辑

单击父按钮时禁用所有三个按钮

在您的 Page1 课程中：

Dim parentWindow as MainWindow;

然后重载 Page 构造函数：

Public Sub New(ByVal mw As MainWindow)
    parentWindow=mw
End Sub

在 Frame 中初始化 Page 时使用

Dim p As New Page1(Me)
frame.Content = p

使用从 page1 调用它

parentWindow.btnSomethinf.IsEnabled=true...
于 2013-06-17T18:08:35.727 回答