要养成文件随用随关的习惯：
Private Sub Option1_gotfocus()
Open "F:\VB程序\新建文件夹\jilu.txt" For Output As #1
Print #1, "是" '文本保存
Close #1 '加入这行
End Sub
否则的话文件就会一直处在打开状态，这时如果再用Open命令去打开它就会出错了。
记住，不管是读取还是保存，完毕了都要立刻关闭它
操作文件N结束后，
则COLSE #N
就可以了。
endsub 前加一句：close #1
一个open对应一个close，就肯定不会出错了
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024