【VB.NET】【WPF】xaml 定義の StoryBoard の開始と終了時の処理をコードで記述

xaml 定義の StoryBoard（アニメーション）の開始と終了時の処理をコードで記述する場合。

Dim sb As System.Windows.Media.Animation.Storyboard = FindResource("Storyboard1") 'xaml 定義の StoryBoard を取得
AddHandler sb.Completed, Sub() Me.Close() 'StoryBoard 終了時の処理を定義
sb.Begin() 'StoryBoard を開始

いままで書いた記事の中で最短かな。記事というよりメモだね。