VB.NET文本文件操作一点通
创始人
2024-06-10 10:11:30
0

今天和大家分享一下关于VB.NET文本文件操作的方法,希望对大家有帮助。此种方式是以行为单位进行读取的基本单位,主要应用的方法和函数有Open,Close,Line Input,FreeFile,EOF等。下面先简述其功能然后结合代码示例进行说明。

#T#Open:顾名思义,它的作用是打开文件,换而言之打开某个文件就是获得某个的控制权,一般情况下当文件处于打开状态时只有打开者才能对它进行操作。打开文件时要指定一个整数作为文件号,以后的操作都是针对这个代号进行的,而不是针对文件名。文件号也叫句柄,在程序中一个文件号只能指向一个文件,不能出现两个文件同时具有相同句柄的情况。
Close:关闭文件,即释放文件的控制权。
Line Input:以行为单位取得文件内容,以行为单位是指从当前位置开始到下一个换行符为止的内容。换行符是Chr(13) & Chr(10)两个字节组成,VB中已定义了常量vbCrLf,可直接使用。要注意的是Line Input读取一行时会把行尾的换行符去掉,因此我们在读取每行内容时要记得补上换行符才能保持得到的内容与文件一致。
FreeFile:得到空闲的文件号,用这个函数取得文件号可以避免文件号的冲突。

VB.NET文本文件操作例如:

  1. Dim strFileName As String '文件名  
  2. Dim lngHandle As Long '文件句柄  
  3. Dim strAll As String '所读取的文本文件的所有内容  
  4. Dim strLine As String '在循环中存放每行的内容  
  5. strFileName = "c:\.txt" 
  6. '获得文件的句柄  
  7. lngHandle = FreeFile()  
  8. 'For后面的参数表示以何种方式打开文件,Input是读取,Output是覆盖写入,Append是追加写入  
  9. Open strFileName For Input As lngHandle  
  10. '循环直到文件尾  
  11. Do While Not EOF(lngHandle)  
  12. '每次读取一行存放在strLine变量中  
  13. Line Input #lngHandle, strLine  
  14. '每次读取都把所读到的内容连接到strAll变量,由于Line Input去掉了换行符,所以这里补上  
  15. strAllstrAll = strAll & strLine & vbCrLf  
  16. Loop  
  17. '显示得到的全部分内容  
  18. MsgBox strAll, vbInformation 


对VB.NET文本文件操作的写入相对简单些,有三个步骤:打开文件,写入文本,关闭文件。

代码示例:

  1. Dim strFileName As String '文件名  
  2. Dim lngHandle As Long '句柄  
  3. Dim strWrite As String '要写入的文本内容  
  4. strFileName = "c:\w.txt" 
  5. lngHandle = FreeFile() '取得句柄  
  6. '准备要写入的内容  
  7. strWrite = "落日楼头,断鸿声里,江南游子。把吴钩看了,栏干拍遍,无人会、登临意。" 
  8. Open strFileName For Output As lngHandle '打开文件  
  9. Print #lngHandle, strWrite '写入文本  
  10. Close lngHandle '关闭文件  
  11. MsgBox "写入完成。", vbInformation  

相关内容

热门资讯

如何允许远程连接到MySQL数... [[277004]]【51CTO.com快译】默认情况下,MySQL服务器仅侦听来自localhos...
如何利用交换机和端口设置来管理... 在网络管理中,总是有些人让管理员头疼。下面我们就将介绍一下一个网管员利用交换机以及端口设置等来进行D...
施耐德电气数据中心整体解决方案... 近日,全球能效管理专家施耐德电气正式启动大型体验活动“能效中国行——2012卡车巡展”,作为该活动的...
20个非常棒的扁平设计免费资源 Apple设备的平面图标PSD免费平板UI 平板UI套件24平图标Freen平板UI套件PSD径向平...
德国电信门户网站可实时显示全球... 德国电信周三推出一个门户网站,直观地实时提供其安装在全球各地的传感器网络检测到的网络攻击状况。该网站...
为啥国人偏爱 Mybatis,... 关于 SQL 和 ORM 的争论,永远都不会终止,我也一直在思考这个问题。昨天又跟群里的小伙伴进行...
《非诚勿扰》红人闫凤娇被曝厕所... 【51CTO.com 综合消息360安全专家提醒说,“闫凤娇”、“非诚勿扰”已经被黑客盯上成为了“木...
2012年第四季度互联网状况报... [[71653]]  北京时间4月25日消息,据国外媒体报道,全球知名的云平台公司Akamai Te...