• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

textboxta güncel tarih ve saat

Çalışan bir saat için,

Kod:
Private Sub UserForm_Activate()
Do
DoEvents
TextBox1 = Format(Now, "dd.mm.yyyy - hh:mm:ss")
Loop
End Sub
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
End
End Sub
 
sn. anemos ben arkadaşları forumda aramaya/dolaşmaya alışsınlar diye linkteki kodu buraya yapıştırmamıştım. :hey:
 
Geri
Üst