<Page x:Class="FrameExample.Page1"
xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml">
<StackPanel>
<RadioButton Name="VisualBasic" Checked="BrowseAHomePage" GroupName="HomePages">
Visual Basic
</RadioButton>
<RadioButton Name="VisualCSharp" Checked="BrowseAHomePage" GroupName="HomePages">
Visual C#
</RadioButton>
<RadioButton Name="AnotherPage" Checked="BrowseAHomePage" GroupName="HomePages">
XAML Page
</RadioButton>
<Frame Name = "myFrame" Background="LightBlue"/>
</StackPanel>
</Page>
//File:Window.xaml.vb
Imports System
Imports System.Windows
Imports System.Windows.Controls
Imports System.Windows.Data
Imports System.Windows.Documents
Imports System.Windows.Media
Imports System.Windows.Navigation
Imports System.Windows.Shapes
Imports System.Windows.Input
Imports System.IO
Imports System.Net
Namespace FrameExample
Public Partial Class Page1
Inherits Page
Private Sub BrowseAHomePage(sender As Object, e As RoutedEventArgs)
If CType(VisualBasic.IsChecked, [Boolean]) Then
myFrame.Navigate(New System.Uri("http://msdn.microsoft.com/vbasic/"))
ElseIf CType(VisualCSharp.IsChecked, [Boolean]) Then
myFrame.Navigate(New System.Uri("http://msdn.microsoft.com/vcsharp/"))
ElseIf CType(AnotherPage.IsChecked, [Boolean]) Then
myFrame.Navigate(New System.Uri("AnotherPage.xaml", UriKind.RelativeOrAbsolute))
End If
End Sub
End Class
End Namespace
|