sub main()
If Dir("c:/wimdows/system/1.txt")="" Then
msgbox("没有找到文件")
exit sub
else
open "c:/wimdows/system/1.txt" for output as #1
print #1
end if
end sub
在这个目录下已经存在文件1.txt,可是程序每次都返回没有找到文件,这是什么原因啊?
If Dir("c:/wimdows/system/1.txt")="" Then
msgbox("没有找到文件")
exit sub
else
open "c:/wimdows/system/1.txt" for output as #1
print #1
end if
end sub
在这个目录下已经存在文件1.txt,可是程序每次都返回没有找到文件,这是什么原因啊?
打字认真点,不然查死你自己
……
保证有用,下次记得加上就OK了。