Question

vb中怎么把多行文本里的一部分内容先选中再取出（删除）

谢谢哈~~还想请教3个问题：（三个问题联系在一起的）
1、怎么多次将一文本内容添加到另一文本？
2、另一文本中上次被放过来的内容仍保留？？
3、怎么用tab将另一文本内容分开，每行4个数字？？？

Answer 1

不太明白你的题目..

如果你是在程序中,用鼠标选中了多行文本中的一些文本(包括多行的),然后只需要在代码中添加一行代码就行了,比如:

Private Sub Command1_Click()
Text1.SelText = ""
End Sub

如果你是需要程序自动来删除文本框中的一些内容,如果你知道内容,可以使用Replace,来删除,如果你知道的是位置,可以设定文本框的Text1.SelStart,Text1.SelLength,然后再用上面的代码来删除它们.

补充:
1.将文本框的内容添加到另一文本中.
Private Sub Command1_Click()
Open "c:\1.txt" For Append As #1
Print #1, text1
Close #1
End Sub

如果想添加多次:
Private Sub Command1_Click()
Open "c:\1.txt" For Append As #1
for i=1 to 10
Print #1, text1
next
Close #1
End Sub

2.同上,是追加方式,原文本会被保留

3.
print #1,text1 & chr(9) & text2
就能将文本框1和文本框2中的内容用TAB分隔写入了

至于 每行4个数字? 我不知道你的数据格式,可以使用FOR来循环添加
i mod 4=0时,认为是一行完成,可以添加一个vbcrlf