关于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