关于BinaryWriter的有关问题，困扰小弟我多时了，请各位帮小弟我一下

关于BinaryWriter的问题，困扰我多时了，请各位帮我一下！在线等
用BinaryWriter出力文件

obj_fs   =   New   FileStream(strSavePath   &   strFileName   &   "_ "   &   _Longj   &   strExtension,   FileMode.CreateNew)
  Dim   w   As   New   BinaryWriter(obj_fs)

dim   str1   as   string   =   "1 "
w.Write(str1)

出力的文件，我用工具打开后是
01   31的形势，我不需要出力31   ，只需要01该如何做

我把str1转换成int是出力成   01   00   00   00

谢谢大家


[解决办法]
dim str1 as string = "1 "
w.Write( int.parse(str1))

[解决办法]
byte.parse