わがままですみません。サンプルのソースコードはVC++を希望です。
VBは扱えませんので・・・。