Question

vb如何读取带有回车键（就是换行）的文本？？？

举例文本内容如下：
üABVüBCD
DDDüAAA
BBB
VVVü
ü（chr=220）是用来分开不同内容的。也就是说，一个文本，我要读取三个信息到text1，text2，text3.而这些信息中有些是断行的，我的代码只能读取连续的信息...求高手。
要代码哦..
这是我的代码
Dim i
Dim textline
Open App.Path & "\" & Label4.Caption For Input As #2

Do While Not EOF(2)
Line Input #2, textline
Loop

For i = 0 To 2
textline = Replace(textline, Chr(i + 219), "ü")
Next

Dim a() As String
a = Split(textline, "ü")
Text1.Text = a(1)
Text2.Text = a(2)
Text3.Text = a(3)
Close #2

Answer 1

不要用Line Input 。而改用直接每次读取一个字符的方式来做。比如get

追问

给代码看看吧，我的书放在学校了...

Answer 2

text1=ab:bcd

Answer 3

Do While Not EOF(2)
Line Input #2, s
textline=textline & s & vbcrlf
Loop

追问

不行啊，你发完整代码给我看看？

Answer 4

text1=ab:bcd