VB初心者質問スレPart2

Do Until MSComm1.InBufferCount > 0 'データが入ってくるまで回れ
Loop

↑ここでループしています。
受信データがゼロのまま変化していないということですよね。

Do Until MSComm1.InBufferCount > 0 'データが入ってくるまで回れ
　　　DoEvents
Loop

って、やった方がいいのでしょうか