C# と VB.NET の質問掲示板

こんにちは。VB2008での画像ファイルの扱い方で質問があります。
例えば、1000×1000の白黒ビットマップ画像を、以下のように500×500のサイズに縮小した時、
以下の方法だと、太さ1ピクセルの罫線がかすれてしまいます。

Using bmp As New Bitmap(画像ファイル)  '1000×1000のビットマップ
    Using bmp2 as New Bitmap(bmp, 500, 500)
        bmp2.Save(ファイル名, Imaging.ImageFormat.Png)
    End Using
End Using

このような画像の縮小を行っても、1ピクセルの罫線をそのまま保つ・またはアンチエイリアス的な効果
（というのかどうか分かりませんが）で罫線が分かるようにするにはどのような方法があるでしょうか？
たとえ元の画像が白黒であっても、二値状態を保持する必要はなく、画像縮小時にグレースケールの状態になってもかまいません。

よろしくお願いします。