Create animations using the Storyboard in code : Animation « Windows Presentation Foundation « VB.Net Tutorial

1. VB.Net Tutorial
2. Windows Presentation Foundation
3. Animation

<Window x:Class="WpfApplication1.StoryboardInCode"
  xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
  xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
  Title="Storyboard Animation in Code" Height="300" Width="300">
  <Canvas>
    <Button Content="Button1" Width="150" Height="80"
      Canvas.Left="50" Canvas.Top="20">
      <Button.Background>
        <SolidColorBrush x:Name="brush1" />
      </Button.Background>
    </Button>
    <Button Content="Button2" Width="150" Height="80"
      Canvas.Left="50" Canvas.Top="110">
      <Button.Background>
        <SolidColorBrush x:Name="brush2" />
      </Button.Background>
    </Button>
  </Canvas>
</Window>

//File:Window.xaml.vb


Imports System
Imports System.Windows
Imports System.Windows.Controls
Imports System.Windows.Input
Imports System.Windows.Media
Imports System.Windows.Shapes
Imports System.Windows.Media.Animation

Namespace WpfApplication1
  Public Partial Class StoryboardInCode
    Inherits Window
    Public Sub New()
      InitializeComponent()

      Dim sb As New Storyboard()

      Dim ca1 As New ColorAnimation(Colors.Blue, Colors.Yellow, New Duration(New TimeSpan(0, 0, 10)))

      ca1.RepeatBehavior = RepeatBehavior.Forever
      ca1.AutoReverse = True
      Storyboard.SetTargetName(ca1, "brush1")
      Storyboard.SetTargetProperty(ca1, New PropertyPath(SolidColorBrush.ColorProperty))


      Dim ca2 As New ColorAnimation(Colors.Red, Colors.Green, New Duration(New TimeSpan(0, 0, 10)))

      ca2.RepeatBehavior = RepeatBehavior.Forever

      ca2.AutoReverse = True
      ca2.BeginTime = New TimeSpan(0, 0, 5)
      Storyboard.SetTargetName(ca2, "brush2")
      Storyboard.SetTargetProperty(ca2, New PropertyPath(SolidColorBrush.ColorProperty))

      sb.Children.Add(ca1)
      sb.Children.Add(ca2)
      sb.Begin(Me)
    End Sub
  End Class
End Namespace

16.107.Animation
	16.107.1.	Animation of the combined transform
	16.107.2.	Animate the Opacity of TextBlock at different starting time
	16.107.3.	Animate Canvas position
	16.107.4.	RepeatBehavior=2x
	16.107.5.	Xaml Clock
	16.107.6.	Enlarge Buttons In Xaml
	16.107.7.	Setting enumeration values with discrete animations with DiscreteObjectKeyFrame
	16.107.8.	Expand Element
	16.107.9.	Animating nested properties
	16.107.10.	Text Animation
	16.107.11.	Animate Transformation
	16.107.12.	Associating the clicking of each button with a stack of XAML that starts or stops the animation
	16.107.13.	Animation In Xaml
	16.107.14.	Using SpeedRatio in a hierarchy
	16.107.15.	Hold on end for an Animation
	16.107.16.	Animate Several Properties
	16.107.17.	Animation ProgressBar.
	16.107.18.	Control the Progress of an Animation
	16.107.19.	Remove Animations with AnimationClock
	16.107.20.	Remove Animations
	16.107.21.	Timer triggered Animation
	16.107.22.	Rolling Ball Animation
	16.107.23.	Create animations using the Storyboard in code
	16.107.24.	Receive Notification When an Animation Completes
	16.107.25.	A simple, finite animation
	16.107.26.	Code Animation Accelerate Decelerate
	16.107.27.	Animation with code
	16.107.28.	Rotate Button Animation
	16.107.29.	Rotate Button Animation With Layout
	16.107.30.	A Simple Animation in Code