请教vb读取编辑txt文件并
1个回答
展开全部
'写文件
Open "C:\1.txt" For Output As #1 '以输出方式打开文件
Print #1, "桂林山水甲天下。"
Close #1 ' 关闭文件。
End Sub
'读文件
Dim LStr as string
Open "C:\1.txt" For Input As #1 '以读的方式打开文件
Do While Not EOF(1) ' 循环至文件尾
Line Input #1, LStr '读入一行
Loop
Close #1 ' 关闭文件。
Print LStr
Open "C:\1.txt" For Output As #1 '以输出方式打开文件
Print #1, "桂林山水甲天下。"
Close #1 ' 关闭文件。
End Sub
'读文件
Dim LStr as string
Open "C:\1.txt" For Input As #1 '以读的方式打开文件
Do While Not EOF(1) ' 循环至文件尾
Line Input #1, LStr '读入一行
Loop
Close #1 ' 关闭文件。
Print LStr
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
