大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
给你一个VB2010读写文件的例子吧
我们提供的服务有:成都网站设计、成都做网站、微信公众号开发、网站优化、网站认证、栾川ssl等。为1000+企事业单位解决了网站和推广的问题。提供周到的售前咨询和贴心的售后服务,是有科学管理、有技术的栾川网站制作公司
Dim name As String = ""
Dim age As Integer
name = InputBox("请输入姓名")
age = InputBox("请输入年龄")
FileOpen(1, "d:\信息.txt", OpenMode.Append)
WriteLine(1, name, age)
FileClose(1)
FileOpen(1, "d:\信息.txt", OpenMode.Input)
Dim h As String
Dim j As String
Dim f As String
f = ""
h = ""
j = ""
While EOF(1) = False
f = LineInput(1) vbCrLf f
End While
FileClose(1)
MsgBox("姓名" " " "年龄" vbCrLf f)
无法读取指定的某一行,只能通过对整个文本框里的字符串,采用字符串函数等方法,分离获得某一行的内容。
读500万行的txt文件190M左右,提取每行中特定字符,写入7个文件,单个文件130万行,13M左右。一共用时20秒左右。
用System.IO.StreamReader System.IO.StreamWriter。
可以把某个列为空就当做是空行,你连接字符串是hdr=no,也就是第一行不作为列标题,那么就是用的默认的列标题,F1,F2.。。这些。
比如,第一列的某行为空的话就当做是空行,你可以加这个条件 where len([F1]) 0