画像ファイルをスムーズに拡大/縮小したく下のようなコードを書きました。
スライドバーを動かすとそれにあわせて拡大縮小します。
ただ一定範囲ごとにひっかかりがあります。たぶん拡大縮小の画像を
生成しているんじゃないかと思うのですが何かスムーズになる方法は
ないものでしょうか？環境はVS2008です。

Class Window1

　　Dim img As New Image

　　Private Sub Window1_Loaded(ByVal sender As System.Object, ByVal e As System.Windows.RoutedEventArgs) Handles MyBase.Loaded

　　　　Dim dec As New TiffBitmapDecoder(New Uri("c:\a4.tif"), BitmapCreateOptions.IgnoreColorProfile, BitmapCacheOption.Default)
　　　　For Each frame As BitmapFrame In dec.Frames
　　　　　　img.Source = frame
　　　　　　Canvas1.Children.Add(img)
　　　　　　Exit For
　　　　Next

　　　　Slider1.Maximum = 1000
　　　　Slider1.Value = 500

　　End Sub

　　Private Sub Slider1_ValueChanged(ByVal sender As System.Object, ByVal e As System.Windows.RoutedPropertyChangedEventArgs(Of System.Double)) Handles Slider1.ValueChanged
　　　　img.RenderTransform = New ScaleTransform(Slider1.Value / 1000, Slider1.Value / 1000)
　　End Sub

End Class