「file.bmp」のすべての黒いピクセルを透明なピクセルに置き換えたい
 Dim b As Bitmap = New Bitmap(64, 64)
    b = image.fromfile("c:/file.bmp")
        For y = 0 To 63
            For x = 0 To 63
             Dim c As New Color
              c = Color.Transparent
               If b.Getpixel(x,y) = color.Black Then
                b.SetPixel(x, y, c)
               End if
            Next
     Next
        PictureBox1.Image = b
例外:
この評価は副作用を引き起こす可能性があるため、ユーザーが有効にするまで実行されません。System.Drawing.Color
breakPointがないと、ピクチャーボックスは空のように見えます。
黒のピクセルを透明なピクセルに置き換えるにはどうすればよいですか?