• بادئ الموضوع بادئ الموضوع LINEZERO
  • تاريخ البدء تاريخ البدء
  • المشاهدات 113,351
الحالة
مغلق و غير مفتوح للمزيد من الردود.
اخي فوزان صبحك الله بالخير
هناك خطا مطبعي في المثال المرفق لعبدالله والمفروض يكون كذا :d:


كود:
$input = InputBox("Welcome", "أدخل إسمك : ", "Myname")
If $input = "" Or $input = "Myname" Then
 MsgBox(0 + 524288, "", "لم تدخل شيء")
Else
 MsgBox(0 + 524288, "", $input & "إسمك هو")
EndIf
3.gif
3.gif
[/CENTER]

:b: تم التعديل..
 

توقيع : waget
حياكم الله أخواني ..

تم تعديل الخطأ في المثال :b: ..

بالنسبة ليش حنا إستخدمنا OR
لأننا وضعنا قيمة للوسيط default
إذا وضعنا له قيمة ...
فراح تكون عندنا حالتين..
الاولى إذا المستخد خرج من النافذة.. CANCEL
الثانية إذا ضغط ok ولم يدخل شيء << راح تكون هنا القيمة الراجعه قيمة default
وحنا نبي المستخدم يدخل شيء ..

فنختبر الحالتين بشرط واحد .. بإستخدام OR
كود:
$input = "" OR $input = "Myname"

زي ماتعلمنا في درس or /and :d:

طيب لووضعنا ..

كود:
$input = "" OR  "Myname"

هنا المستخدم مهما أدخل راح يتحقق هذا الشرط :eek: ليش ؟؟ راح نعرف هذا في الدرس الجاي..

وأيضاً
كود:
   "" OR  ""

ما راح يتحقق هذ الشرط أبدا وزي ماقلت فوق راح نعرف هذا في الدرس الجاي ...

والله وبوعابد مركز :d:
اما الي بالازرق ماكنت ادري عنها ، بس كنت ابي العب عليكم شوي الي لونه بالاحمر :p:

بارك الله فيك حبيبي :ok:

:king:بس فوزان صكني بعين :hh: ..

وأخطيت في المثال << محد قالك حط درس آخر الليل ..

:d:
 
توقيع : waget
:ok:

وضحت ياغالي الفروقات ... وبانتظار الدرس القادم

الخطأ وارد بس انا بدال ما اكحلها عميتها ... :q:

لاهنت ياغالي ...
 
توقيع : موريادي
كود:
$In1 = InputBox ("Test","Enter your name:-","Rakan")
If $In1 = "" Then
 MsgBox (16,"Test","Erorr ...")
Else
 MsgBox (0,"Test","Your name : " & $In1 )
EndIf
ماي تطبيق .. :d:
 
توقيع : Bo.SaQeR
تطبيقي :smile:

كود:
$Name = inputBox ("أجب","------------------------------------------","","",10,10,10,10)
if $name <> 12  Then
    msgbox (64,"","هذا كبرك وما تعرف تحسب (:")
else
msgbox(64,"","مبرووووووووك الإجابة صحيحة")
EndIf
 
توقيع : (مجرد انسان)
تطبيقي :smile:



كود:
$Name = inputBox ("أجب","------------------------------------------","","",10,10,10,10)
كود:
[CENTER][COLOR=red]if $name <> 12  Then[/COLOR]
[CENTER][COLOR=red]   msgbox (64,"","هذا كبرك وما تعرف تحسب (:")[/COLOR]
[COLOR=red]else[/COLOR]
[COLOR=red]msgbox(64,"","مبرووووووووك الإجابة صحيحة")[/COLOR]
[COLOR=red]EndIf[/COLOR][/CENTER]

ياهلا بالحبيب

راجع الدرس مرة ثانيه ... لم تضع قيم راجعة للدالة بل وضعت 12

القيم الراجعه :

إذا نجحت العملية ترجع بالنص المدخل ..

إذا فشلت : يرجع بنص فارغ ""...

:king:
[/CENTER]
 
توقيع : موريادي
ياهلا بالحبيب

راجع الدرس مرة ثانيه ... لم تضع قيم راجعة للدالة بل وضعت 12



:king:
[/CENTER]

هلااا فيك زوود :b:

كذا زين


كود:
$Name = inputBox ("أجب","------------------------------------------","","",10,10,10,10)
if $name <> 12  Then
    msgbox (64,"","هذا كبرك وما تعرف تحسب (:")
else
MsgBox (0,""," أدخلت : " &"" &$name &"" ,2)
msgbox(64,"", "مبرووووووووك الإجابة صحيحة")
EndIf
 
توقيع : (مجرد انسان)
هلااا فيك زوود :b:


كذا زين


كود:
[COLOR=red]$Name = inputBox ("أجب","------------------------------------------","","",10,10,10,10)[/COLOR]
[COLOR=red]if [COLOR=darkorange]$name <> 12[/COLOR]  Then[/COLOR]
[COLOR=red]   msgbox (64,"","هذا كبرك وما تعرف تحسب (:")[/COLOR]
[COLOR=red]else[/COLOR]
[COLOR=red]MsgBox (0,""," أدخلت : " &"" &$name &"" ,2)[/COLOR]
[COLOR=red]msgbox(64,"", "مبرووووووووك الإجابة صحيحة")[/COLOR]

[COLOR=red]EndIf[/COLOR]



ليست المشكلة في المسج بوكس وانما في اللي باللون البرتقالي

عدلت على كودك وشوف وش الفرق

كود:
$Name = inputBox ("أجب","------------------------------------------","","",10,10,10,10)
if $name = ""  Then
    msgbox (64,"","هذا كبرك وما تعرف تحسب (:")
else
MsgBox (0,""," أدخلت : " &"" &$name &"")
msgbox(64,"", "مبرووووووووك الإجابة صحيحة")
EndIf

....​
 
توقيع : موريادي
^
آهااا :q:

فهمت ,, يعطيك الـ ع ـآآفية

.. .. ..
.. .. ..

.. .. ..... .. .. .. .. .. .. .. .. .. .. .

.. .. ..
.. .. ..


قآعدة الـif ما فهمتها كويس :smile:

ما أدري متى أحط الـend ! والـelseif خصوصاً إذا كآن السكريبت يحوي كم شرط !

لا هنتوا إذا ممكن توضيح بسيط :b: لأن هـ القآعدة أسآسية
 
توقيع : (مجرد انسان)
^
آهااا :q:

فهمت ,, يعطيك الـ ع ـآآفية

.. .. ..
.. .. ..

.. .. ..... .. .. .. .. .. .. .. .. .. .. .

.. .. ..
.. .. ..


قآعدة الـif ما فهمتها كويس :smile:

ما أدري متى أحط الـend ! والـelseif خصوصاً إذا كآن السكريبت يحوي كم شرط !

لا هنتوا إذا ممكن توضيح بسيط :b: لأن هـ القآعدة أسآسية

:d: أخوي endif لازم تكون في نهاية كل عبارة ..

elseif إذا عندك أكثر من شرط ..

راجع درس if الثاني ...
 
توقيع : waget
تطبيقي :smile:

كود:
$Name = inputBox ("أجب","------------------------------------------","","",10,10,10,10)
if $name <> 12  Then
    msgbox (64,"","هذا كبرك وما تعرف تحسب (:")
else
msgbox(64,"","مبرووووووووك الإجابة صحيحة")
EndIf
:d: مافهمت فكره تطبيقك ...

إذا تريد من المستخدم يدخل 12 فقط وغيره يعتبر إجابه خاطئة

فتطبيقك صح .. لكن فكرة التطبيق مو اضحه .. لو وضعت رسالة للتوضيح ...

:d:
 
توقيع : waget
في تطبيق مجرد انسان
لوكتبت هندي يطلع الاجابه صحيحة
وتطبيق موريادي كذلك
 
توقيع : format
في تطبيق مجرد انسان
لوكتبت هندي يطلع الاجابه صحيحة
وتطبيق موريادي كذلك

الدالة ترجع القيمة ألي كتبت في مربع الكتابة :d:
 
توقيع : waget
بالنسبه للكود فهو غير سليم وتم ايضاح السبب :b: وليس لها علااقه بعلامة التنصيص :bleh:​


لكم وحشه والله :y:​
أهلا في أستاذ بندر طيب لماذا كود يعمل
ممكن توضيح
ومافرق بين هذا كود ي وبين كود عبدالله بعد تعديل طبعا
 
توقيع : ramay
كود:
$11 = InputBox("ramay"," أدخل منتدى الذي تحبه ","")
If $11 = "" Or $11 = "ramay" Then ;[SIZE=3][COLOR=red]       ramay   ما عمل  كلمة التى فيه [/COLOR][/SIZE] 
 MsgBox(0,""," لم تدخل شيئ")
Else
 MsgBox(0,"",$11&" هو")
EndIf
 
توقيع : ramay
معلومات إضافية حول القيم الراجعه للدوال ..

معلومات إضافية حول القيم الراجعه للدوال ..

في الغالب كل دالة لها قيمة راجعه

جميع الدوال ألي أخذناها لحد الان لها قيم راجعة..

أنظر لهذا السطر..

كود:
[COLOR=Navy][I]MsgBox[/I][/COLOR][COLOR=Red]([/COLOR][COLOR=Indigo]4[/COLOR][COLOR=Magenta],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Magenta],[/COLOR][COLOR=Silver]"Welcome"[/COLOR][COLOR=Red])[/COLOR]
هل دالة المسج هذه ترجع قيمة ؟؟

نعم ... حسب إختيار المستخدم بتكون على النحو التالي..

yes = 6
no = 7

لكن أين؟؟ ...

في نفس مكان الدالة .. بعد تنفيذ الدالة كأنك تمحي الدالة وتضع مكانها القيمة الراجعة لها..

كود:
[COLOR=Navy][I]MsgBox[/I][/COLOR][COLOR=Red]([/COLOR][COLOR=Indigo]4[/COLOR][COLOR=Magenta],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Magenta],[/COLOR][COLOR=Silver]"Welcome"[/COLOR][COLOR=Red])[/COLOR]
لو إختار المستخدم نعم ..
بشكل تقريبي بهذا الشكل...
كود:
[COLOR=Indigo]6[/COLOR]
الان القيمة على السطر لكن ماراح نستفيد منها ونوضفها في الكود..

عندنا 3 طرق للإستفادة من القيمة الراجعه تطرقنا لبعضها سابقاُ ..

الطريقة الاولى حفظها في متغير :

كود:
[COLOR=DarkRed]$msg[/COLOR][COLOR=Red] =[/COLOR]  [COLOR=Navy][I]MsgBox[/I][/COLOR][COLOR=Red]([/COLOR][COLOR=Indigo]4[/COLOR][COLOR=Magenta],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Magenta],[/COLOR][COLOR=Silver]"Welcome"[/COLOR][COLOR=Red])[/COLOR]
الان بعد تنفيذ الدالة ترجع قيمة .. نفرض أن المستخدم إختار no

نقدر نتخيل العملية بهذي الصورة ..

كود:
[COLOR=DarkRed]$msg[/COLOR] [COLOR=Red]=[/COLOR] [COLOR=Indigo]7[/COLOR]
الان لدينا القيمة نقدر نستفيد منها بإختبارها بشرط ...

أخذنا في الشروط أننا نقدر نستخدم عمليات المقارنة كشرط ...

فراح يكون صورة الكود هكذا..

كود:
[COLOR=DarkRed]$msg[/COLOR][COLOR=Red] =[/COLOR]  [COLOR=Navy][I]MsgBox[/I][/COLOR][COLOR=Red]([/COLOR][COLOR=Indigo]4[/COLOR][COLOR=Magenta],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Magenta],[/COLOR][COLOR=Silver]"Welcome"[/COLOR][COLOR=Red])[/COLOR]
[COLOR=Blue]if[/COLOR] [COLOR=DarkRed]$msg[/COLOR] [COLOR=Red]=[/COLOR] [COLOR=Indigo]7[/COLOR] [COLOR=Blue]Then[/COLOR]
    [COLOR=Navy][I]MsgBox[/I][/COLOR][COLOR=Red]([/COLOR][COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"No/[/COLOR][COLOR=Silver]إخترت لا"[/COLOR][COLOR=Red])[/COLOR]
Else
    [COLOR=Navy][I]MsgBox[/I][/COLOR][COLOR=Red]([/COLOR][COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"Yes/إخترت نعم"[/COLOR][COLOR=Red])[/COLOR]
    [COLOR=Blue]endif[/COLOR]
الطريقة الثانية إرسالها كوسيط لدالة أخرى ..

كود:
[I][COLOR=Navy]MsgBox[/COLOR][/I][COLOR=Red]([/COLOR][COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Navy]inputbox[/COLOR][COLOR=Red]([/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red]))[/COLOR]
لاحظ هنا أننا وضعنا دالة inputbox كوسيط للدالة MsgBox..

في الحقيقة نحن الان لم نرسل الدالة بل أرسلنا فقط القيمة الراجعه لها..

الان لو شغلنا السيكريبت راح تضهر أول inputbox

وبعد الكتابة فيها تضهر MsgBox

هذي الطريقة لا أنصح بها أول شيء إحتمالية الخطأ في الكتابة تصبح كبيرة..

وثانياً القيمة الراجعه الان راح نستفيد منها فقط في دالة المسج بوكس ..

لو أردنا الاستفادة منها مره أخرى لن نستطيع ..لكن لو إستخدمنا الطريقة الاولى بالحفظ في متغير ..

متى ما إحتجت لهذي القيمة تقدر تستفيد منها ..


الطريقة الثالثة وضعها في عبارهif :

شاهدنا بعض أمثلة الشباب يضعو الدالة مباشرة في عبارة if دون حفظها في متغير .. والتحقق من القيمة..

أولا كلنا نعرف أن عبارة الشرط تتعامل مع البيانات من النوع ..Booleans

نأخذ هذا المثال ..

كود:
[COLOR=DarkRed]$copy[/COLOR] [COLOR=Red]=[/COLOR][COLOR=Navy][I]F[/I][/COLOR][I][COLOR=Navy]ilecopy[/COLOR][/I][COLOR=Red]([/COLOR][COLOR=Magenta]@ScriptDir[/COLOR] [COLOR=Red]&[/COLOR] [COLOR=Silver]"\*.txt"[/COLOR][COLOR=Red] ,[/COLOR][COLOR=Magenta]@HomeDrive [/COLOR][COLOR=Red]&[/COLOR][COLOR=Silver] "\"[/COLOR][COLOR=Red])[/COLOR]
[COLOR=Blue]if[/COLOR][COLOR=DarkRed] $copy[/COLOR] [COLOR=Red]=[/COLOR] 1 [COLOR=Blue]Then[/COLOR]
    [COLOR=Navy][I]MsgBox[/I][/COLOR][COLOR=Red]([/COLOR][COLOR=Indigo]0[/COLOR][COLOR=Silver],""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"Success"[/COLOR][COLOR=Red])[/COLOR]
[COLOR=Blue]Else[/COLOR]
    [I][COLOR=Navy]MsgBox[/COLOR][/I][COLOR=Red]([/COLOR][COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"Error"[/COLOR][COLOR=Red])[/COLOR]
    [COLOR=Blue]endif[/COLOR]
لاحظ هنا حنا إستخدمنا الاسلوب الاول حفظ البيانات في متغير ثم إختبارها ..

كود:
[COLOR=DarkRed]$copy[/COLOR] [COLOR=Red]=[/COLOR] [COLOR=Indigo]1[/COLOR]
نلاحظ إن الشرط عملية مقارنة وهذي العمليات ترجع إما trueأو false

وهي القيم الي يتعامل معها الشرط

true =صحيح : تحقق الشرط

false=خاطيء: لم يتحقق الشرط

هذي أعتقد الكل عارفها لكن نحن الان نريد إستخدام الدالة في الشرط مباشرة ..

أولا :لو الدالة ترجع قيمتين وهي trueأو false هنا ماراح يكون فيه مشاكل .

لأنه لو أرجعت true راح يعتبر الشرط صحيح والعكس في false ..

لحد الان لم تمر علينا داله ترجع بهذي القيمتين .. لكن الدوال اللي أخذناها ترجع ياقيم رقمية أو نصية ..

فهل يمكن إستخدامها في الشرط مباشرة دون حفظ القيمة في متغير وإختبار قيمته ؟؟

نعم لكن أولا لازم نعرف بعض القواعد..

أولاً: تعامل الشرط مع القيم النصية ..

1)إذا كان القيمة نص-أي نص- فهي تعتبر صحيحة في كل الحالات أي true يعني تحقق الشرط .

جرب الكود هذا :

كود:
[COLOR=Blue]if[/COLOR] [COLOR=Silver]"waget"[/COLOR] [COLOR=Blue]Then[/COLOR]
    [COLOR=Navy][I]MsgBox[/I][/COLOR][COLOR=Red]([/COLOR][COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"تحقق الشرط"[/COLOR][COLOR=Red])[/COLOR]
Else
    [I][COLOR=Navy]MsgBox[/COLOR][/I][COLOR=Red]([/COLOR][COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"لم يتحقق الشرط"[/COLOR][COLOR=Red])[/COLOR]
    [COLOR=Blue]endif[/COLOR]
2) إذا كانت القيمة نص فارغ "" تعتبر خاطئة false أي لم يتحقق الشرط ..

جرب الكود هذا :

كود:
[COLOR=Blue]if[/COLOR] [COLOR=Silver]""[/COLOR] [COLOR=Blue]Then[/COLOR]
    [I][COLOR=Navy]MsgBox[/COLOR][/I][COLOR=Red]([/COLOR][COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"تحقق الشرط"[/COLOR][COLOR=Red])[/COLOR]

Else
    [I][COLOR=Navy]MsgBox[/COLOR][/I][COLOR=Red]([/COLOR][COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"لم يتحقق الشرط"[/COLOR][COLOR=Red])[/COLOR]
    [COLOR=Blue]endif[/COLOR]
الان نأخذ الداله الي ترجع قيمة نصية input box

كود:
[COLOR=Blue]if[/COLOR] [COLOR=Navy][I]InputBox[/I][/COLOR][COLOR=Red]([/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red]) [/COLOR][COLOR=Blue]Then[/COLOR]
    [I][COLOR=Navy]MsgBox[/COLOR][/I][COLOR=Red]([/COLOR][COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"تحقق الشرط"[/COLOR][COLOR=Red])[/COLOR]

[COLOR=Blue]Else[/COLOR]
    [COLOR=Navy]MsgBox[/COLOR][COLOR=Red]([/COLOR][COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"لم يتحقق الشرط"[/COLOR][COLOR=Red])[/COLOR]
[COLOR=Blue]endif[/COLOR]
ملاحظة أخيره : إستخدام هذي الطريقة مع النصوص غير مفيد ..
لأنك تريد من الدالة النص وتستفيد منه في الكود وليس تتحقق هل الدالة أرجعت قيمة نصية أو أرجعت نص فارغ !!

ثانياً تعامل الشرط مع القيم الرقمية..

1) إذا كانت القيمة عدد -أي عدد*-راح يعتبر صحيح true أي تحقق الشرط ..

مثال ..
كود:
[COLOR=Blue]if[/COLOR] [COLOR=Indigo]125 [/COLOR][COLOR=Blue]Then[/COLOR]
    [COLOR=Navy][I]MsgBox[/I][/COLOR]([COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"تحقق الشرط"[/COLOR][COLOR=Red])[/COLOR]

Else
    [COLOR=Navy][I]MsgBox[/I][/COLOR]([COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"لم يتحقق الشرط"[/COLOR][COLOR=Red])[/COLOR]

[COLOR=Blue]endif[/COLOR]
2) إذا كان العدد صفر راح يعتبر خاطيء False أي لم يتحقق الشرط..

مثال..
كود:
[COLOR=Blue]if[/COLOR] [COLOR=Indigo]0[/COLOR] [COLOR=Blue]Then[/COLOR]
    [COLOR=Navy][I]MsgBox[/I][/COLOR][COLOR=Red]([/COLOR][COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"تحقق الشرط"[/COLOR][COLOR=Red])[/COLOR]
Else
    [COLOR=Navy][I]MsgBox[/I][/COLOR]([COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"لم يتحقق الشرط"[/COLOR][COLOR=Red])[/COLOR]

endif
الان نأخذ أي دالة من التي أخذناها ..
كود:
[COLOR=Blue]if[/COLOR] [COLOR=Navy][I]Filecopy[/I][/COLOR][COLOR=Red]([/COLOR][COLOR=Magenta]@ScriptDir[/COLOR] [COLOR=Red]&[/COLOR] [COLOR=Silver]"\*.txt"[/COLOR] [COLOR=Red],[/COLOR][COLOR=Magenta]@HomeDrive [/COLOR][COLOR=Red]&[/COLOR] [COLOR=Silver]"\"[/COLOR][COLOR=Red]) [/COLOR][COLOR=Blue]then[/COLOR]
    [COLOR=Navy][I]MsgBox[/I][/COLOR][COLOR=Red]([/COLOR][COLOR=Indigo]0[/COLOR][COLOR=Silver][COLOR=Red],[/COLOR]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"Success"[/COLOR][COLOR=Red])[/COLOR]
[COLOR=Blue]Else[/COLOR]
    [COLOR=Navy][I]MsgBox[/I][/COLOR][COLOR=Red]([/COLOR][COLOR=Indigo]0[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]""[/COLOR][COLOR=Red],[/COLOR][COLOR=Silver]"Error"[/COLOR][COLOR=Red])[/COLOR]
    [COLOR=Blue]endif[/COLOR]
filecopy

إذا نجح النسخ ترجع بـ 1

إذا فشل بـ 0

فحنا قلنا في البداية إذا كان أي عدد غير الصفر يعتبر الشرط صحيح .

إذا كان العدد صفر يتعبر الشرط لم يتحقق..

فالان إذا تم النسخ راح ترجع الدالة 1 أي الشرط صحيح

إذا لا أي 0 الشرط لم يتحقق ..

ملاحظة أخيره : نستطيع إستخدام or /and /not مع الشرط أيضاً بنفس الاسلوب السابق .


أرجو من الجميع التركيز وقرأة الدرس بتمعن ..

وصلى الله وسلم على نبينا محمد

:d:​
 
توقيع : waget
أهلا في أستاذ بندر طيب لماذا كود يعمل
ممكن توضيح
ومافرق بين هذا كود ي وبين كود عبدالله بعد تعديل طبعا
شوف الدرس ألي وضعته الان وحاول تعرف الفرق ..
كود:
$11 = InputBox("ramay"," أدخل منتدى الذي تحبه ","")
If $11 = "" Or $11 = "ramay" Then ;[SIZE=3][COLOR=red]       ramay   ما عمل  كلمة التى فيه [/COLOR][/SIZE] 
 MsgBox(0,""," لم تدخل شيئ")
Else
 MsgBox(0,"",$11&" هو")
EndIf

في كودك هذا مالها عمل.. غير لو المستخدم كتب ramay راح تضهر له رسالة (لم تدخل شيئ)
وهذا خطأ

لو أرسلت في الوسيط default أي قيمة هنا لازم تضيفها في الشرط لأنها بتضهر في المربع تلقائي

كذا بيكون حلك صح ...

كود:
$11 = InputBox("ramay"," أدخل منتدى الذي تحبه ","ramay")
If $11 = "" Or $11 = "ramay" Then
 MsgBox(0,""," لم تدخل شيئ")
Else
 MsgBox(0,"",$11&" هو")
EndIf

جرب السيكربت ...:d:
 
توقيع : waget
شوف الدرس ألي وضعته الان وحاول تعرف الفرق ..


في كودك هذا مالها عمل.. غير لو المستخدم كتب ramay راح تضهر له رسالة (لم تدخل شيئ)
وهذا خطأ

لو أرسلت في الوسيط default أي قيمة هنا لازم تضيفها في الشرط لأنها بتضهر في المربع تلقائي

كذا بيكون حلك صح ...

كود:
$11 = InputBox("ramay"," أدخل منتدى الذي تحبه ","ramay")
If $11 = "" Or $11 = "ramay" Then
 MsgBox(0,""," لم تدخل شيئ")
Else
 MsgBox(0,"",$11&" هو")
EndIf

جرب السيكربت ...:d:


طيب لو وضعته هكذا
بيكون حالي صح أيضا
وشيئ أخر هو لو كتبت أسم في عربي فتظهر من يمين الايسار
بمعنى هكذا
رامي أسمك هو
كود:
$1 = InputBox("","أدخل أسمك","")
 If $1 = "" Or $1 = "" Then
MsgBox(0,""," لم تدخل شيئ")
Else
 MsgBox(0,"",$1&" أسمك هو")
 EndIf
 
توقيع : ramay
طيب لو وضعته هكذا
بيكون حالي صح أيضا
وشيئ أخر هو لو كتبت أسم في عربي فتظهر من يمين الايسار
بمعنى هكذا
رامي أسمك هو
كود:
$1 = InputBox("","أدخل أسمك","")
 If $1 = "" Or [COLOR=Red]$1 = ""[/COLOR] Then
MsgBox(0,""," لم تدخل شيئ")
Else
 MsgBox(0,"",$1&" أسمك هو")
 EndIf

:hh: هذي مالها داعي ...

or / تعني أو تستخدمها إذا كان عندك حالتين مختلفه -شرطين مختلفة - وتبي السيكريبت ينفذ نفس العملية

إذا تحققت وحده منهم ..:d:

أنا قلت لك سابقاً لو أرسلت قيمة للوسيط default ..

راح تظهر في مربع الرسالة تلقائي فلو -المستخدم لم يدخل شيء - وإختار ok راح .. تكون القيمة

الراجعه هي قيمة
default ..

إقرأ مشاركتي السابقة زين وشوف المثال وشغله


إنت الان حاط نفس الشرط .. مرتين ؟؟
:d:

شيئ أخر هو لو كتبت أسم في عربي فتظهر من يمين الايسار

نعم تقدر أضيف في flag
الرقم /524288
شوف الكودهذا وجربة
كود:
$input = inputbox("","أدخل إسمك","...هنا")
if $input = "" or $input = "...هنا" Then
    MsgBox(0+524288,"","لم تدخل شيء")
Else
    MsgBox(0+524288,"",$input & ":إسمك هو")
    endif
 
توقيع : waget
يعطيك العافيه waget ع التوضيح .. :ok:
و ياليت يحدث الفهرس أولاً بأول ..
الكل يحاول يبحث عن الدروس بآخر 3~4 صفحات جديدهـ ..
موفقين ..

:wink:

 
توقيع : Bo.SaQeR
الحالة
مغلق و غير مفتوح للمزيد من الردود.
عودة
أعلى