Question

请问VB怎么替换TextBox指定行内容的问题.

请问VB里怎么编辑
TEXT1.TEXT 的textbox 里指定行的内容!
第1行是"1"
第2行是"12"
第3行是"123"
第4行是"1234"
第5行是"12345"
第6行是"123456"
....
请问我要把第1行替换为我想要的字符该怎么做?我是想只更改第一第的字符.不能用替换.用替换的话下面的也会被替换.

Answer 1

替换才能更改你要的字符，只要不影响下面的就行
既然是以“行”来改变，所以就用Split()来分割吧,textbox里的换行符是vbcrlf
所以：
dim a() as string '声明数组，用来接收每一行的内容
a=split(text1.text,vbcrlf) '用换行符vbcrlf作为标识，分割每一行内容到数组中
a(0)="替换的内容" '这里是第一行，替换指定内容
text1.text="" '清空textbox
for i=0 to ubound(a) '重新组合数组中的内容，写回textbox中，完成
text1.text=text1.text & a(i) & vbcrlf
next

Answer 2

dim a() as string
a=split(text1,vbcrlf)
a(0)="你想要的字符"
text1=""
for i=0 to ubound(a)
text1=text1 & a(i) & vbcrlf
next