mlcm168 发表于 2007-9-11 16:43:00

[求助]文件操作出错

照着书上的例子做，为什么出错了。那位大侠能告诉我为什么啊？

mlcm168 发表于 2007-9-17 10:53:00

怎么没有人帮助啊，大家都没遇到过这问题。

烟雨.江南 发表于 2007-9-18 14:21:00

你确定你电脑的C盘Test目录下已经存在Temp.txt这个文件了吗？如果没有请自己创建这个文件然后再运行程序。

mlcm168 发表于 2007-9-19 21:25:00

当然确定这个文件夹下有这个文件.

fjfhgdwfn 发表于 2007-9-20 08:34:00

C:\123　　兄弟“\”反了吧。还有应是　ＡＳ　＃１　
细心点

mlcm168 发表于 2007-9-21 15:49:00


我改了还是一样的错误。
Public Sub test()
Open "c:\test\temp.txt" For Append As 1#
Dim a As Integer, b As Integer, c As Integer, d As String
a = 1: b = 2: c = 3: d = "hello"
Write #1, a, b, c, d, "world"
End Sub

zhang007 发表于 2007-9-21 17:20:00

我试了一下，是没有c:\test这个文件夹

mlcm168 发表于 2007-9-26 16:49:00


http://www.mjtd.com/bbs/Skins/default/topicface/face13.gif
http://www.mjtd.com/bbs/Skins/default/topicface/face13.gif
http://www.mjtd.com/bbs/Skins/default/topicface/face13.gif
http://www.mjtd.com/bbs/Skins/default/topicface/face13.gif
http://www.mjtd.com/bbs/Skins/default/topicface/face13.gif
http://www.mjtd.com/bbs/Skins/default/topicface/face13.gif
http://www.mjtd.com/bbs/Skins/default/topicface/face13.gif
就是错误啊，真的不知道出了什么问题。我有test的这个文件夹啊。

mlcm168 发表于 2007-9-26 16:50:00


http://www.mjtd.com/bbs/Skins/default/topicface/face13.gif
http://www.mjtd.com/bbs/Skins/default/topicface/face13.gif
http://www.mjtd.com/bbs/Skins/default/topicface/face13.gif
http://www.mjtd.com/bbs/Skins/default/topicface/face13.gif
http://www.mjtd.com/bbs/Skins/default/topicface/face13.gif
http://www.mjtd.com/bbs/Skins/default/topicface/face13.gif
http://www.mjtd.com/bbs/Skins/default/topicface/face13.gif
http://www.mjtd.com/bbs/Skins/default/topicface/face13.gif
http://www.mjtd.com/bbs/Skins/default/topicface/face13.gif
就是不行啊，我明明有test这个文件夹啊。

fjfhgdwfn 发表于 2007-9-26 17:34:00

我改了还是一样的错误。
Public Sub test()
Open "c:\test\temp.txt" For Append As 1#这样可以吗？感觉是#1吧
Dim a As Integer, b As Integer, c As Integer, d As String
a = 1: b = 2: c = 3: d = "hello"
Write #1, a, b, c, d, "world"
End Sub
页: [1]
查看完整版本: [求助]文件操作出错