找到了Dim bTmp as Byte
Open "C:\save\file.sav" For Binary As #1
  Get #1, &H01 + 1, bTmp '读取单字节,如果要双字节就改为 Integer, 4字节改为 Long
  Put #1, &H766A + 1, &H09 '保存09(16进制)在766A的地址,记得:所有的地址在VB都要 +1Close #1 这是一个修改器用的,和我需要的差不多.