How to get Android date and time

[Qbetechmark]

Does anyone know how to get android system's date and time, to be show in a label ?

My code is :

Dim now As Long
Dim dt As String
DateTime.DateFormat = "dd MMM yyyy"
dt = DateTime.Date(now)
DateTime.DateFormat = "hh:mm:ss"
dt = dt & CRLF & DateTime.Time(now)
Label4.Text = dt


Label4 is always showing 01-01-1970 07:00:00 , I'm expect it shows 07-Mar-2012 12:35.

 

[NeoTechni]

use datetime.now not now.

 

[Stepdragon]

DateTime.DateFormat="hh:mm:ss"
Msgbox(DateTime.Date(DateTime.now),"")

EDIT: aww, beaten to it

 

[NeoTechni]

Only by <2 minutes.

The good thing is you had the desire to help.
I love that about this place.

 

[nfordbscndrd]

You might also want to look at this page in the Documentation Wiki.

 

[Stepdragon]

The good thing is you had the desire to help.

I was raised at VBForums.com... If I know the answer, I'll write it out as clear as I can so the next person will see.

 

[Qbetechmark]

Thank you for your help.

Finally I solve my problem like this :

Dim now As Long
Dim M, H As String

   DateTime.DateFormat = "dd MMM yyyy" 
   Label4.Text = DateTime.Date(DateTime.now) 
        'Because I don't know how to make DateFormat = "hh:mm", 
        'when I set like that, it is always shown seconds too.
        'So I use this code :
   H = DateTime.GetHour(DateTime.Now) 
   M = DateTime.GetMinute(DateTime.Now)
   Label5.Text = H & ":" & M

 

[Ricky D]

To show the time you need to use DateTime.TimeFormat = "hh:mm"

DateTime.TimeFormat = "hh:mm"
Label4.Text = DateTime.Time(DateTime.Now)

regards, Ricky