السلام عليكم
احتاج الى كود اظهار نتيجة الدرجات ( ناجح او راسب او مكمل ) للدروس مثلا ( العربي- الانكليزي -الرياضيات -جميعها------
اذا كان >=50 ناجح --- اذا كان <50 راسب
يعني كود شرطي
محتاج كود اظهار النتيجة الطالب
|
السلام عليكم احتاج الى كود اظهار نتيجة الدرجات ( ناجح او راسب او مكمل ) للدروس مثلا ( العربي- الانكليزي -الرياضيات -جميعها------ اذا كان >=50 ناجح --- اذا كان <50 راسب يعني كود شرطي
الحمد لله تم الحل
16-03-15, 04:34 PM
الحمد لله تم الحل
أرى مشاركة الحل و عرضه لإتاحة الفرصة للغير للتعلم .أليست هذه الغاية من الموقع ؟ عند الحاجة تسأل و عند الوصول للحل لا يتاح للإطلاع . تم الشكر بواسطة: العيدروس
16-03-15, 11:34 PM
(16-03-15, 04:34 PM)benomar كتب : الحمد لله تم الحل جزاك الله خيراُ اخي سوف انشر العمل في الموقع قربتاُ الى الله زكاة العلم نشره Dim a, b, c, d, w, k, r, t, y, u, f, g As Integer
a = Val(TextBox44.Text) b = Val(TextBox45.Text) c = Val(TextBox46.Text) d = Val(TextBox47.Text) w = Val(TextBox48.Text) k = Val(TextBox49.Text) r = Val(TextBox50.Text) t = Val(TextBox51.Text) y = Val(TextBox52.Text) u = Val(TextBox53.Text) f = Val(TextBox54.Text) g = Val(TextBox55.Text) If a >= 50 And b >= 50 And c >= 50 And d >= 50 And w >= 50 And k >= 50 And r >= 50 And t >= 50 And y >= 50 And u >= 50 And f >= 50 And g >= 50 Then Me.TextBox56.Text = "ناجح" Else Me.TextBox56.Text = "راسب " End If
17-03-15, 05:25 AM
بارك الله فيك و في أمثالك
|
|