Opacity Animation : Color Animation « Windows Presentation Foundation « VB.Net Tutorial

Home
VB.Net Tutorial
1.Language Basics
2.Data Type
3.Operator
4.Statements
5.Date Time
6.Class Module
7.Development
8.Collections
9.Generics
10.Attributes
11.Event
12.LINQ
13.Stream File
14.GUI
15.GUI Applications
16.Windows Presentation Foundation
17.2D Graphics
18.I18N Internationlization
19.Reflection
20.Regular Expressions
21.Security
22.Socket Network
23.Thread
24.Windows
25.XML
26.Database ADO.net
27.Design Patterns
VB.Net
VB.Net by API
VB.Net Tutorial » Windows Presentation Foundation » Color Animation 
16.108.8.Opacity Animation
<Window x:Class="_360Timer.Window1"
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    Title="Concentric Rings" Width="910" Height="512">
  <Canvas Name="MainCanvas" Background="#FFE0E0E0"/>
</Window>
//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.Shapes
Imports System.Windows.Media.Animation

Namespace _360Timer

  Public Partial Class Window1
    Inherits Window
    Public Sub New()
      InitializeComponent()

      Me.Show()

      For i As Integer = To 23
        Dim As New Ellipse()
        e.Stroke = New SolidColorBrush(Color.FromArgb(52200100))
        e.StrokeThickness = 20
        e.Width = 10.0
        e.Height = 20.0

        Me.MainCanvas.Children.Add(e)

        e.SetValue(Canvas.LeftProperty, 300)
        e.SetValue(Canvas.TopProperty, 400)

        Dim duration As Double = 6.0
        Dim delay As Double = 1.0


        Dim opacityAnimation As New DoubleAnimation(duration - 1.00.0, New Duration(TimeSpan.FromSeconds(duration)))
        opacityAnimation.BeginTime = TimeSpan.FromSeconds(delay)
        opacityAnimation.RepeatBehavior = RepeatBehavior.Forever

        e.BeginAnimation(Ellipse.OpacityProperty, opacityAnimation)
      Next
    End Sub
  End Class
End Namespace
16.108.Color Animation
16.108.1.Animated GradientStop Offset with DoubleAnimationAnimated GradientStop Offset with DoubleAnimation
16.108.2.Animated GradientStop Color with ColorAnimationAnimated GradientStop Color with ColorAnimation
16.108.3.Animated GradientStop Opacity ColorAnimation.ByAnimated GradientStop Opacity ColorAnimation.By
16.108.4.Animated GradientOriginAnimated GradientOrigin
16.108.5.Animating ColorAnimating Color
16.108.6.Animating Gradient OffsetAnimating Gradient Offset
16.108.7.Animate GradientStopAnimate GradientStop
16.108.8.Opacity AnimationOpacity Animation
16.108.9.Animation LinearGradientBrushAnimation LinearGradientBrush
16.108.10.Use ColorAnimation to animate backgroundUse ColorAnimation to animate background
www.java2java.com | Contact Us
Copyright 2009 - 12 Demo Source and Support. All rights reserved.
All other trademarks are property of their respective owners.