|
|
Viết bởi: phuongyen 24-03-15, 09:57 AM Chuyên mục: Forms - Bài trả lời (2) |



|
|
Viết bởi: tronghieu9792 22-03-15, 10:33 AM Chuyên mục: Thủ thuật VBA - Bài trả lời (1) |
|
|
Viết bởi: thunga25 21-03-15, 05:49 PM Chuyên mục: Forms - Bài trả lời (10) |
|
|
Viết bởi: phatsp 19-03-15, 09:22 PM Chuyên mục: Query - Bài trả lời (5) |
|
|
Viết bởi: Xuân Thanh 19-03-15, 04:49 PM Chuyên mục: Thư Viện Hàm - Bài trả lời (43) |
Function Ngaycuathang(ByVal bDate As Date) As Byte
Dim Namnhuan As Boolean
Dim NGAY As Byte, Thang As Byte
Namnhuan = ((Year(bDate) / 4 - Int(Year(bDate) / 4)) = 0)
Thang = Month(bDate)
If Thang = 4 Or Thang = 6 Or Thang = 9 Or Thang = 11 Then
NGAY = 30
ElseIf Thang = 2 Then
If Namnhuan Then
NGAY = 29
Else
NGAY = 28
End If
Else
NGAY = 31
End If
Ngaycuathang = NGAY
End Function
Function NgayCuoiThang(ByVal bDate As Date) As Date
Dim NGAY As Byte
NGAY = Day(bDate)
NgayCuoiThang = bDate + (Ngaycuathang(bDate) - NGAY)
NgayCuoiThang = Format(NgayCuoiThang, "dd/mm/yyyy")
End Function
| Chủ đề Mới nhất |
| nv casino — практический ... -Chuyên mục: MS Word-Đăng bởi lần cuối: MichaelHieta-6 Giờ trước- » Bài trả lời: 0- » Lượt xem: 1 |
| Peptide research and refe... -Chuyên mục: MS Word-Đăng bởi lần cuối: CarlosDug-10 Giờ trước- » Bài trả lời: 0- » Lượt xem: 1 |
| SkfterjeadS -Chuyên mục: MS Word-Đăng bởi lần cuối: Danielapams-11 Giờ trước- » Bài trả lời: 0- » Lượt xem: 3 |
| tripscan — Почему предска... -Chuyên mục: MS Word-Đăng bởi lần cuối: NicholasAxiot-Hôm nay, 06:38 AM- » Bài trả lời: 0- » Lượt xem: 3 |
| Quản Lý Phòng Khám Tư Nhâ... -Chuyên mục: Thư Viện Ứng Dụng-Đăng bởi lần cuối: Le Duc-24-09-26, 12:03 AM- » Bài trả lời: 34- » Lượt xem: 8,368 |
| Tạo Form không có khung v... -Chuyên mục: Thư viện thủ thuật-Đăng bởi lần cuối: ongke0711-05-09-26, 10:12 PM- » Bài trả lời: 0- » Lượt xem: 158 |
| Tải hàng loạt hóa đơn PDF... -Chuyên mục: Thành viên giúp nhau-Đăng bởi lần cuối: dotrung-16-08-26, 10:29 PM- » Bài trả lời: 6- » Lượt xem: 164 |
| Quản lý kho bằng Accesss -Chuyên mục: Thảo Luận Access-Đăng bởi lần cuối: AKBui-09-08-26, 12:52 AM- » Bài trả lời: 77- » Lượt xem: 8,163 |
| Tra cứu Mã số thuế - phần... -Chuyên mục: Share Code-Đăng bởi lần cuối: ongke0711-03-07-26, 02:10 PM- » Bài trả lời: 0- » Lượt xem: 185 |
| Đồ cổ đây - một chút hoài... -Chuyên mục: Góc ảnh-Đăng bởi lần cuối: Noname-12-06-26, 09:21 AM- » Bài trả lời: 1- » Lượt xem: 670 |
| Diễn đàn Thống kê |
|
» Thành viên: 0 » Thành viên mới nhất: Không có ai » Các chủ đề diễn đàn: 0 » Các bài viết diễn: 0 Thống kê đầy đủ |