vb咋读写文本文件?

vb咋读写文本文件?,第1张

首先用 open 方法打开一个文本文件例如:open "c:/123.txt" for input as #1"for input" 是将文件作为输入源。也可以替换为"for output"(输出,注意此时如果文件已经存在则覆盖文件)和"for append"(此时指针指向文件末尾,也就是说向文件末尾追加内容。"#1" 是文件的句柄。用input 打开文件后 可以用line input方法读取文本例如:line input #1,strText '注意:此时是将一行文本读取,并赋值给 变量strText,如果再次使用该方法,则系统自动读取下一行文本,可以用EOF() 函数测试文件尾(例如:EOF(1) ,"1"是文件句柄,诺已是文件尾则返回 "True")"#1"是要 *** 作文件的句柄号。"strText"是定义的一个字符串变量。诺用 "output"或"append"打开文件则可以用print #1,strText方法写入一行文本。

Private Sub button1_Click()

'以输出方式打开new.txt这里有路径问题参见 "c:\new.txt"就是指输出到哪个文件

'for output是指打开方式为输出方式 此方式如果该文件存在则覆盖

'as #1 打开文件需要占用工作区的,所以以1号工作区打开该文件

Open "C:\NEW.TXT" For Output As #1

'在一号文件区打开的文件里写入abc

Print #1, "abc"

'关闭一号工作区

Close #1

'任务完成加详解,有分没有?

End Sub

Private Sub button2_Click()

'以输出方式打开new.txt这里有路径问题参见 "c:\new.txt"就是指输出到哪个文件

'as #1 打开文件需要占用工作区的,所以以1号工作区打开该文件

'for append是指输出方式为追加方式

Open "C:\NEW.TXT" For Append As #1

'在一号文件区打开的文件里写入defg

Print #1, "defg"

'关闭一号工作区

Close #1

'任务完成加详解,有分没有?

End Sub


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/tougao/11844170.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-19
下一篇 2023-05-19

发表评论

登录后才能评论

评论列表(0条)

保存