学步园

单片机与PC机通信的,就是PC机显示的问题.现在程序如下:
Private Sub Form_Load()
MSComm1.Settings = "9600,n,8,1" '设置波特率和发送字符格式
MSComm1.CommPort = 1    '设置通讯串口
MSComm1.InputLen = 0        '设置或返回一次从接收缓冲区中读取字节数，0表示一次读取所有数据
MSComm1.InBufferSize = 1024
MSComm1.InBufferCount = 0
MSComm1.OutBufferSize = 1024
MSComm1.OutBufferCount = 0
MSComm1.RThreshold = 1
MSComm1.SThreshold = 1
If MSComm1.PortOpen = False Then
MSComm1.PortOpen = True
End If
End Sub
Private Sub Cmdsend_Click()
Timer1.Enabled = True
'Varbuffet = "S"
' MSComm1.Output = Varbuffet

End Sub
Private Sub Timer1_Timer()
Varbuffet = "S"
MSComm1.Output = Varbuffet
Timer1.Enabled = False
End Sub
'Private Sub Timer1_Timer()
'Outputsignal = Str(Textsend.Text)                        '向单片机发送数据
'Temp(1) = CByte(Outputsignal)
'Varbuffer = Temp
'MSComml.Output = Varbuffer
'MSComml.Output = Str(Textsend.Text)
'Timer1.Enabled = False
'End Sub
Private Sub MSComm1_OnComm()
Select Case MSComm1.CommEvent        '设置oncomm事件，读取片机内存的值
Case comEvReceive
Inputsignal = MSComm1.Input
TextReceive.Text = Asc(Inputsignal)            '单片机内存的值用textbox显示出
Case Else
End Select
End Sub

Private Sub Cmdquit_Click()
'MSComml.PortOpen = Fasle
Unload Me
End Sub

单片机发送 0 1 2 3 让PC机显示,怎样才能显示0123(一起显示),而不是 0 1 2 3覆盖着显示.现在是显示0,在显示1, 显示2,显示3 而不是0123一起显示.谢谢!