WIN10系统下被坑的FreeBasic代码 VFB

  勇芳 4月前 871

以下代码只发生在WIN10系统里,其它系统正常,也不属于我们写代码的问题。

在文件的某个地址写入内容

  Open 文件名 For Binary Access Write As #M
  If Put(#M, 地址, by()) = 0 Then Function = True Else Function = False

代码没问题,在 XP 、WIN7  系统很正常,当来到了 WIN10 系统就发生问题,它会先删除文件,再写入,

我们只修改部分,到了W10就全清0,经过研究,去掉 Access Write 才可以

  Open 文件名 For Binary As #M
  If Put(#M, 地址, by()) = 0 Then Function = True Else Function = False


最新回复 (1)
返回