Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Help] viết dùm mình code tính giá điện với
#1
Rainbow 
Đề là:
Nếu SốKW <=50 giá tính 500đ/kw.
Nếu 50< SốKW <= 150 thì 50 số đầu tính 500đ/kw còn lại tính 600đ/kw.
Nếu 150< SốKW <= 250 thì 50 số đầu tính 500đ/kw và 100 số tiếp theo tính giá 600đ/ KW còn lại tính 800đ/kw.
Nếu SốKW >250 thì 50 số đầu tính 500đ/kw và 100 số tiếp theo tính giá 600đ/ KW và 100 tiếp theo tính 800đ/kw số còn lại tính 1000đ/kw.
giúp mình với các bạn
Chữ ký của chunam Xin chào, mình là chunam, Tham gia http://thuthuataccess.com/forum từ ngày 13-07 -12.
Reply
Những người đã cảm ơn
#2
Mã:
Function TienDien(SoDien As Double) As Double
    Dim Tien As Double
    If IsNumeric(SoDien) = False Then
        MsgBox "Phai la so", , "Thong Bao"
        Exit Function
    Else
        If SoDien <= 50 Then Tien = SoDien * 500
        If 50 < SoDien <= 150 Then Tien = 25000 + (SoDien - 50) * 600
        If 150 < SoDien <= 250 Then Tien = 85000 + (SoDien - 150) * 800
        If SoDien > 250 Then Tien = 165000 + (SoDien - 250) * 1000
    End If
    TienDien = Tien
End Function
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn Noname , nhunguyet0103 , gialilama


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  [Help] Giúp tính tổng số lượng theo mã nam8384 2 113 22-06-17, 04:13 PM
Bài mới nhất: nam8384
  Nhờ sửa lỗi # Error khi tính toán trong Query tieu_ngao 13 460 18-05-17, 06:52 AM
Bài mới nhất: tieu_ngao
  Hướng Dẫn Demo Tính tồn kho ( rất chi tiết) maidinhdan 45 5,113 12-04-17, 11:35 PM
Bài mới nhất: tranthanhan1962
  [Hỏi] PHÉP TÍNH TỔNG CỦA 2 QRERY xa.nguyen 1 190 22-03-17, 03:01 AM
Bài mới nhất: tranthanhan1962
  Giúp tính tồn kho theo ngày ledangvan 12 738 16-03-17, 03:35 PM
Bài mới nhất: tranthanhan1962

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ