Textbox'taki tarih ile günün tarihini karşılaştırma

[alipinar]

Merhaba arkadaşlar.
Formlar üzerinde çalışıyorum. Formdaki TextBox36'ya personelin terfi alacağı tarih geliyor (30.05.2006 gibi)
Bu textbox'ın yanına initialize'de visible özelliği False yapılmış uyarı mesajı taşıyan Label79 var.
Form üzerindeki ComboBox'tan personeli seçince eğer personelin terfi zaöanı gelmiş ise uyarı yazısının aktif olmasını istiyorum. Aşağıda yazdığım kodda yaznızca günü dikkate alıyor.
Nerede hatam var? Yardımlarınız için teşekkür ederim.

If Format(Now, "dd.mm.yyyy") > Format(TextBox36.Value, "dd.mm.yyyy") Then Label79.Visible = True

 

[cyberwolf1980]

alipinar, format yerıne sunu bı denermısın

If ....value > ...value2 then label79.visible = True Else exit sub

yada bı ornek gonderebılırmısın bı bakalım ??

 

[Korhan Ayhan]

Selamlar,

Ben aşağıdaki şekilde denedim çalıştı.

If Date >= CLng(CDate(TextBox36)) Then Label79.Visible = True

 

[alipinar]

Sayın CostControl teşekkür ederim. Sayın Cyberwolf1980 size de ilginizden dolayı teşekkür ederim. :hey: :mutlu:

 

[atöz]

Sayın CostControl,
Aşağıdaki kodlamada CLng ve Cdate komutlarının anlamlarını açıklayabilirmisiniz.
Çok teşekkürler.


CLng(CDate(TextBox36))

 

[Korhan Ayhan]

Selamlar,

Textbox adındanda anlaşılacağı gibi metin kutusu anlamına gelmektedir. Doğal olarakta siz bu kutucuğa tarih yazdığınızda excel bunu metin olarak algılamaktadır. Bunun önüne geçmek için sorgularda bu tü ifadeler kullanılır.

Clng ifadesi uzun sayıları temsil eder. (Excel VBA yardım menüsü)
CLng Long -2,147,483,648 to 2,147,483,647 sayı aralığı.

Cdate ifadesi ise kullanılan kutucuğun tarih olarak algılanmasını sağlar.

Bu türde anlamını bilmediğiniz ifadelerde excel yardım menüsünü kullanın bazıları örneklerle açıklanmıştır.