الكثير يتساءل عن كيفية حساب فاتورة الكهرباء مع شطورها
مثلاُ دون 70 كيلو واط السعر 5 جنيه
من 71 كيلو واط الى 80 السعر 8 جنيه
من 81 كيلو واط الى 200 السعر 15 جنيه
من 201 و ما فوق 17 جنيه
كيف نحسب الفاتورة اذا كان الاستهلاك 550 كيلو واط مثلاً
هذا الملف يجيب عن هذا السؤال
Function My_Facture(Myfact As Long, n1 As Integer, n2 As Integer, n3 As Integer, n4 As Integer) As Long
''''''''''''''''''''''''''''''''''''''''''
Select Case Myfact
Case Is <= 70
How_Many = Myfact * n1
Case Is <= 80
How_Many = (70 * n1) + (Myfact - 70) * n2
Case Is <= 200
How_Many = (70 * n1) + (10 * n2) + (Myfact - 80) * n3
Case Is > 200
How_Many = (70 * n1) + (10 * n2) + (120 * n3) + (Myfact - 200) * n4
End Select
My_Facture = How_Many
''''''''''''''''''''''''''''''''''''''''
End Function
الملف مرفق