VB.NET Accord 画像の回転・反転・拡大縮小

Accordを使用して、画像を回転・反転・拡大縮する方法を記載します。

Accord.Imaging.Filters をインポートします。

 

画像を回転する

Dim FilePath As String = "C:\work\Resources\lena_color.jpg"
Dim img As System.Drawing.Image = System.Drawing.Image.FromFile(FilePath)

'画像を４５度回転させる
Dim rotateFilter As RotateBilinear = New RotateBilinear(45.0, True)
Dim rotateImage As Bitmap = rotateFilter.Apply(img)
PictureBox1.Image = rotateImage

 

画像を反転する

Dim FilePath As String = "C:\work\Resources\lena_color.jpg"
Dim img As System.Drawing.Image = System.Drawing.Image.FromFile(FilePath)

'画像をY軸で反転させる
Dim mirrorFilter As Mirror = New Mirror(False, True)
Dim mirrorImage As Bitmap = mirrorFilter.Apply(img)
PictureBox1.Image = mirrorImage

 

画像の拡大縮小（サイズ変更）する

Dim FilePath As String = "C:\work\Resources\lena_color.jpg"
Dim img As System.Drawing.Image = System.Drawing.Image.FromFile(FilePath)

'画像のサイズを変更する
Dim rsizeFilter As ResizeBilinear = New ResizeBilinear(300, 400)
Dim rsizeImage As Bitmap = rsizeFilter.Apply(img)
PictureBox1.Image = rsizeImage

 

　

※AccordのFiltersは、AForgeのFiltersと同じなので、詳しくはAForgeを見て下さい。