关于读写txt文件的问题

闲情漫步 2005-09-17 11:10:25
我想把文本框中的内容写到一个文本文件中,可是写进去的字符串都带着引号,怎么把这些引号去掉啊?
Open App.Path & "\abc.txt" For Output As #1
Write #1, Trim(txtAg.Text)
Close #1

还有就是 Open App.Path & "\abc.txt" For Output As #1 和 Open App.Path & "\abc.txt" For Input As #1
这两句有什么区别啊
...全文
206 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
northwolves 2005-09-17
  • 打赏
  • 举报
回复

Open App.Path & "\abc.txt" For Output As #1
print #1, Trim(txtAg.Text)
Close #1


Open App.Path & "\abc.txt" For Output As #1 ---->写
Open App.Path & "\abc.txt" For Input As #1--->读
闲情漫步 2005-09-17
  • 打赏
  • 举报
回复
没人知道嘛
闲情漫步 2005-09-17
  • 打赏
  • 举报
回复
自己顶
chenhui530 2005-09-17
  • 打赏
  • 举报
回复
INPUT是读文件OUTPUT是 写文件
去掉引号可以使用REPLACE("你需要更改的字符串","""","")
ExeMan 2005-09-17
  • 打赏
  • 举报
回复
迟到了,555。
jxgzay 2005-09-17
  • 打赏
  • 举报
回复
print #1不会自动加引号,就是print 输出格式写到磁盘文件而已。


For Output 写磁盘
For Input 由磁盘读到内存

7,762

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧