programda sorun çıkarmazsa inş. dediğiniz gibi yapacaz mecbur ilginiz için teşekkürler

Malesef işime yaramadı sistem saatini o şekilde değiştirdigimde kullanmış oldugumuz bazı programlar hata veriyor bunun farklı ßir çözümü nasıl olabilir

Güncel

text kutusunun tarih formatını sen oluştur.tarih girildikten sonra.

Ben bu şekilde yaptım oldu. sende dene istersen.

Private Sub Form_Load()
Text1.Text = Format(Date, "dd_mm_yyyy")
End Sub

saat formatını ayarlamak istersen aşagıdaki gibi yazarsın.
Private Sub Timer1_Timer()
Text2.Text = Format(Time, "hh_mm_ss")
End Sub