اهلا وسهلا بك فى بوابة الثانوية العامة ... سجل الان

  #1  
قديم 06-03-2013, 12:08 AM
مدرس . كمبيوتر مدرس . كمبيوتر غير متواجد حالياً
عضو مجتهد
 
تاريخ التسجيل: Oct 2012
العمر: 37
المشاركات: 101
معدل تقييم المستوى: 14
مدرس . كمبيوتر is on a distinguished road
افتراضي

ممكن سؤال
هل الكود ده
Dim x As Single
x = TextBox1.Text
Select Case x
Case 0
" صفر"= Label1.Text
Case Is > 0
" اكبر من الصفر"= Label1.Text
Case Else
" اقل من الصفر"= Label1.Text
End Select

زى الكود ده
Dim x As Single
x = TextBox1.Text
Select Case x
Case 0
" صفر"= Label1.Text
Case Is > 0
= " اكبر من الصفر" Label1.Text
case is < 0
" اقل من الصفر"= Label1.Text
End Select

وهل يمكن استخدامها فى متغيرين ولا مش ينفع

وسؤال اخر
dim x as byte = 300
بيعطى خطا املائى ونحوى مش خطأ اثناء التشغيل مش المفروض انها اكبر من المدى يعنى خطا اثناء التشغيل

وليه
dim x as short= " mohamed"

بيدى خطا اثناء التشغيل كدة صح فعلا طيب اشمعنى الكود السابق معملش زى الكود ده
رد مع اقتباس
  #2  
قديم 06-03-2013, 06:41 AM
tmrmsr tmrmsr غير متواجد حالياً
عضو ممتاز
 
تاريخ التسجيل: Aug 2012
المشاركات: 303
معدل تقييم المستوى: 14
tmrmsr is on a distinguished road
افتراضي

- الكود الأول والكود الثاني يعطيا نفس النتيجة ولكن
في الأول استخدمنا Case Else وفي الثاني استخدمنا case is < 0 بدلا منها

- dim x as byte = 300
يحدث خطأ من النوع Syntax Error
لأن التخصيص بقيمة مجردة مباشرة يمكن إكتشافها أثناء كتاب الكود
أما في الحالية الآتية
dim x as byte = Textbox1.text
غير معروف مدى القيمة المخصصة الا عند التشغيل فإذا حدث ووضعت قيمة أكبر أو أقل يحدث خطأ من النوع RunTime
سؤال جميل
-بالنسبة "Dim x As Short = "mohamed"
تفسيرى سريعا ويحتاج للمراجعة
القيمة النصية سوف يتم عمل لها تحويل ضمنى أولا وعند الفشل يعطى RunTime Error
لأنه من المحتمل أن ينفع تحويلها
لأنه لو أعطى خطأ لن تستطيع التخصيص بهذا الشكل
Dim x As Short = "5"
وشكرا
رد مع اقتباس
  #3  
قديم 06-03-2013, 01:36 PM
سيف سالم سيف سالم غير متواجد حالياً
مــٌــعلــم
 
تاريخ التسجيل: Jul 2008
العمر: 57
المشاركات: 4,642
معدل تقييم المستوى: 22
سيف سالم is on a distinguished road
افتراضي

اقتباس:
المشاركة الأصلية كتبت بواسطة مدرس . كمبيوتر مشاهدة المشاركة
وسؤال اخر
dim x as byte = 300
بيعطى خطا املائى ونحوى مش خطأ اثناء التشغيل مش المفروض انها اكبر من المدى يعنى خطا اثناء التشغيل

وليه
dim x as short= " mohamed"

بيدى خطا اثناء التشغيل كدة صح فعلا طيب اشمعنى الكود السابق معملش زى الكود ده
الخطأ الاملائي والنحوي مخالف لقواعد اللغة
قواعد اللغة تمنع وضع مدى اكبر في المتغير
dim x as byte = 300 فيكون syntax
من قواعد اللغة امكانية التحويل الضمنى
dim x as short= " mohamed" صحيح من حيث قواعد اللغة
عند التنفيذ لن تحول فتكون runtime
رد مع اقتباس
  #4  
قديم 06-03-2013, 05:35 PM
مدرس . كمبيوتر مدرس . كمبيوتر غير متواجد حالياً
عضو مجتهد
 
تاريخ التسجيل: Oct 2012
العمر: 37
المشاركات: 101
معدل تقييم المستوى: 14
مدرس . كمبيوتر is on a distinguished road
افتراضي

شكرا لردودكم على استفسارى
طيب بردو اشمعنى الكود ده
dim a as char= " momamaed"
msgbox(a)

هينفذ وتبقى قيمة a = m

مش مدى النوع char حرف واحد بس يبقى الكود غلط من الاول زى اللى فات بتاع byte
رد مع اقتباس
  #5  
قديم 06-03-2013, 08:33 PM
tmrmsr tmrmsr غير متواجد حالياً
عضو ممتاز
 
تاريخ التسجيل: Aug 2012
المشاركات: 303
معدل تقييم المستوى: 14
tmrmsr is on a distinguished road
Icon114 أسئلتك حلوه قووووووووووووووي

اقتباس:
المشاركة الأصلية كتبت بواسطة مدرس . كمبيوتر مشاهدة المشاركة
شكرا لردودكم على استفسارى
طيب بردو اشمعنى الكود ده
dim a as char= " momamaed"
msgbox(a)

هينفذ وتبقى قيمة a = m

مش مدى النوع char حرف واحد بس يبقى الكود غلط من الاول زى اللى فات بتاع byte

أسئلة جميلة ميعرفش يجاوب عليها الا من مارس كتابة الكود بكثافة وفاهم قدر معقول من OOP
بالطريقة ده هتكون معرفة وخبرة جميلة
استمر
The .NET Framework uses the Char structure to represent a Unicode character.
نتيجة التحويل الضمنى :أخذ الحرف الأول من السلسلة الحرفية

لاحظ يفضل التحويل الصريح على التحويل الضمنى وفي حالة مثالك تصبح كالآتي:

Dim a As Char = CChar("momamaed")
MsgBox(a)
رد مع اقتباس
  #6  
قديم 06-03-2013, 11:11 PM
سيف سالم سيف سالم غير متواجد حالياً
مــٌــعلــم
 
تاريخ التسجيل: Jul 2008
العمر: 57
المشاركات: 4,642
معدل تقييم المستوى: 22
سيف سالم is on a distinguished road
افتراضي

اقتباس:
المشاركة الأصلية كتبت بواسطة مدرس . كمبيوتر مشاهدة المشاركة
شكرا لردودكم على استفسارى
طيب بردو اشمعنى الكود ده
dim a as char= " momamaed"
msgbox(a)

هينفذ وتبقى قيمة a = m

مش مدى النوع char حرف واحد بس يبقى الكود غلط من الاول زى اللى فات بتاع byte
مين قال بس ان مدي char حرف واحد
رد مع اقتباس
إضافة رد

العلامات المرجعية

أدوات الموضوع
انواع عرض الموضوع

ضوابط المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا يمكنك اضافة مرفقات
لا يمكنك تعديل مشاركاتك

BB code متاحة
كود [IMG] متاحة
كود HTML معطلة

الانتقال السريع


جميع الأوقات بتوقيت GMT +2. الساعة الآن 04:42 PM.