|
||||||
| أرشيف المنتدى هنا نقل الموضوعات المكررة والروابط التى لا تعمل |
|
|
أدوات الموضوع | ابحث في الموضوع | انواع عرض الموضوع |
|
#1
28-10-2012, 08:02 PM
|
|||
|
|||
القيمة بإنشاء كائن مثال الخاصية (Font)
عند تخصيص قيم للخصائص لفت نظري في الملاحظات العبارة رقم 4 ص 78 "القيمة بإنشاء كائن مثال الخاصية (Font)." حد يقدر يفسرها عندى تفسير ب المناقشة يمكن ان نصل لتفسير جيد وارجو المشاركة |
|
#2
28-10-2012, 11:04 PM
|
||||
|
||||
كما تعرف أن ControlName.Property = value
والقيمة هذه من الممكن أن تكون : قيمة مجردة مثل Label1.Text="Visual Basic" قيمة منطقية مثل Label1.visible= True قيمة من قائمة مثل Label1.ForeColor= Color.Red وهذه القيمة يتم اختيارها من قائمة الاستشعار الذكية القيمة بإنشاء كائن مثل Label1.Font= New Font("Arial",20) وفى الحالة الاخيرة لتعديل قيم الخاصية Font من خلال إنشاء كائن من الفئة Font وهناك مشكلة حلها أبسط وهى أن الكائن المسند للخاصية Font لا يمكن تعديل قيمه فمعظم خصائص الفئة Font للقراءة فقط لذلك علينا إسناد قيمة كائن جديد بالمعامل New من خلال New Font("Arial",20)
__________________
(مهندس و مدرس كمبيوتر ) لن تبلغ المجد حتى تلعق الصبر
|
|
#3
29-10-2012, 07:11 AM
|
|||
|
|||
مناقشة هامه
اقتباس:
1- كمان لو نظرنا لنوع (Type) الخاصية Font سوف نجد نوعه (Type) من الفئة أو التصنيف Font وعلشان نستفيد من هذا التصنيف لابد من عمل استنساخ نسخة منه باستخدام NEW. 2- هذا الكائن الجديد حل محل الكائن المخزن بالخاصية Font وده نتيجة عملية التخصيص. 3- وذي ما حضرتك تفضلت بعض خصائص التصنيف Font للقراءة فقط فكان لابد من استخدام Constructor بتاع التصنيف Font عندما عندما كتبنا (حجم الخط , "نوع الخط") الذي يستطيع التأثير في المتغير الخاص (Private Variable) بهذه الخصائص المعموله للقراءة فقط. النقاط السابقة معتمدة على OOP |
|
#4
29-10-2012, 12:51 PM
|
|||
|
|||
|
اكرر اسفى لوجود مثل هذه الاستفسارات الخاصة بالترم التانى داخل قسم الفصل الاول بس الواحد بيحضر للمنهج فى الفترة الاجازة دى وعايز استفهم عن بعض الحاجات فارجو عدم حذف او نقل الموضوع
الملحوظة الاولى 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 باسلوب بسيط يعنى بالبلدى عشان نفهمه |
|
#5
29-10-2012, 06:55 PM
|
|||
|
|||
اقتباس:
الملحوظة الأولي علامة ال = 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 أتمنى أن اكون أفدت وشكرا |
|
#6
29-10-2012, 09:32 PM
|
|||
|
|||
|
بالنسبة Select Case تستخدم لاختبار قيم متغير متوقع حالته
مثل متغير به (Day) يوم من ايام الاسبوع احتمالاتهم 7 متغير به وظيفة المعلم (JobTitle) احتمالاتهم 6 مثال select Case JobTitle case "معلم مساعد" case "معلم" كود case "معلم أول" كود case "معلم أول أ" كود case "معلم خبير" كود case "معلم كبير" كود End Select أتمنى أن اكون أفدت وشكرا[/QUOTE] جزاكم الله خيرا وربنا يكرمك بس ياريت لو افهم ازاى اختار الامر المراد تنفيذه يعنى معلم او معلم اول او غيره |
|
#7
30-10-2012, 08:47 AM
|
|||
|
|||
|
اقتباس:
جزاكم الله خيرا وربنا يكرمك بس ياريت لو افهم ازاى اختار الامر المراد تنفيذه يعنى معلم او معلم اول او غيره [/QUOTE] جرب الكود ده واعمل كومبو وحط فيه وظائف المعلم Dim JobTitle As String Dim Salary As Single JobTitle = Me.ComboBox1.SelectedItem Select Case JobTitle Case "معلم مساعد" Salary = 3000 Case "معلم" Salary = 3500 Case "معلم أول" Salary = 3000 Case "معلم أول أ" Salary = 4000 Case "معلم خبير" Salary = 4500 Case "معلم كبير" End Select Me.Label1.Text = "الراتب " & Salary |
|
#8
30-10-2012, 05:49 PM
|
||||
|
||||
|
شكرا لحضراتكم وان كنت اود تأجيل مثل هذه المشاركات والاستفسارات أو على الاقل طرحها داخل قسم الكمبيوتر للترم الثانى وطالما حضراتكم اطلعتوا على الفصل التانى ممكن تشاركونى اجابات هذه الاسئلة اسئلة صح وخطأ على الفصل التانى 1- تنتهى جملة If بكلمات End If ( )
2- يجب ان تنتهى جملة If بكلمات End If . ( ) 3- استعمال End If اختيارى مع جملة If . ( ) 4- استخدام Else اختيارى فى جملة If . ( ) 5- معامل المقارنة and يجب ان تكون نواتج الشروط المستخدمة False لكى يكون هو False . 6- المعامل Or يتطلب ان يكون الشرطان ناتجهما True لكى يكون الناتج النهائى True . سؤال آخر يتم استقبال مدخلات المستخدم من خلال العديد من الادوات منها Text Box .
__________________
ـــــــــــــــــــــــــــــــــــــــــــــــ لا إله إلا أنت سبحانك إنى كنت من الظالمين
آخر تعديل بواسطة أحـمد قرنى ، 30-10-2012 الساعة 05:59 PM |
|
#9
30-10-2012, 09:25 PM
|
||||
|
||||
|
اقتباس:
|
|
#10
30-10-2012, 09:28 PM
|
||||
|
||||
|
اقتباس:
Dim JobTitle As String Dim Salary As Single JobTitle = Me.ComboBox1.SelectedItem Select Case JobTitle Case "معلم مساعد" Salary = 3000 Case "معلم" Salary = 3500 Case "معلم أول" Salary = 3000 Case "معلم أول أ" Salary = 4000 Case "معلم خبير" Salary = 4500 Case "معلم كبير" End Select Me.Label1.Text = "الراتب " & Salary [/QUOTE] واضح إن عندك أمل بالأرقام دى طلع نأبنا على شونه |
|
#11
30-10-2012, 10:29 PM
|
||||
|
||||
|
اقتباس:
طيب ممكن اعرف حضرتك جاوبت رقم 5 خطأ بناءاً على كلمة يجب ام بناءاً على كلمة معامل المقارنة
__________________
ـــــــــــــــــــــــــــــــــــــــــــــــ لا إله إلا أنت سبحانك إنى كنت من الظالمين
|
|
#13
01-11-2012, 01:38 PM
|
||||
|
||||
|
اقتباس:
|
|
#14
01-11-2012, 04:32 PM
|
||||
|
||||
|
اقتباس:
ليس هو ما اقصده فانا على علم بذلك
انا اقصد And يسمى معامل مقارنة ام معامل منطقى
__________________
ـــــــــــــــــــــــــــــــــــــــــــــــ لا إله إلا أنت سبحانك إنى كنت من الظالمين
|
|
#15
01-11-2012, 10:52 PM
|
||||
|
||||
|
اقتباس:
And هى معمل منطقى Logic وبالتالى يكون الخطأ نتج من التسمية الخاطئة للمعمل And وبالتالى العبارة خطأ |
| العلامات المرجعية |
«
الموضوع السابق
|
الموضوع التالي
»
العرض العادي
|
|
جميع الأوقات بتوقيت GMT +2. الساعة الآن 07:40 PM.
