附加文本到TextBox或者RichTextBox控件的通常方法是在当前内容上连接上新的字符串:
Text1.Text=Text1.Text&newString
但还有一个更快的方法,并且会减少连接操作的闪烁感,代码如下:
(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/bianchengyuyan/)Text1.SelStart=Len(Text1.Text)
Text1.SelText=newString
(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/bianchengyuyan/)->