如何使VB6文本框上显示的数据不会消失

Question

我的VB6有问题。我正在使用计时器将数据显示在文本框中。但问题是数据在几秒钟后消失。如何使这些数据保留在文本框中直到我单击命令按钮来测量另一个数据？ 计时器的编码：

Private Sub Timer1_Timer()
   ipt = MSComm1.Input
   ipt = Right(ipt, 4)
   Text1.Text = ipt
End Sub

请帮帮我..

Answer 1

Private Sub Timer1_Timer()
    ipt = MSComm1.Input
    ipt = Right(ipt, 4)

    if len(ipt) > 0 then
        Text1.Text = ipt
    end if
End Sub