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