Hàm đổi ngày ra thứ trong Access

[roro]

Bác nào biết hàm đổi ngày ra thứ trong Access thì chỉ giúp cho em cái.

vd: NgayRaThu(Now())= Wednesday

Cám ơn nhiều!
roro

[KingsCat]

Dùng hàm Format(Now(),"dddd") thử xem

[minhpn]

'Thử hàm này xem sao

Public Function ReadDate(D As Date) As String
Dim NgayThu, Ngays, Thang, Nam As Integer
Dim tmp As String
Dim Thus As String

NgayThu = Weekday(D)
Ngays = Day(D)
Thang = Month(D)
If Len(Trim(Thang)) < 2 Then
tmp = "0" & Thang
Else
tmp = Thang
End If
Nam = Year(D)
Select Case NgayThu
Case 1
Thus = "Chñ NhËt"
Case 2
Thus = "Thø Hai"
Case 3
Thus = "Thø Ba"
Case 4
Thus = "Thø T­"
Case 5
Thus = "Thø N¨m"
Case 6
Thus = "Thø S¸u"
Case 7
Thus = "Thø B¶y"
End Select
ReadDate = Thus & ", Ngµy " & IIf(Len(Ngays) > 1, Trim(str(Ngays)), "0" & Trim(str(Ngays))) & " th¸ng " & tmp & " n¨m " & Trim(str(Nam))
End Function

[roro]

Thì ra nó có hàm WeekDay.
Cám ơn bác nhiều!

[nguyenvudh]

Mình mới học thôi, twj học mà. có gì xin cáo lỗi.


- Bạn lick vào ô text và viết mã sau

= choose(weekday(date()),"Chủ nhật","Thứ hai","Thứ ba","Thứ tư",.."Thứ bảy")

=======> thử nhé!