در توسینسو تدریس کنید

و

با دانش خود درآمد کسب کنید

پروژه عملی کار با پورت RS232 در ویژال بیسیک

در این پروژه قصد داریم تا با مثالی ساده و به آسانترین روش نحوه کار بار پورت RS232 رو یاد بگیریم در این برنامه با ارسال دستور به پورت یک LED را روشن و خاموش خواهیم کرد برای این پروژه نیاز به

یک عدد LED

پورت ماده RS232 امروز این پورت روی سیستم های جدید سخت پیدا میشه اگر شما نداشتین روی سیستم میتونید از نوع کارت PCI تهیه نمایید بعد از تهیه این اقلام LED را به پایه های 4 و 5 پورت وصل کنید دقت کنید پایه کوتاه LED باید به Ground پورت 5 و پایه بلند به DTR پورت 4 وصل شود طبق شکل زیر بهتر است لحیم کاری شود

پروژه عملی  کار با پورت RS232 در ویژال بیسیک

بعد از اتمام کار پورت را به به کامپیوتر وصل کنید و برنامه ویژالبیسیک را باز کنید و طبق شکل زیر عمل کنید

پروژه عملی  کار با پورت RS232 در ویژال بیسیک

پروژه عملی  کار با پورت RS232 در ویژال بیسیک

پروژه عملی  کار با پورت RS232 در ویژال بیسیک

بعد از انجام عملیات های نشان داده شده در بالا ابتدا در قسمت Form_Load کد زیر را وارد کنید

Private Sub Form_Load()
MSComm1.DTREnable = False
MSComm1.Settings = “1200,N,8,1”
MSComm1.CommPort = 1
MSComm1.InputLen = 1
MSComm1.PortOpen = True
MSComm1.RThreshold = 1
End Sub

سپس کد زیر را در درون کد دکمه on/off اضافه شده به فرم کپی نمایید

Private Sub Command1_Click()
If MSComm1.DTREnable = True Then
MSComm1.DTREnable = False
Else
MSComm1.DTREnable = True
End If
End Sub

همانطور که در کد مشاهده میکنید در هنگام لود شدن فرم تنظیمات عمومی پورت انجام و فعال میشود و سپس هنگام فشردن دکمه پایه DTR پورت فعال و غیرفعال میشود که این امر با روشن و خاموش شدن LED مشخص میشود . برای روشن و خاموش شدن اتوماتیک میتوانید با اضافه کردن تایمر به برنامه سرعت روشن خاموش شدن را بصورت اتوماتیک و بدون نیاز به فشردن دکمه تعیین کنید .

نویسنده : علی قلعه بان - دانشجوی دکتری فناوری اطلاعات

#برنامه_نویسی_ویژوال_بیسیک #کار_با_سخت_افزار_در_ویژوال_بیسیک #کار_با_پورت #پورت_سریال
2 نظر
AZARAKHSH

سلام

ممنون.جالب بود

Alighalehban

سلام خواهش میکنم انشاءالله مفید واقع بشه

نظر شما
برای ارسال نظر باید وارد شوید.
از سرتاسر توسینسو
تنظیمات حریم خصوصی
تائید صرفنظر
×

تو می تونی بهترین نتیجه رو تضمینی با بهترین های ایران بدست بیاری ، پس مقایسه کن و بعد خرید کن : فقط توی جشنواره تابستانه می تونی امروز ارزونتر از فردا خرید کنی ....