How to get Android date and time

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

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

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