mcCloud is coming soon!!!!
Dim dat As DateTime = DateTime.Now Dim hr As Integer = dat.Hour Dim sec As Integer = dat.Second Dim month As Integer = dat.Month