DispatcherTimer set up : Timer « Windows Presentation Foundation « VB.Net

DispatcherTimer set up

DispatcherTimer set up

<Window x:Class="_360Timer.Window1"
    Title="Concentric Rings" Width="910" Height="512">
  <Canvas Name="MainCanvas" Background="#FFE0E0E0"/>


Imports System
Imports System.Windows
Imports System.Windows.Controls
Imports System.Windows.Data
Imports System.Windows.Documents
Imports System.Windows.Media
Imports System.Windows.Shapes
Imports System.Windows.Media.Animation

Namespace _360Timer

  Public Partial Class Window1
    Inherits Window
    Private frameTimer As System.Windows.Threading.DispatcherTimer

    Public Sub New()

      frameTimer = New System.Windows.Threading.DispatcherTimer()
      AddHandler frameTimer.Tick, AddressOf OnFrame
      frameTimer.Interval = TimeSpan.FromSeconds(1.0 / 60.0)

    End Sub

    Private Sub OnFrame(sender As Object, e As EventArgs)
    End Sub

  End Class
End Namespace


Related examples in the same category

1.Update the UI Asynchronously on a TimerUpdate the UI Asynchronously on a Timer
2.Using a DispatcherTimerUsing a DispatcherTimer