Работа с Com Port и библиотекой Microsoft Comm Control 6.0

[Sounds]

Народ помогите пожалуйста разобраться, не как не получается считать данные из COM Porta.
Библиотека стандартная Microsoft Comm Control 6.0
Вот посмотрите код, тут всё работает:

Private Sub Form_Load()
MSComm1.CommPort = 3
MSComm1.Settings = "2400,N,8,1"
MSComm1.PortOpen = True

End Sub

Private Sub Timer1_Timer()
Text1.Text = MSComm1.InBufferCount 'Возвращает количество символов ждущих в получаещем буфере
Text2.Text = MSComm1.InBufferSize 'Устанавливает и возвращает размер получающего буфера в байтах
End Sub

У меня не как не получается считать MSComm1.Input в text3.text, когда я пытаюсь считать он мне выдаёт ошибку: Error reading comm devise
Считать я пытаюсь следующим образом: Text3.Text = MSComm1.Input

В чём может быть проблема, что я не так делаю?
P.S. Спасибо за помощь и за внимание!!!

 

[skysun]

Вы пользуетесь событием ONCOMM ->comEvReceive ? Считывать данные надо когда произойдет это событие.

 

[Sounds]

Вы пользуетесь событием ONCOMM ->comEvReceive ? Считывать данные надо когда произойдет это событие.

Нет, я не знаю что это. Можно по подробнее?
Спасибо вам за ответ! Я уже не надеялся что кто-то поможет.