我点击打开按钮时VB没有反应，再点一次VB就会提示错误。具体见下图：





源代码：
Private Sub netbook_Click()
Open "C:\WINDOWS\NOTEPAD.EXE" For Random As 2
End Sub

打开文件后...请一定要关闭...
Private Sub netbook_Click()
Open "C:\WINDOWS\NOTEPAD.EXE" For Random As 2

Close
End Sub

哦，哈。谢谢你啦！

再次感谢2楼的同志！我找你的方法做了以后虽然错误提示没有啦，但是所要求的笔记本那些程序还是打不开啊！

参加本论坛的如下帖子的三楼人士的回帖
http://www.bc-cn.net/bbs/dispbbs.asp?boardID=6&ID=75141&page=1

shell的那个windowsstly的那个属性我还是不太会用！麻烦可以给举个例子吗？还有就是我弄得工程每次运行都是一点点大，怎么才能让他在运行的时候变为全屏呢？

问题已近解决了！谢谢各位！

oo

你没有
"Close #FileNum"