قد أوضحت سابقًا أن الحاسوب ليس ذكيًا بالمرة ، وسأثبت لك ذلك بمعرفتك حقيقة تثبت لك أن الحاسوب ليس ذكيًا أبدًا ، والحقيقة هى أن عداد الكمبيوتر يبدأ من الصفر ، حيث أن الصفر يُعتبر شيئ موجود بالنسبة له ؛ لأنه لا يعلم أن الصفر يعنى لا شيء إنما هو يعرف أنه ليس سالبًا فأنه بعتبره شيئ موجود حتى ولو لم يكن موجبًا.
وسأوضح لك شيئًا من الصعب أن تفهمه حاليًا كنك سوف تتعرف عليه فى الفصول القادمة ، وهى عند تعريف مصفوفة بها 10 خانات يتم تعريفها كالتالى:
Dim array(9)
وهذا يعنى أن العداد يعمل كالتالى:
0,1,2,3,4,5,6,7,8,9
أىّ من الصفر حتى تسعة = 10 أرقام = 10 خانات بالمصفوفة.
أعرف أنك لا تعرف معنى مصفوفة ولست مُجبرًا على فهم هذا الآن ، لأنك ستتعرف عليه بالتفصيل لاحقًا ( فلا تبتئس ... ستبدو لك البرمجة فى البداية صعبة ، لكن مع القليل من التركيز ستجد أن الموضوع سهلاً جدًا )
الكائنات
تعتقد vb.net أن كل شيء هو كائن فمثلاً: البالون كائن ، والقلم كائن ، والزر كائن ، والكائن له خصائص وله أحداث وله طرق.
وتُكتب الخصائص برمجيًا هكذا
Object.property = value
حيث أن object هو اسم الكائن و property اسم الخاصية و value هى قيمة الخاصية.
فمثلاً نريد جعل خاصية اللون للكائن البالون أحمر يُكتب هكذا
Balloon.color = red
والطُرق تُكتب كالتالى:
Object.method()
ويُضع بين القوسين البارامترات ، ولكن فى حالتنا لا يوجد بارامترات ، وسنتعرف على البارامترات لاحقًا.
أما الإجراء هو مثلاً فى الكائن "زر" عند حدوث الإجراء "ضغط" أىّ يقوم المُستخدم بالضغط على الزر يتم تنفيذ كود مٌعين.
1- اسم الكائن Button1.
2- الإجراء Click أىّ الضغط.
عند اختيار الكائن
ومن ثم إختيار الإجراء يظهر كود جاهز يتكون من
Private sub ………….
End Sub
وما بين private sub و End sub نقوم بكتابة الكود الذى سيتم تنفيذه عند تحقيق هذا الإجراء.
فمثلاً نريد عند الضغط على الزر button1 يتم إظهار رسالة للمستخدم بها "نجاح العملية" ، نقوم بوضع أداة الزر button فى النافذة form1 عن طريق الضغط عليها من ToolBox ضغطًا مزدوجًا ، أو بسحبها ووضعها على النافذة ، ثم قُم بالضغط ضغطًا مزدوجًا على الزر button1 وستظهر نافذة الكود بها هذا الكود
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
End Sub
ونلاحظ هنا فى شاشة نافذة الكود أنه تم إختيار الكائن button1 وتم إختيار الإجراء Click إفتراضيًا ، وما بين Private sub و End sub سنقوم بوضع الكود ، عندما يضغط Click المُستخدم على الكائن Button1 يتم ظهور رسالة بها "نجاح العملية".
فسيكون الكود كالتالى
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Msgbox(“نجاح العملية”)
End Sub
والدالة msgbox هى المسئولة عن إظهار رسالة فى صندوق صغير.
والآن قم بالضغط على f5 من لوحة المفاتيح ثم قُم بالضغط على button1 وستشاهد الرسالة ظهرت فى صندوق صغير ،، والآن هنيئًا لك أول برنامج قُمت ببرمجته. أنت الآن مبتدأ.
1تعليقات على : الخصائص والطرق والإجراءات (متفرقات هامة)
Shootercasino: How to win real money and play casino slot machines
So, the games you can play 제왕카지노 and experience at a 바카라 casino with the best of odds The first time you win a real money casino 인카지노 bonus you won't need a casino
إرسال تعليق