Se vuoi faciliate il tutto usa

text1.text = Date & "-" & Time

cosi segna data e ora il formato è il seguente

15.56.36 del 06/09/2003