
نوشته شده توسط
hossein_moassefi
به یک کامپوننت پورت سریال در VB احتیاج دارم برای برقراری ارتباط سریال با come1
با سلام
خود VB این قضیه را داره یعنی در بخش ابزارهای سمت چپ محیط VB کلیک راست کرده و گزینه Components را میزنیم و در پنجره باز شده آیتم Microsoft Comm Control 6.0 را تیک دار کرده و OK میکنیم و سپس آن را از ابزارهای ظاهر شده در بخش ابزارها بر روی فرم کشیده و بوسیله کد های زیر استفاده میکنم:
Private Sub Form_Load()
MSComm1.CommPort = 2
MSComm1.PortOpen = True
End Sub
Private Sub MSComm1_OnComm()
Dim RecData As String
If MSComm1.CommEvent = comEvReceive Then
RecData = MSComm1.Input
text1.Text = text1.Text & RecData
End If
End Sub
نمونه سایت خارجی که پروژه ای در این رابطه انجام داده که از مثال ساده ای که براتون زدم کاملتر است:
http://www.rentron.com/receiving_data.htm