Windows Phone Slider Progress and Media Player (Slider MediaElement)

Imports System.Windows.Threading

Partial Public Class MainPage
    Inherits PhoneApplicationPage

    ' Constructor
    Public Sub New()
        InitializeComponent()
        ' Re-assign names already in the XAML file
        appbarRewindButton = TryCast(Me.ApplicationBar.Buttons(0), ApplicationBarIconButton)
        appbarPlayButton = TryCast(Me.ApplicationBar.Buttons(1), ApplicationBarIconButton)
        appbarPauseButton = TryCast(Me.ApplicationBar.Buttons(2), ApplicationBarIconButton)
        appbarEndButton = TryCast(Me.ApplicationBar.Buttons(3), ApplicationBarIconButton)

        ' Time Tick
        dt.Interval = New TimeSpan(0, 0, 0, 0, 100)
        AddHandler dt.Tick, AddressOf Me.dt_Tick
        dt.Start()


    End Sub

    Dim dt As DispatcherTimer = New DispatcherTimer

    Private Sub OnAppbarRewindClick(sender As Object, e As System.EventArgs)
        mediaElement.Position = TimeSpan.Zero
    End Sub

    Private Sub OnAppbarPlayClick(sender As Object, e As System.EventArgs)
        mediaElement.Play()
        dt.Start()
    End Sub

    Private Sub OnAppbarPauseClick(sender As Object, e As System.EventArgs)
        mediaElement.Pause()
        dt.Stop()
    End Sub

    Private Sub OnAppbarEndClick(sender As Object, e As System.EventArgs)
        mediaElement.Position = mediaElement.NaturalDuration.TimeSpan
    End Sub

    ' MediaElement events
    Private Sub OnMediaElementMediaFailed(sender As Object, args As ExceptionRoutedEventArgs)
        errorText.Text = args.ErrorException.Message
    End Sub

    Private Sub OnMediaElementMediaOpened(sender As Object, args As RoutedEventArgs)
        appbarRewindButton.IsEnabled = True
        appbarEndButton.IsEnabled = True

        ' Slider
        SliderMedia.Maximum = getMinute(mediaElement.NaturalDuration.TimeSpan)
    End Sub

    Private Sub OnMediaElementCurrentStateChanged(sender As Object, args As RoutedEventArgs)
        statusText.Text = mediaElement.CurrentState.ToString()

        If mediaElement.CurrentState = MediaElementState.Stopped Or mediaElement.CurrentState = MediaElementState.Paused Then
            appbarPlayButton.IsEnabled = True
            appbarPauseButton.IsEnabled = False
        ElseIf mediaElement.CurrentState = MediaElementState.Playing Then
            appbarPlayButton.IsEnabled = False
            appbarPauseButton.IsEnabled = True
        End If
    End Sub

    Private Sub dt_Tick(ByVal sender As Object, ByVal e As EventArgs)
        Dim strDuration As String = mediaElement.Position.ToString()
        statusText.Text = mediaElement.CurrentState.ToString() & " - " & getTime(strDuration).ToString()
        SliderMedia.Value = getMinute(mediaElement.Position)
    End Sub

    Public Function getMinute(ByVal strTime As TimeSpan) As Integer
        Return strTime.TotalMinutes * 60
    End Function

    Public Function getTime(ByVal strTime As String) As String
        Return strTime.Substring(0, 8).ToString()
    End Function

End Class

using System;
using System.Collections.Generic;
using System.Linq;
using System.Net;
using System.Windows;
using System.Windows.Controls;
using System.Windows.Documents;
using System.Windows.Input;
using System.Windows.Media;
using System.Windows.Media.Animation;
using System.Windows.Shapes;
using Microsoft.Phone.Controls;
using System.Windows.Threading;
using Microsoft.Phone.Shell;

namespace PhoneAppCS
{
    public partial class MainPage : PhoneApplicationPage
    {

        // Constructor
        public MainPage()
        {
            InitializeComponent();
            // Re-assign names already in the XAML file
            appbarRewindButton = this.ApplicationBar.Buttons[0] as ApplicationBarIconButton;
            appbarPlayButton = this.ApplicationBar.Buttons[1] as ApplicationBarIconButton;
            appbarPauseButton = this.ApplicationBar.Buttons[2] as ApplicationBarIconButton;
            appbarEndButton = this.ApplicationBar.Buttons[3] as ApplicationBarIconButton;

            // Time Tick
            dt.Interval = new TimeSpan(0, 0, 0, 0, 100);
            dt.Tick += this.dt_Tick;
            dt.Start();


        }


        DispatcherTimer dt = new DispatcherTimer();
        private void OnAppbarRewindClick(object sender, System.EventArgs e)
        {
            mediaElement.Position = TimeSpan.Zero;
        }

        private void OnAppbarPlayClick(object sender, System.EventArgs e)
        {
            mediaElement.Play();
            dt.Start();
        }

        private void OnAppbarPauseClick(object sender, System.EventArgs e)
        {
            mediaElement.Pause();
            dt.Stop();
        }

        private void OnAppbarEndClick(object sender, System.EventArgs e)
        {
            mediaElement.Position = mediaElement.NaturalDuration.TimeSpan;
        }

        // MediaElement events
        private void OnMediaElementMediaFailed(object sender, ExceptionRoutedEventArgs args)
        {
            errorText.Text = args.ErrorException.Message;
        }

        private void OnMediaElementMediaOpened(object sender, RoutedEventArgs args)
        {
            appbarRewindButton.IsEnabled = true;
            appbarEndButton.IsEnabled = true;

            // Slider
            SliderMedia.Maximum = getMinute(mediaElement.NaturalDuration.TimeSpan);
        }

        private void OnMediaElementCurrentStateChanged(object sender, RoutedEventArgs args)
        {
            statusText.Text = mediaElement.CurrentState.ToString();

            if (mediaElement.CurrentState == MediaElementState.Stopped | mediaElement.CurrentState == MediaElementState.Paused)
            {
                appbarPlayButton.IsEnabled = true;
                appbarPauseButton.IsEnabled = false;
            }
            else if (mediaElement.CurrentState == MediaElementState.Playing)
            {
                appbarPlayButton.IsEnabled = false;
                appbarPauseButton.IsEnabled = true;
            }
        }

        private void dt_Tick(object sender, EventArgs e)
        {
            string strDuration = mediaElement.Position.ToString();
            statusText.Text = mediaElement.CurrentState.ToString() + " - " + getTime(strDuration).ToString();
            SliderMedia.Value = getMinute(mediaElement.Position);
        }

        public Double getMinute(TimeSpan strTime)
        {
            return strTime.TotalMinutes * Convert.ToDouble(60);
        }

        public string getTime(string strTime)
        {
            return strTime.Substring(0, 8).ToString();
        }

    }
}