القيمة بإنشاء كائن مثال الخاصية (Font)

[modress]

المشاركة الأصلية كتبت بواسطة مدرس . كمبيوتر

اكرر اسفى لوجود مثل هذه الاستفسارات الخاصة بالترم التانى داخل قسم الفصل الاول بس الواحد بيحضر للمنهج فى الفترة الاجازة دى وعايز استفهم عن بعض الحاجات فارجو عدم حذف او نقل الموضوع



الملحوظة الاولى

Degree == TextBox1.Text


الناتج True اذا كانت قيمة الخاصية Text تساوى محتوى المتغير Degree ويكون False اذا حدث العكس .

مش فاهم ما هو لازم يكون True لانى انا اصلا ساويت محتوى Degree بالخاصية Text
ولا هو يقصد انى اخصص قيمة للمتغير Degree وبعد كدة قيمة للخاصية Text ثم اقوم بمساواتهم ببعض واشوف الناتج True ام False
ــــــــــــــــــــــــــــــــــــــــــــــــــ ــــــــــــــــــــــــــــــــــــــ
الملحوظة التانية
الفصل التانى ً 42 استخدام الدالة isnumeric
تم استخدام هذه الجملة داخل الكود If Isnumeric (Me.TextBox1.Text ) Then
Degree = Me.TextBox1.text
هل المقصود بالجملة الاولى ان يكون محتوى صندوق الكتابة رقمى
ولو لم يكن رقمى ازاى هيتجاهل كل هذه الجمل ويذهب للجمل التالية
وتفسير هذه الجمل
("ادخل عدد Msgbox ( "
Mr.TextBox1.Focus
Me.TextBox1.Text = " "
الجملة الاولى بيطلب ادخال رقم هل فى الجملة الثالتة بيطلب انى افرغ محتوى صندوق الكتابة بعد ذلك


الملحوظة الاهم
اسئلة الكتاب المدرسى على الفصل التانى
السؤال الخامس رقم 3 ورقم 4 اتحدى وجود شرح لهم فى المنهج الجديد داخل الفصل التانى
هما مرتبطين بالفصل الاول وكمان مفيش عليهم شرح ده بيبقى استنتاج معلم هل جت سهو منهم
واين الحديث عن معامل الربط & داخل المنهج الجديد


ورجاء خاص لو اى زميل يتفضل بشرح التفرع باستخدام Select ... Case باسلوب بسيط يعنى بالبلدى عشان نفهمه

اتأخرت في الرد شوية عقبال لما بصيت في الفصل الثاني والأول
الملحوظة الأولي
علامة ال =
1- تستخدم كعلامة تخصيص بمعنى قيمة الجزء الأيمن يخزن في متغير او ثابت أو خاصية الجزء الإيسر
مثل
"name ="nada
2- تستخدم كعلامة مقارنة أي أحد مفردات الشرط مثل
كمثال
If Degree = TextBox1.Text Then

في هذة الحالة لا يخصص قيمة الخاصية Text للمتغير Degree وانما يختبر تساوى قيمة كل منهما

الملحوظة الثانية
If Isnumeric (Me.TextBox1.Text ) Then
عبارة عن اختبار هل القيمة الحالية للخاصية Text تنفع تبقى رقمية
في حالة True ينفذ ما يلي Then
في خالة False ينفذ ما يلي End IF

("ادخل عدد") Msgbox
رسالة تطلب ادخال عدد
Me.TextBox1.Focus
وهذا يعني وضع مؤشر الكتابة داخل مربع الكتابة (اي تنشيطه او التركيز)
Me.TextBox1.Text = " "
يعني افراغ الخاصية Text من أي نصوص بها
السطر الثاني والثالث
ينشط ويفضي استعداد لتلقي رقم جديد

الملحوظة الأهم
السؤال 3 والسؤال 4
ما هم الا عملية تخصيص يتخللها ربط نصوص ببعض
وربط النصوص موجود له شرح في ص 13

إجابة 3
"Youssif Ahmed"
إجابة 4
Axb=63

بالنسبة Select Case تستخدم لاختبار قيم متغير متوقع حالته
مثل متغير به (Day) يوم من ايام الاسبوع احتمالاتهم 7
متغير به وظيفة المعلم (JobTitle) احتمالاتهم 6
مثال
select Case JobTitle
case "معلم مساعد"

case "معلم"
كود
case "معلم أول"
كود
case "معلم أول أ"
كود
case "معلم خبير"
كود
case "معلم كبير"
كود
End Select
أتمنى أن اكون أفدت
وشكرا