Question

Vb.net 怎样将split分割的字符串放进数组

Dim a() as stringDim i as long
a = split(textbox1.text, vbcrlf)For i = 0 to ubound(a) Msgbox (a(i), , i)Next如果textbox1的内容为：aaaaaa那么为什么a(0)的内容为textbox1的内容而不是a(0)="a",a(1)="aa",a(2)="aaa"呢？

Answer 1

有些文本中的换行符不一定是vbCrLf，也有可能是vbCr或vbLf，你可以这样试试：
a = split(textbox1.text, vbcr)
或
a = split(textbox1.text, vblf)

Answer 2

a = split(textbox1.text, vbcrlf)
这条语句的意思是，将textbox1的文本以回车为界限进行分割，结果放入数组a中
假设textbox1(注意是多行文本框)的内容是：
a
aa
aaaa
分割后：
a(0)=a
a(1)=aa
a(2)=aaaa

追问

没用啊，在vb6中调试通过，vb2008中就是出不来这效果
文本框mutiline是true

Answer 3

Dim a() As String = System.Text.RegularExpressions.Regex.Split(TextBox1.Text, "\r\n|\n|\r")
For i = 0 To UBound(a)
MsgBox(a(i), , i)
Next

Answer 4

把TextBox1的MultiLine属性设置为True,TextBox1中输入a回车、aa回车、aaa回车，出来结果就是你要的

追问

一楼的换行没有了，textbox中的内容是
a
aa
aaa

追答

什么意思

追问

意思是，完全按照您说的，把textbox1的multiline属性设置为true，textbox1中输入a回车，aa回车，aaa回车，但是msgbox中显示的偏偏是
a
aa
aaa
而且msgbox的标题为0