Xin giúp đỡ về hàm đọc ngày tháng

[helloworld]

Các bác chỉ giúp em cách gíải quyết vấn đề này đc ko a:
e có 3 feilds Nam Thang Ngay. Em muốn khi năm = 0, tháng=1,ngày =3 thì ct đọc là 1 tháng 3 ngày,hoặc khi năm = 2, tháng = 1, ngày=0 thì đọc 2 năm 1 tháng....
Em mới nghiên cứu access còn gà lắm.Mong các các giúp đỡ.Em cảm ơn nhiều lắm:dance2:

 

[nguoiconxunui]

đơn giản thì xây dựng một function 3 biến, đại loại
public function read(y,m,d)
....
end function
với các biến y,m,d lấy từ recordSource

 

[ng2hien]

Function DocSoNgayThangNam(nam As Integer, thang As Integer, ngay As Integer) As String
Dim str As String
If (nam <> 0) Then str = nam & " nam "
If (thang <> 0) Then str = str & thang & " tháng "
If (ngay <> 0) Then
str = str & ngay & " ngày"
ElseIf (str = "" And ngay = 0) Then
str = "0 ngày"
End If

DocSoNgayThangNam = str
End Function

Khi cần sử dụng hàm trong query thì gọi, ví dụ(QBE)

ThoiGianLamViec: DocSoNgayThangNam( years , months , days )