thanhhau828 > 17-05-13, 09:40 AM
Xuân Thanh > 17-05-13, 10:43 AM
Function TinhThoiGian(Ngay As Date, SoNam As Integer, SoThang As Integer, SoNgay As Integer) As Date
Dim NgayKetThuc As Date
NgayKetThuc = DateAdd("yyyy", SoNam, Ngay)
NgayKetThuc = DateAdd("m", SoThang, NgayKetThuc)
NgayKetThuc = DateAdd("d", SoNgay, NgayKetThuc)
TinhThoiGian = NgayKetThuc
End Function
thanhhau828 > 17-05-13, 01:14 PM
Xuân Thanh > 17-05-13, 02:50 PM
Private Sub cmd_Tinh_Click()
Dim NgayKetThuc As Date
NgayKetThuc = DateAdd("yyyy", Nam, Ngaybatdau)
NgayKetThuc = DateAdd("m", Thang, NgayKetThuc)
NgayKetThuc = DateAdd("d", Ngay, NgayKetThuc)
MsgBox NgayKetThuc
End Sub
thanh_triet09 > 18-05-13, 03:40 PM
thanhhau828 > 24-05-13, 08:00 AM
Minh Tiên > 17-06-13, 05:09 PM
khonggianviet > 04-09-23, 12:48 PM
(17-05-13, 02:50 PM)Xuân Thanh Đã viết: Trên form có 4 textbox : NgayBatDau, Nam, Thang, Ngay thì
Mã PHP:Private Sub cmd_Tinh_Click()
Dim NgayKetThuc As Date
NgayKetThuc = DateAdd("yyyy", Nam, Ngaybatdau)
NgayKetThuc = DateAdd("m", Thang, NgayKetThuc)
NgayKetThuc = DateAdd("d", Ngay, NgayKetThuc)
MsgBox NgayKetThuc
End Sub
ongke0711 > 07-09-23, 11:27 AM
(04-09-23, 12:48 PM)khonggianviet Đã viết: Cái này dùng để nhập dữ liệu và tính toán trên Form, vậy tính toán ở trong table thì như nào vậy ad. Ví dụ, mình có các trường
[Thoihantamgiamdieutra] - mình nhập số liệu 2 tháng 26 ngày
[Giahantamgiamdieutra] - nhập 2 tháng
[Ngayhethantamgiamdieutra] sẽ được dùng hàm gì để tính ra.
Rất mong ad trợ giúp
khonggianviet > 07-09-23, 05:08 PM