xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
Title="Custom Media Player"
Activated="window_Activated"
Deactivated="window_Deactivated"
Closing="window_Closing">
Play
Stop
//File:Window.xaml.vb
Imports System
Imports System.ComponentModel
Imports System.Windows
Public Partial Class CustomMediaPlayerWindow
Inherits Window
Public Sub New()
InitializeComponent()
End Sub
Private isMediaElementPlaying As Boolean
Private Sub playButton_Click(sender As Object, e As RoutedEventArgs)
Me.mediaElement.Play()
Me.isMediaElementPlaying = True
End Sub
Private Sub stopButton_Click(sender As Object, e As RoutedEventArgs)
Me.mediaElement.[Stop]()
Me.isMediaElementPlaying = False
End Sub
Private Sub window_Activated(sender As Object, e As EventArgs)
If Me.isMediaElementPlaying Then
Me.mediaElement.Play()
End If
End Sub
Private Sub window_Deactivated(sender As Object, e As EventArgs)
If Me.isMediaElementPlaying Then
Me.mediaElement.Pause()
End If
End Sub
Private Sub exitMenu_Click(sender As Object, e As RoutedEventArgs)
Me.Close()
End Sub
Private Sub window_Closing(sender As Object, e As CancelEventArgs)
If Me.isMediaElementPlaying Then
e.Cancel = True
End If
End Sub
End Class