نوشته اصلی توسط
safavism
با سلام خدمت دوست گرامی فایل txt رو گذاشتم
ببينيد دوست عزيز تو ارتباط سريال يكسري استاندارد وجود داره و تو لين استاندارد يكسري از كاراكترها معناي خاصي دارند و تو عمليات برقراري ارتباط نقش بسزائي دارند.
مثلا عدد 13 به اختصار Carriage Return يا مخففش CR
عدد 10 به به معناي Line Feed كه مخففش ميشه LF
در اصل ارسال اين اعداد يك نوع Initialize كردن براي برقراري ارتباط يا ارسال ديتا ميباشد.
کد:
Dim Sms As String * 250 : Sms = ""
اين كد تعريف كردن يك متغير از نوع رشته هست و بعد از تعريفش آومدن به اون مقدار دادن.مقدار اون هم كاراكتر نول هست.يعني هيچي تو اين رشته قرار نداره!
کد:
If Sms <> "" Then Exit Do
اين كد هم يعني اينكه اگر متغير رشته SMS مقداري داشت از حلقه خارج شود (بعبارت عامينه اگر SMS مخالف تهي(نول) بود از حلقه خارج شو)
كل برنامه مياد از كاراكترهاي CRو LF عبور ميكنه و وقتي با كاراكترهاي اصلي (مثل كاراكترهاي پيامك) روبرو ميشه مياد در رشته SMS قرار ميده و در نهايت در LCD نمايش ميده!!