Thủ Thuật Access

Thế Giới Thủ Thuật với Access

Tính số ngày trong tháng

Posted by Noname on 10.07.2010

Hỏi: Tôi muốn biết trong tháng có bao nhiêu ngày thì làm thế nào
Đáp: 

Hàm đếm số ngày trong tháng:

Code:
Function totalDayOfMonth(m As Integer, y As Integer) As Integer

totalDayOfMonth = Day(DateSerial(y, m + 1, 0))
End Function

m: tháng cần theo dõi
y: năm cần theo dõi
Kết quả trả về số ngày trong tháng cần theo dõi

Ví dụ:

Private Sub Command0_Click()
Dim m As Integer, y As Integer
m = 2
y = 2010
MsgBox “thang ” & m & ” nam ” & y & ” co ” & totalDayOfMonth(m, y) & ” ngay “
End Sub

kết quả là 28 ngày!
Xem demo Download

____________________________________________________________________________________
Thảo luận thêm: http://thuthuataccess.co.cc/forum

Một phản hồi to “Tính số ngày trong tháng”

  1. Tâm said

    minh mới bắt đầu làm quen với access có chút vấn đề nhờ các ban giúp nhé:
    mính có 01 bài tập “‘Quản lý việc mượn và trả sách trong thư viện’ trong đó có yêu cầu tạo Query truy xuất thông tin các độc giả mươn sách trên 30 ngày nhưng chưa trả. trong đó:
    số ngày mươn sách được tính=ngày hiện tại (của hệ thống máy tính)- Ngày mượn sách (Trong đó ngày mượn sách đã có kiểu Short date). các bạn giúp minh nhe!

Gửi phản hồi

Mời bạn điền thông tin vào ô dưới đây hoặc kích vào một biểu tượng để đăng nhập:

WordPress.com Logo

Bạn đang bình luận bằng tài khoản WordPress.com Log Out / Thay đổi )

Twitter picture

Bạn đang bình luận bằng tài khoản Twitter Log Out / Thay đổi )

Facebook photo

Bạn đang bình luận bằng tài khoản Facebook Log Out / Thay đổi )

Google+ photo

Bạn đang bình luận bằng tài khoản Google+ Log Out / Thay đổi )

Connecting to %s

 
%d bloggers like this: