我试图找到的字符串长度为34个字符,位于“file”后面
如何将34个字符显示为单个字符串?
这是我到目前为止所得到的:
Dim key = "name"
Dim sr As StreamReader = New StreamReader("C:\file.dat")
TextBox2.Text = sr.ReadToEnd.IndexOfAny("file", 34).ToString
这只会返回:
16379
感谢任何帮助。
修改
在Steve的帮助下,我现在已经开始使用它了:
Dim sr As StreamReader = New StreamReader("file.dat")
Dim data = sr.ReadToEnd()
Dim pos = data.IndexOf("file")
If pos >= 0 Then
TextBox2.Text = data.Substring(pos, 39).Replace("file""", "")
End If
现在我只需要能够循环它并将它们返回到数组/其他文本框中是否有多个这样的实例,我不知道如何做到这一点?
答案 0 :(得分:1)
只需一步即可拆分您的代码,这样就可以更清楚地了解您需要做什么
dim data = sr.ReadToEnd()
dim pos = data.IndexOfAny("file")
if pos >= 0 then
TextBox2.Text = data.Substring(pos, 34)