vb读取文本文件中的第三行的第2个字符 10
vb读取文本文件中的第三行的第2个字符怎么读取,比如:第一行第二行第三行第四行第五行我要读取的是第三行的"三"字符怎么读取呢还有读取的同时修改指定的行,怎么修改呀...
vb读取文本文件中的第三行的第2个字符 怎么读取,比如:
第一行
第二行
第三行
第四行
第五行
我要读取的是第三行的"三"字符怎么读取呢
还有读取的同时修改指定的行,怎么修改呀 展开
第一行
第二行
第三行
第四行
第五行
我要读取的是第三行的"三"字符怎么读取呢
还有读取的同时修改指定的行,怎么修改呀 展开
4个回答
展开全部
可以读出所有内容后用split函数进行分割,返回的数组第2项就是第3行的内容,再用取左mid就可以得到第2个字符了。。。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
一行一行读取,然后取第三行的第二个字符就可以了!
open …… for input as #1
input #1,q1
input #1,q2
input #1,q3
input #1,q4
input #1,q5
close #1
s=mid(q3,2,1)
open …… for input as #1
input #1,q1
input #1,q2
input #1,q3
input #1,q4
input #1,q5
close #1
s=mid(q3,2,1)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Open "a.txt" For Input As #1 '读方式打开文件
Line Input #1, Data '第一二行跳过
Line Input #1, Data
Line Input #1, Data '第三行是
s=right(left(Data,3),1)
Line Input #1, Data '第一二行跳过
Line Input #1, Data
Line Input #1, Data '第三行是
s=right(left(Data,3),1)
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2009-06-07
展开全部
Private Sub Command1_Click()
Dim i As Integer
Dim s As String
Dim szFileName As String
szFileName = "c:\1.txt"
Open szFileName For Input As #1
For i = 1 To 3
If Not EOF(1) Then Line Input #1, s
Next i
Close #1
Print Mid$(s, 2, 1)'第二个字符
Print Mid$(s, 3, 1)'第三个字符
End Sub
Dim i As Integer
Dim s As String
Dim szFileName As String
szFileName = "c:\1.txt"
Open szFileName For Input As #1
For i = 1 To 3
If Not EOF(1) Then Line Input #1, s
Next i
Close #1
Print Mid$(s, 2, 1)'第二个字符
Print Mid$(s, 3, 1)'第三个字符
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询