convert date to a number with vb.net

[yulyos]

how can i convert date to a number with vb.net

example in vb6:

Private Sub Form_Load()
Text1.Text = Date
End Sub
Private Sub Command1_Click()
Dim num
num = Format(Text1.Text, "0")
Text2.Text = num
End Sub


thanking you in advance

From:
[email protected]

[MrPolite]

what is the output of that? I dont have VB6, it would be helpful if you give an example of the current date + the output on textbox2

[yulyos]

example of number:

22/10/2003 = 37916

[hellswraith]

How are those numbers related?

[yulyos]

every number represent a date

to convert the date of Today to a number:
TextBox1.Text = Date.Today.ToOADate


to convert the number to date:
Dim num As Double
num = Val(Trim(TextBox1.Text))
TextBox2.Text = Format(Date.FromOADate(num),"dd/MM/yy")

[skid2964]

Convert a date entered into TextBox1, into a number ...


TextBox2.Text = Date.Parse(TextBox1.Text).ToOADate

[yulyos]

To skid2964

excellent answer

thank you very much