Tekil Mesaj gösterimi
  #1  
Alt 15 June 2009, 15:22
Yorgun Yürek - ait Kullanıcı Resmi (Avatar)
Yorgun Yürek Yorgun Yürek isimli Üye şimdilik offline konumundadır
♥ GüLerken AğLadığını,MutLu OLanLar BiLmez
 
Kayıt Tarihi: 3 March 2009
Mesajlar: 35,077
Konular:
Aldığı Beğeni: 0 xx
Beğendiği Mesajlar: 0 xx
Standart Hangi Gün Doğduğunuzu ve Kaç Günlük Olduğunuzu Öğrenin

Hangi Gün Doğduğunuzu Öğrenin
Önce yapmamız gereken 1 textbox, 1 label ve 1 buton
Button_Click olayına
---------------
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Label1.Text = FormatDateTime(TextBox1.Text, DateFormat.LongDate)

End Sub
---------------
proğramı çalıştırıp texte doğum gününüzü gün/ay/yıl (28/01/1991) olarak yazıp butona basarak hangi günde doğduğunuzu öğrenebilirsiniz...
_____________________________
Kaç Günlük Olduğunuzu Öğrenin
Burada yapmamız gereken 2 textbox ve 1 buton
Button_Click olayına
---------------
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim tarih1, tarih2 As Date
tarih1 = "#" & TextBox1.Text & "#"
tarih2 = "#" & TextBox2.Text & "#"
MsgBox(DateDiff(DateInterval.Day, tarih1, tarih2) & " günlüksünüz")
End Sub
---------------
Proğramı çalıştırıp 1.texte doğduğunuz günü, 2.texte bugünün tarihini yazıp butona tıklamanız yeterli...Kaç gündür hayatta olduğunuzu öğrenmek için...
Alıntı ile Cevapla