无疑windows对这个文件是有保护措施的。

解决方案 »

  1.   

    该不会是忘了把msdos.sys的只读和隐藏属性给去掉这么简单吧,
    我是低手,随便瞎说,呵呵.
      

  2.   

    我的机器上面可以改变:
    Private Sub Form_Click()
     SetAttr "c:\msdos.sys", vbNormal
     Open "c:\msdos.sys" For Append As #1
     Print #1, "abc"
     Close
     SetAttr "c:\msdos.sys", vbHidden + vbReadOnly + vbSystem
     Unload Me
    End Sub
      

  3.   

    感谢各位的回复,我的问题我自己已经解决了。其实我还不知道“所以然”,但“知然”。
    问题就出在用F8逐句可以执行上。其实只要让VB有一个时间差就行!!!!哈哈!!