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

العودة   بوابة الثانوية العامة المصرية > المنتدى التخصصي للمعلمين > المنتدى الأكاديمي للمعلمين

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

 
 
أدوات الموضوع انواع عرض الموضوع
Prev المشاركة السابقة   المشاركة التالية Next
  #6  
قديم 24-03-2013, 10:44 PM
الصورة الرمزية hassanalhawy
hassanalhawy hassanalhawy غير متواجد حالياً
مــٌــعلــم
 
تاريخ التسجيل: Sep 2010
المشاركات: 1,514
معدل تقييم المستوى: 16
hassanalhawy is on a distinguished road
افتراضي

يوجد كود مبسط أستاذة ياسمين لطلبك
كود:
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
كود:

__________________
يخطئ من يظن أن للذئاب ديناً
 

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

الكلمات الدلالية (Tags)
سؤال


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

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

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


جميع الأوقات بتوقيت GMT +2. الساعة الآن 01:25 AM.