VBの命令を応用するだけで簡単にモノクロ画像を作成することが出来ます。

操 作 手 順

１．ピクチャーボックスに変換する画像を読みこむ
↓
２．変換する位置の色をPoint文などで読みこみその色をＲ（赤）、Ｇ（緑）、Ｂ（青）に分解。
↓
３．ＲとＧとＢを足し、３で割る（平均を求める）、その結果をｋとする
↓
４．ｒｇｂ（ｋ、ｋ、ｋ）で色のＬｏｎｇ値を求める（それぞれの赤、緑、青の値が同じならばグレイスケールとなる）
↓
５．Ｐｓｅｔ文などでピクチャーボックスなどに描画
↓
６．画像の大きさだけ２から５を繰り返す
↓
７．できあがり

注：ピクチャーボックスのAutoReviewプロパティがTrueになっている必要があります
また描画時にウィンドウを最小化しておくと描画スピードが速くなります

サ ン プ ル プ ロ グ ラ ム

ＶｉｓｕａｌＢａｓｉｃ４以上で動作するサンプルプログラムです。簡単なプログラムなので誰でも理解できると思います。かなり綺麗に変換できます。