Simple function to convert a date time value to Hebrew text string.
Public Function getHebDate(ByVal s As DateTime) As String
Dim HebrewCulture as System.Globalization.CultureInfo
HebrewCulture = System.Globalization.CultureInfo.CreateSpecificCulture( "HE-il")
HebrewCulture.DateTimeFormat.Calendar = New System.Globalization.HebrewCalendar()
Dim text as String
text = s.ToString( "dd MMM yyyy", HebrewCulture)
Return text
End Function
Sunday, October 13, 2013
Subscribe to:
Post Comments (Atom)
No comments:
Post a Comment