Code:
Label1.Text = Now.ToString("HH:mm")
use lowercase hh instead of HH if you want a 12 hour clock instead of 24 hour clock.