在文本框中快速增加一串字符
有一种笨方法，可以让你将串字符插入文本框中文本的指定位置，那就是在插入点处将文本分割成两部分，再将要插入的字符同这两部分的文本拼接起来。这种方法费时且不好控制。本文要介绍的就是一种方便而快捷的方法。下面的代码另起一行并将一串字符插入文本的结尾（文本框的MultiLine属性为真)。

Dim temp As String
temp = "Updated: " & Date
With Text1
.SelStart = Len(.Text)
.SelText = vbNewLine & temp
End With
如果你将上面的vbNewLine去掉，再将SelStart属性的值换成你想插入文本的位置，就可以在文本的任意地方插入文本了。