下载文本文件的问题

Question

如何下载文本文件保存到字符串变量中，在字符串变量中如何区分原文本文件行标识？

Answer 1

保存到字符串变量里做二次处理啊，比如过滤不要的内容等。程序将下载的数据直接读取，总不能先保存成文本再读取吧，不费二遍事？主要问题是存到变量里后，怎么找到换行符号？我用ch(13)、chr(10)都试过了，不成功。谁能帮我？

Answer 2

如果你没另加回车换行符的话,用Instr函数计算换行符的位置和个数就行了

Answer 3

现在没别的事,写一段代码
Private Sub Command1_Click()
vStr = Text1.Text
lstr = Len(vStr)
pos = InStr(vStr, vbCrLf)
If pos = 0 Then
MsgBox "没有换行符!"
Exit Sub
ElseMsgBox "第1个换行符在" & pos & "处"
i = 1
Do While pos > 0
 pos = InStr(pos + 1, vStr, vbCrLf)
If pos > 0 Then
i = i + 1
MsgBox "第" & i & "个换行符在" & pos & "处"
End If
Loop
End If
End Sub