تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] طلب عملية حسابية
#1
السلام عليكم...أول مشاركة ليا

أنا عندي بروجكت فيه تيكست 1 بيطلع فيه مجمل عدد الساعات لمكان معين لحد هنا تمام, 
بس عاوز بعدين طريقة لما ادوس علي Button يحسبلي التكلفة بحيث:

 أول وتاني ساعة ب5 جنيه بعدين تالت ساعةب4 ورابع ساعة ب3 وخامس ساعة ب2 جنيه وسادس ساعةب1 جنيه وبعدين لو اكتر من 6 ساعات يبقي مجاني يعني حد أقصي 20 جنيه

بمعني 

ساعة = 5
ساعتين = 10
3 ساعات = 14
4 ساعات = 17
5ساعات = 19
6 ساعات = 20
أكبر من 6 = 20

وشكرا  Smile
الرد }}}
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة الله وبركاته
اليك الاجابة اخي
كود :
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
       Dim x As Integer = Val(TextBox1.Text)
       Select Case x
           Case 1
               Label1.Text = 5
           Case 2
               Label1.Text = 10
           Case 3
               Label1.Text = 14
           Case 4
               Label1.Text = 17
           Case 5
               Label1.Text = 19
           Case Is <= 6
               Label1.Text = 20
       End Select
   End Sub
End Class
الرد }}}
تم الشكر بواسطة: motazsaad94@gmail.com
#3
(03-12-18, 10:50 PM)عبدالرحمن رمضان كتب : وعليكم السلام ورحمة الله وبركاته
اليك الاجابة اخي
كود :
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
       Dim x As Integer = Val(TextBox1.Text)
       Select Case x
           Case 1
               Label1.Text = 5
           Case 2
               Label1.Text = 10
           Case 3
               Label1.Text = 14
           Case 4
               Label1.Text = 17
           Case 5
               Label1.Text = 19
           Case Is <= 6
               Label1.Text = 20
       End Select
   End Sub
End Class

شكراً أخي تم الحل Smile 

هل تعرف طريقة سهلة لتكرار أو نسخ هذا الكود 100 مرة مع تغيير Label1 إلى 2 و 3 ........ 100 , أم ليس هناك سوى الطريقة اليدوية أو الاستبدال بالوورد ؟
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال عن عملية حذف سجل من قاعدة البيانات assuhimi 3 249 11-02-24, 08:43 PM
آخر رد: assuhimi
Heart [C#.NET] حول بطئ عملية نقل البينات الكثيرة من أكسس إلى داتا غريد فيو بلال بلال 11 710 15-12-23, 07:47 AM
آخر رد: foad8920
  [VB.NET] ناتج عملية الطرح للأرقام الشعرية خطا عبدالله الصافي 3 362 27-09-23, 11:01 AM
آخر رد: قناص المدينة
  عملية حسابية خاصة محمد خيري 6 497 22-08-23, 09:09 AM
آخر رد: مصمم هاوي
  ماهى عملية الضرب داخل sql حماده ممدوح البحيرى 5 832 18-12-22, 01:00 PM
آخر رد: Taha Okla
  تحديد الصف بعد عملية التحديث محمد اسماعيل 4 2,981 02-10-22, 12:50 PM
آخر رد: رضوان الجماعي
Question [سؤال] تعبئة TreeView مع جود اكثر من عملية بحث ادخل جدوالين alims 1 1,868 22-05-22, 07:51 PM
آخر رد: samo123456
  [VB.NET] عمليات حسابية محمد بوقزاحة 2 1,054 22-03-22, 12:38 PM
آخر رد: محمد بوقزاحة
  [VB.NET] كيف يتم التأثير على المخزون عند عملية البيع 739906433 3 2,174 02-03-22, 04:27 PM
آخر رد: Taha Okla
  كيفية اضافة عملية بحث على web browser للملفات داخل البرنامج haithammoftah 3 1,581 29-12-21, 01:07 AM
آخر رد: سعود

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


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم