Error formatting dates

I just created a new WinApp project and add a DTPicker, 2 text Control, 3 labels, a Button and this code :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Label3.Text = Format(DateAdd(DateInterval.Day, Val(TextBox1.Text), dtpicker1.value), "dd/mm/yyyy")

End Sub

That’s all !!

When it executes and, for example, add 10 days from today, 11/18/2005, it retrieves 07/28/2005. It’s a Bug

Charlie

Answer this question

Error formatting dates

Denis Ruckebusch
Thanks !

Charlie
HannesCoetzee
Hello Charlie,

in order to display the month, you need to use the uppercase MM. The lowercase mm refers to the minutes. Here's an example:

Dim d As Date = DateAdd(DateInterval.Day, 10, New Date(2005, 11, 18))

MessageBox.Show(Format(d, "dd/MM/yyyy").ToString())

This will properly display "28/11/2005"

HTH

Antoine
Visual Basic Team
evaleah
The changes were made to align better with the .NET formatting specification. See http://msdn.microsoft.com/library/default.asp url=/library/en-us/vbcn7/html/vaconformatchangesinvbnet.asp

Here's the definition of the formats for date/time:
http://msdn.microsoft.com/library/default.asp url=/library/en-us/vblr7/html/vafmtuserdefineddateformats.asp

Antoine
Visual Basic Team
Penn Wallace
Thank you !!
Why don’t you leave mm for month, like vb6

Charlie
Error formatting dates

Answer this question