label de tarih ve saat

[cobanoglu]

Label10 = FormatDateTime(Now, vbLongDate) & " " & FormatDateTime(Now, vbLongTime)
label de yukarıdaki kod la tarihi ve saati yazdırmaya çalıştım ama açılışta yazıyor orda kalıyor ne yapmam lazım bi yardımcı olursanız sevinirim

 

[Levent Menteşoğlu]

Kalması gayet normal, devamlı çalışan bir saat için bir timer kodu kullanmak gerekir, ama bence en ideal çözüm eğer saniye önemli değilse bir statusbar kullanmaktır, böylece sürekli çalışan bir timer koduna ihtiyaç duymazsınız.

 

[asd_demir]

BEN TARİH MESELESİNİ VE SAAT MESELESİNİ FORMA YAZDIRMAK İÇİN FORMUN BAĞLI OLDUĞU EXCEL KİTABINA BİR SAYFA AÇTIM ADINI DA DATE KOYDUM SONRA A1 HÜCRESİNE =ŞİMDİ() YAZDIM BU HÜCREDE TARİH ÇIKAR. SONRA FORMA BİR TEXTBOX KOYDUM BUN İÇİNEDE KOD SAYFASINA AYNEN BUNU YAPIŞTIR.

Private Sub UserForm_Initialize()
TIMER.RowSource = "DATE!A1:A1"
TIMER.ColumnCount = True
End Sub

FAKAT TEXTBOX KUTUSUNUN ADINI TIMER OLARAK DEĞİŞTİR. YOKSA KOD TANIMAZ.

 

[Levent Menteşoğlu]

BEN TARİH MESELESİNİ VE SAAT MESELESİNİ FORMA YAZDIRMAK İÇİN FORMUN BAĞLI OLDUĞU EXCEL KİTABINA BİR SAYFA AÇTIM ADINI DA DATE KOYDUM SONRA A1 HÜCRESİNE =ŞİMDİ() YAZDIM BU HÜCREDE TARİH ÇIKAR. SONRA FORMA BİR TEXTBOX KOYDUM BUN İÇİNEDE KOD SAYFASINA AYNEN BUNU YAPIŞTIR.

Private Sub UserForm_Initialize()
TIMER.RowSource = "DATE!A1:A1"
TIMER.ColumnCount = True
End Sub

FAKAT TEXTBOX KUTUSUNUN ADINI TIMER OLARAK DEĞİŞTİR. YOKSA KOD TANIMAZ.

Lütfen bir kod önerirken daha dikkatli olalımki yanıltıcı olmayalım. Textboxun rowsource özelliği yoktur.