VB.NET Date conversion

DateTimePicker1.Format = DateTimePickerFormat.Custom
 DateTimePicker1.CustomFormat = "MM-dd-yyyy"
 DateTimePicker1.Text = Now
MsgBox(DateTimePicker1.Text)
 DateTimePicker1.CustomFormat = "dd-MM-yyyy"
 'DateTimePicker1.Text = Now
 MsgBox(DateTimePicker1.Text)


Try this

By using format function, suppose your regional settings is (system date is the format of mm/dd/yyy)
Dim s1 As String
s1 = System.DateTime.Today.Date ''//format of sys date mm/dd/yyyy
s1 = Format(CDate(s1), "dd /MM/ yyyy")
MsgBox(s1)
i think it is useful.

Its better to retrieve the System date format first and system date seperator.

On the basis of that retrieve the vales of Day, Month and year.

Now you are having everything related to date.

You can generte any type of formated date.

I am using this and satisfied.

Regards,
Sanjay

Just write following code
DateTimePicker1.CustomFormat = "dd-MM-yyyy"

I think it will work
Date.Today.Tostring("dd/mm/yyyy")

    MsgBox(System.DateTime.Today.Day & "-" & System.DateTime.Today.Month & "-" & System.DateTime.Today.Year)

Go to Control panel >> Regional and Language settings >Customized>Change Time Format(hh/mm/ss/tt) and Short Data Format (dd/MM/yyyy)..if your using Windows 7..just try to do as the same.

Once the data is converted into Date type, then you can work out any format of information from the variable

Code
dim strDate() as string = "MM/dd/yyyy".split("/")
dim myDate as new Date (strDate(2), strDate(0), strDate(1))
 
msgbox(format (myDate, "dd/MM/yyyy"))