Private Sub ApplyTransform(t As BaseTransform)
Dim newBitmap = bitmap.Transform(t)
bitmap.Dispose()
bitmap = newBitmap
selection = New RectF(1.0F, 1.0F)
UpdateImage()
End Sub
'ボタンクリック時に画像を縦方向に反転させるイベント
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
ApplyTransform(New FlipRotator(TransformOptions.FlipVertical))
End Sub
'ボタンクリック時に画像を横方向に反転させるイベント
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
ApplyTransform(New FlipRotator(TransformOptions.FlipHorizontal))
End Sub