سوال للاستاذ تامر والزملاء الاعزاء

[منى محمد عوض]

العبارة : تستخدم جملة select caseفي حالة اختبار اكثر من تعبير شرطي بجملة شرطية واحدة
كيف تكون هذه العبارة صحيحة ؟
أكثر من تعبير شرطى تكون باستخدام المعامل المنطقى and - Or فى انه لا يجوز استخدامهما مع جملة Select case
اريد مثال على هذه الجملة
ولكم جزيل الشكر

[سيف سالم]

المشاركة الأصلية كتبت بواسطة منى محمد عوض

العبارة : تستخدم جملة select caseفي حالة اختبار اكثر من تعبير شرطي بجملة شرطية واحدة
كيف تكون هذه العبارة صحيحة ؟
أكثر من تعبير شرطى تكون باستخدام المعامل المنطقى and - Or فى انه لا يجوز استخدامهما مع جملة Select case
اريد مثال على هذه الجملة
ولكم جزيل الشكر

هذا يعتبر من اخطاء الكتاب
لان صياغة السؤال به مشكلة
1- لان كلمة تستخدم لم ترد بالكتاب مع جملة select case
2- استخدام كلمة تستخدم تقصر الاجابة فقط على select case وفي الواقع يمكن اختبار اكثر من شرط باكثر من طريقة وليس select case فقط
3- السؤال لا يحقق اي هدف من اهداف تدريس select case كما جاء بالكتاب
اخيرا علمها كدا للطلاب

[tmrmsr]

معذرة يا استاذة منى عن تأخري عن الرد نتيجة الانشغال بأعمال كثيرة
وأليك ما يلي
بمناقشة واضع السؤال كان التعليق كالآتي: باختصار شديد

الجملة الشرطية Conditional Statement يقصد بها جملة Select Case أو جملة If التي من خلالها يحدث التفرع.
Conditional Statements
Conditional statements allow conditional execution of statements based on expressions evaluated at run time.
ConditionalStatement ::= IfStatement | SelectStatement
من كتاب "Visual Basic Language Specification 10.0"

التي تحتوى على تعبير expression أو أكثر الذي يلي كل كلمة Case والذي يتم اختباره حتى ينفذ الكود الذي يليه او لا ينفذ ثم ينتقل للتعبير التالي في حالة لا وفي حالة نعم ينفذ الكود الذي يلية ثم يتفرع إلى ما بعد جملة select case موضع السؤال

اذا السؤال : تستخدم جملة (Select Case) فى حالة اختبار أكثر من تعبير شرطى بجملة شرطية واحدة إجابتة تكون صح

من يريد المزيد من التفاصيل
استخدم العبارة "Conditional statements" في عملية البحث وشكرا

[منى محمد عوض]

شكرا على رد حضراتكم جميعاً
ولكن هل من مثال با استاذ تامر

[hassanalhawy]

المشاركة الأصلية كتبت بواسطة منى محمد عوض

شكرا على رد حضراتكم جميعاً
ولكن هل من مثال با استاذ تامر

أنظر الكود التالى لتحويل جملة If إلى جملة Select Case للتدريب ص 50 بالكتاب

Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim o As Boolean = Me.RadioButton1.Checked
        Dim na As Boolean = Me.RadioButton2.Checked
        Dim mg As Boolean = Me.RadioButton3.Checked
        Dim al As Boolean = Me.RadioButton4.Checked
        Select Case True
            Case o = True
                Me.Label4.Text = "O"
                Me.Label5.Text = "8"
                Me.Label6.Text = "16"
            Case na = True
                Me.Label4.Text = "Na"
                Me.Label5.Text = "11"
                Me.Label6.Text = "23"
            Case mg = True
                Me.Label4.Text = "Mg"
                Me.Label5.Text = "12"
                Me.Label6.Text = "24"
            Case al = True
                Me.Label4.Text = "Al"
                Me.Label5.Text = "13"
                Me.Label6.Text = "27"
            Case Else
                MsgBox("يرجى اختيار أحد العناصر")
        End Select

    End Sub
End Class