Formatting Date

  • Thread starter Thread starter Shanti
  • Start date Start date
S

Shanti

2 or 3 days back there was a thread on displaying date in a desired format.
Someone suggested using Format function and reported to be not working by
the thread originator. Unfortunately, I lost that thread from my Outlook
Express (I don't know why).

I also faced same problem and I use following code to display it in
DD-MMM-YYYY format. Same technique may be used for other formats:

Dim dtNow As DateTime, sOut As String
Dim sMonth() AS String = ("JAN", "FEB", "MAR", "APR", "MAY", "JUN", "JUL",
"AUG", "SEP", "OCT", "NOV", "DEC")

dtNow = System.DateTime.Now
sOut = Str(dtNow.Day).Trim() & "-" & sMonth(dtNow.Month - 1) & "-" &
Str(dtNow.Year).Trim()

Format() is one of widely used function from Quick Basic times. Its
inclusion in CF will be highly appreciated by the CF community. Memory
capacities of PPC is increasing very fast. Adding new features to CF
shouldn't be a problem.

ThanQ...
 
Hi,
I don't seem to have a problem with format

Dim sd As String
sd = Format(System.DateTime.Now, "dd/MMM/yyyy")
sd = Microsoft.VisualBasic.Format(Now, "dd/MMM/YYYY")

works fine for me - what appears to be the problem?

Pete
 
May be something like this:

Dim sd As String
Dim d as Date = System.Date.Now
sd = d.ToString("dd/MMM/yyyy")
 
Back
Top