كمك در خواندن از پورت

[m_zi]

با سلام
من براي نوشتن و خواندن اطلاعات از پورت سريال دستور زير را اجرا مي كنم ولي هيچ جوابي نمي گيرم چرا ؟

MSComm1.Output = Text1.Text

x = MSComm1.Input

ولي متغير x خالي و null بر مي گرداند علت چيست ؟؟؟؟

[ali_habibi1384]

برای خواندن :

x=mscomm1.input

برای نوشتن:

mscomm1.output=chr(x)

برای خواندن کدها رو در یک تایمر قرار دهید .