Without seeing your code it might be tough...

We use code like this:

local lcInput

with thisform.comm_Control

if .PortOpen = .t.
* is there something to view?
if .inBufferCount > 0
lcInput = .Input
else
* get out nothing is there
return
endif

else && Port is not open, try to open it up.

* open port ( I use the INIT of the control to do this )

endif

endwith

* now transfer to a textbox
thisform.txtCommunication_Port_Data.Value = lcInput