vb中textbox刷新无闪烁的方法

昨天给大家的串口读写代码中，textbox的刷新频繁后会造成闪烁，所以今天改写一下无闪烁的代码。

更改的代码如下：

Private Sub Mcom_OnComm() '所有的通讯事件都可以激发MSComm1控件的OnComm事件
Select Case Mcom.CommEvent
Case comEvReceive'此处的代码可以进行当串口的接受缓冲区里有RThreshold个字符的处理
    Text4.SelStart = Len(Text4.Text)
    Text4.SelText = Mcom.Input
Case comEvSend'此处的代码可以进行当串口的发送缓冲区里有SThreshold个字符的处理
    '龙卷风出品
End Select
End Sub 

这样就可以安心的看你的串口读出数据了。