Dear Sir.

I use following codes to to convert string to date.
In messagebox it displays correct date with format but in textbox it displays only #12:00:00 AM #
How to send date to textbox1 from variable mydate
Please help

Dim mydate As Date
        Dim dateString = "31/12/2009"
        Dim formats As String() = {"dd/MM/yyyy", "dd/MM/yyyy"}
        Dim dateObject As DateTime = DateTime.ParseExact(dateString, formats, System.Globalization.CultureInfo.InvariantCulture, Globalization.DateTimeStyles.NoCurrentDateDefault)
        MessageBox.Show(dateObject.ToString("dd/MM/yyyy"))
        Me.TextBox1.Text = mydate

Hi,

If you modify the code with following change,it will work.

Dim mydate As Date
        Dim dateString = "31/12/2009"
        Dim formats As String() = {"dd/MM/yyyy", "dd/MM/yyyy"}
        Dim dateObject As DateTime = DateTime.ParseExact(dateString, formats, System.Globalization.CultureInfo.InvariantCulture, Globalization.DateTimeStyles.NoCurrentDateDefault)
        MessageBox.Show(dateObject.ToString("dd/MM/yyyy"))
[B]        Me.TextBox1.Text = mydate.ToString()[/B]

But few questions;

1) mydate and dateObject have been used for different purposes?
2) If so, why not format the dateObject also?

Thank you

Hi,

The reason for "mydate" is giving time is because it was not assigned to any date value.

Here is the updated code;

Dim mydate As Date
        Dim dateString = "31/12/2009"
        [B]mydate = DateTime.Now[/B]
        Dim formats As String() = {"dd/MM/yyyy", "dd/MM/yyyy"}
        Dim dateObject As DateTime = DateTime.ParseExact(dateString, formats, System.Globalization.CultureInfo.InvariantCulture, Globalization.DateTimeStyles.NoCurrentDateDefault)
        MessageBox.Show(dateObject.ToString("dd/MM/yyyy"))
        [B]Me.TextBox1.Text = mydate.ToString("dd/MM/yyyy")[/B]

Let us know if this helps.

Thank you.

i dont really understand.

me.textbox.text = formatdatetime$(now(), dateformat.shortdate)

prossible dateformats: shortdate, longdate, generaldate, longtime, shorttime.

another method i use:

vb6.format$(now(), "YYYYMMDD")
This article has been dead for over six months. Start a new discussion instead.