Gün Hesaplayıcı Yapalım

Bu derste hangi gün doğduğunuzu ve ne zaman doğum gününüz olduğunu hesaplayan küçük bir uygulama yapalım.

Bu derste hangi gün doğduğunuzu ve ne zaman doğum gününüz olduğunu hesaplayan küçük bir uygulama yapalım.

Aşağıdaki resim gibi görsel hazırlıyoruz. Yani formumuza 1 adet textbox, 2 adet buton, 2 adet label ekliyoruz.

Labellerin text özelliğini ekranda görüldüğü gibi yazıyoruz.




Public class form1



  Dim d_tarih, gun



button1_click



        Do

            d_tarih = TextBox1.Text

        Loop While Not IsDate(d_tarih)

        Select Case Weekday(d_tarih)

            Case 1 : gun = "Pazar"

            Case 2 : gun = "Pazartesi"

            Case 3 : gun = "Salı"

            Case 4 : gun = "Çarşamba"

            Case 5 : gun = "Perşembe"

            Case 6 : gun = "Cuma"

            Case 7 : gun = "Cumartesi"

        End Select

        MsgBox(gun & " Günü Doğmuşsunuz", MsgBoxStyle.Information, "SONUÇ")



button2_click



    d_tarih = TextBox1.Text

        If d_tarih <= Now.Date Then

            MsgBox("Daha geçerli bir tarih giriniz.")

        Else

            Do

            Loop While Not IsDate(d_tarih)

            Select Case Weekday(d_tarih)

                Case 1 : gun = "Pazar"

                Case 2 : gun = "Pazartesi"

                Case 3 : gun = "Salı"

                Case 4 : gun = "Çarşamba"

                Case 5 : gun = "Perşembe"

                Case 6 : gun = "Cuma"

                Case 7 : gun = "Cumartesi"

            End Select

            MsgBox(gun & " Günü Doğum Gününüz.", MsgBoxStyle.Information, "SONUÇ")

        End If



Hepsi bu kadar.
  • Etiketler;
Yorum Yaz

Yorum yazabilmek için üye girişi yapmanız gerekiyor!

ben daha bir çocuğum ama böyle şeylere merakım var işallah yakın zaman da öğrenirim benim için iyi olmuş eline sağlık
:agla::kirp::sasir:
çok güzel bir program ben yeni üyeyim bunların vb5.0 ının daha çok olması lazım.buralarda daha çok vb6.0 var ama genede güzel bir program
ellerine saglık . güzel olmuş. acaba basicte kullanılan temel komutlarıda liste şeklinde yoolayabilirmisiz şimdiden tşk ederim
TEMELDEN KOMUTLARI EN KOLAY NE ŞEKİLDE ÖÐRENEBİLİRİZ
visual basice yeni başlayanlar için de program örnekleri olursa daha iyi olur
BEN SİTEYE YENİ ÜYEYİM TEMELDEN KOMUTLARI EN KOLAY NASIL ÖÐRENEBİLİRİZ ŞİMDİDEN TEŞ.
visual basice yeni başladım hiç bi bilgim yok bunun için çok acil yardım lazım lüften bana yardım edin lüftennnnnnnnnnnn :uzul:
:agla: Abi bunu kaydediyorum ama hala yazilar cikiyor yaw yardimci olun tesekurler
ben sizin kadar basite indirilmiş birşekilde anlatan biriyle daha karşılaşmadım teşekkür ederim.
slm güzel kodlar ama bu kod galiba başka bir dil için basicte çalışmadı textbox1 felan ama biraz dzenledim çalıştı kodlar galiba C# için
çok guzel olmuş ellerıne sağlık dha fazla bılgı ve yenı projele gonderrı bizi bilgilendiriisen sevınıırm :gul:
biraz daha ayrınıtılı olsaydı benim gibi yeni başlayanlar için daha faydalı olurdu
ben sizin kadar basite indirilmiş birşekilde anlatan biriyle daha karşılaşmadım teşekkür ederim.
bencede bende yanı baslıom biraz daha ayrıntı olursan ıı olur pls
iyi bir paylasım mantıgını anlatırmsnız:s
merhaba arkadaşalar bu siteye kütüphane takip programının kodlarınıda eklermisiniz lütfen şimdiden teşekkürler.. (:

Yukarı Git