Advertise with us

Control Panel Forum Hosting Help ASP.NET 4.5 & SQL 2012 Hosting Resources Notice

Home » Resources » Ham doi Nam Duong Lich sang Am Lich

ASP.NET	ADO.NET	Web Services	Remoting	Visual Studio 2005
Error Bank	Interview Questions	Tips & Tricks	XML	HTML
Jscript/Javascript	IIS	Windows		General

Submit Resource or code snippet ... and get surprise gifts ASP.NET web hosting

Win Digital camera, ASP.NET Books, Free softwares!!

Ham doi Nam Duong Lich sang Am Lich

23 Mar, 2008

Author: Minh Ly
TTTH

Summary
Example: 2008 --> Mau Ty

.NET Classes used :

Public Function Duong_lich_Am_lich(ByVal pNamDL As Integer) As String
Dim Can, Chi As String
Can = Choose((pNamDL Mod 10) + 1, "Canh", "Tân", "Nhâm", "Quí", "Giáp", "?t", "Bính", "Ðinh", "M?u", "K?")
Chi = Choose((pNamDL Mod 12) + 1, "Thân", "D?u", "Tu?t", "H?i", "Tý", "S?u", "D?n", "Mão", "Thìn", "T?", "Ng?", "Mùi")
Return Can & " " & Chi
End Function

Feedbacks about this page from members:

??? - Vinny Da

function nay de lam gi vay?

(27 Mar 2008)

Submit Feedback View All Feedbacks

Total members: 250791
Average new registrations per day (in last 7 days): 10

New Registration: Open

Register Now

Talk to Webmaster
Tony John

Facebook
Google+
Twitter