vb.net 读写TXT文件！

大佬教程收集整理的这篇文章主要介绍了vb.net 读写TXT文件！，大佬教程大佬觉得挺不错的，现在分享给大家，也给大家做个参考。

1. PrivateSubCommand1_Click()
2. '写文件示例
3. DimstrFilenameAsString'文件名
4. DimlngHandleAsLong'句柄
5. DimstrWriteAsString'要写入的文本内容
7. strFilename=@H_772_34@App.Path&"/a.txt"
8. ''''''''App.path&"/a.txt"相对路径
9. ''"c:/w.txt"绝对路径
10. lngHandle=@H_772_34@FreeFile()'取得句柄
11. '准备要写入的内容
12. strWrite=@H_772_34@Text1.Text'或者strWrite=@H_772_34@"这些文字将被写入文件。"
13. 'For后面的参数表示以何种方式打开文件，Input是读取，Output是覆盖写入，Append是追加写入
14. ''''''append是每次在文件末尾写入,不删除其它已经存在的文件.如果换成output则删除其它文件后再写入
15. ''''''print#1,text1.text''''''如果print换成write则写进txt中后自动加双引号
17. OpenstrFilenameForOutputAslngHandle'打开文件
18. Print#lngHandle,strWrite'写入文本
19. CloselngHandle'关闭文件
20. EndSub
21. PrivateSubCommand2_Click()
22. '读文件示例
23. DimstrFilenameAsString'文件名
24. DimlngHandleAsLong'文件句柄
25. DimstrAllAsString'所读取的文本文件的所有内容
26. DimstrLineAsString'在循环中存放每行的内容
27. strFilename=@H_772_34@App.Path&"/a.txt"
28. '获得文件的句柄
29. lngHandle=@H_772_34@FreeFile()
30. 'For后面的参数表示以何种方式打开文件，Input是读取，Output是覆盖写入，Append是追加写入
31. OpenstrFilenameForInputAslngHandle
32. '循环直到文件尾
33. DoWhileNotEOF(lngHandlE)
34. '每次读取一行存放在strLine变量中
35. LineInput#lngHandle,strLine
36. '每次读取都把所读到的内容连接到strAll变量，由于LineInput去掉了换行符，所以这里补上
37. strAll@H_772_34@strAll=strAll&strLine&vbCrLf
38. Loop
39. '显示得到的全部分内容
40. @H_877_2@msgBoxstrAll
41. EndSub
43. PrivateSubCommand1_Click()
44. OpenApp.path&"/a.txt"ForOutputAs#1
45. Print#1,Text1.Text'这里可以是数据本身也可以是目标控件的属性
46. Close#1'关闭打开的文件
47. EndSub
48. 'For后面的参数表示以何种方式打开文件，Input是读取，Output是覆盖写入，Append是追加写入

大佬总结

以上是大佬教程为你收集整理的vb.net 读写TXT文件！全部内容，希望文章能够帮你解决vb.net 读写TXT文件！所遇到的程序开发问题。

如果觉得大佬教程网站内容还不错，欢迎将大佬教程推荐给程序员好友。

本图文内容来源于网友网络收集整理提供，作为学习参考使用，版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ：384754419，请注明来意。