VB.NET图片的黑白处理法（二值化）

部分处理代码： 　　VB.NET code 　　…… 　　Dim ts2 As IThresholder = New GlobalMeanThreshold(inbmp) 　　Dim tsBMP As New Bitmap(PictureBox1.Width, PictureBox1.Height) 　　ts2.RenderToBitmap(tsBMP) 　　PictureBox6.Image = tsBMP 　　PictureBox6.Height = PictureBox1.Height 　　PictureBox6.Width = PictureBox1.Width 　　PictureBox6.Left = 0 　　PictureBox6.Top = 0 　　……