明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 2403|回复: 10

[求助]文件操作出错

[复制链接]
发表于 2007-9-11 16:43:00 | 显示全部楼层 |阅读模式
照着书上的例子做,为什么出错了。那位大侠能告诉我为什么啊?

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
 楼主| 发表于 2007-9-17 10:53:00 | 显示全部楼层

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

发表于 2007-9-18 14:21:00 | 显示全部楼层
你确定你电脑的C盘Test目录下已经存在Temp.txt这个文件了吗?如果没有请自己创建这个文件然后再运行程序。
 楼主| 发表于 2007-9-19 21:25:00 | 显示全部楼层

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

发表于 2007-9-20 08:34:00 | 显示全部楼层

C:\123  兄弟“\”反了吧。还有应是 AS #1 

细心点

 楼主| 发表于 2007-9-21 15:49:00 | 显示全部楼层
本帖最后由 作者 于 2007-9-21 15:58:59 编辑

我改了还是一样的错误。

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

发表于 2007-9-21 17:20:00 | 显示全部楼层

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

 楼主| 发表于 2007-9-26 16:49:00 | 显示全部楼层

就是错误啊,真的不知道出了什么问题。我有test的这个文件夹啊。

 楼主| 发表于 2007-9-26 16:50:00 | 显示全部楼层

就是不行啊,我明明有test这个文件夹啊。

发表于 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

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-26 12:22 , Processed in 0.197900 second(s), 24 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表