>>16
Integerって2バイトだけど、足りるの?
read中にエラー起きたらcloseしないの?
VB使う必要あるの?