İlk Once Form'a 2 Tane Text Koyuyoruz 1.si Tarih 2.si Saat ve 1 tane Timer Koyuyoruz ve Aşağıdaki kodu Forma Yapıştırıyoruz..

Kod:
Private Sub Form_Load() Timer1.Interval = 100 End Sub Private Sub Timer1_Timer() Text1 = Date Text2 = Time End Sub

__________________