06-08-13, 11:43 AM
بارك الله فيك
يعطيك العافية
يعطيك العافية
samee119485r كتب :لا يتوجب عليك تغيير اي شئ
فقط قم بتغيير If X >= "4" Then رقم 4 الذي بين علامتي التنصيص الى الرفم الذي تريد إيقاف البرنامج عندة
مثال :
If X >= "9" Then
هنا انا وضعت رقم 9 بين علامتي التنصيص .....................
اخي الكريم سوف اشرح لك هاذه العباره في الكود
If X >= "4" Then
MsgBox "لقد نفذت المدة التجريبية", , "النهايه"
End
End If
If هاذه تعني أذا
X وهاذا متغير يحمل قيمه نصيه من نوع String وهاذا تم شرحه
< وهاذه تعني اكبر من
= وهاذه تعني يساوي
Then وهاذه تعني ثم
MsgBox وهاذه تعني ضهار رساله
end وهاذه تعني نهايه
End if وهاذه تعني إنتهاء الشرط
دعنا الان نجمع الشرح في جمله عربيه
اذا كان اكس (x) اكبر من 4 او يساوي ثم نفذ لي
اظهر رساله للمستخدم تخبره بنتهاء المده التجريبه
وانهي عمل البرنامج
وانهي الشرط
وتحياتي لك
(( يَا أَيَّتُهَا النَّفْسُ الْمُطْمَئِنَّةُ ارْجِعِي إِلَى رَبِّكِ رَاضِيَةً مَرْضِيَّةً فَادْخُلِي فِي عِبَادِي وَادْخُلِي جَنَّتِي ))
