VB.NET AForge画像の二値化

AForgeを使用して、画像を二値化する方法を記載します。

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

Threshold クラスを使用して二値化する

画像を二値化するには、グレース化した画像を使用しますので、二値化する前にグレース化します。

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

'グレース化処理
Dim GrayFilter As Grayscale = New Grayscale(0.2125, 0.7154, 0.0721)
Dim GryImage As Bitmap = GrayFilter.Apply(img)

'二値化処理
Dim thresFilter As Threshold = New Threshold(100)
Dim thresImage As Bitmap = thresFilter.Apply(GryImage)

PictureBox1.Image = thresImage

二値化は、どれくらいの明るさ以上で白にするかという指標を閾値として0~255で指定します。