How to show Running Current Date and Time in VB.NET