Slider

İlgi Çeken Videolar

Sağlık

Teknoloji

Sinema

Televizyon

Ne Nedir?

En5 Konular

» » » Doğum Günü Hesaplama Programı



Bu dersimizde visual basic ile doğum günü hesaplama  programı yapacağız.

Forma eklemeniz gereken araçlar:

1 tane Button
4 tane Label
4 tane TextBox

Tasarımı aşağıdaki gibi yapabilirsiniz.

Doğum Günü Hesaplama Programı

Kod:

Public Class Form1
    Dim a, b, c, g As Integer
    Dim d, f As String


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        a = Val(TextBox1.Text)
        b = Val(TextBox2.Text)
        c = Val(TextBox3.Text)
        If b = 1 Then
            d = "Ocak"
        ElseIf b = 2 Then
            d = "Şubat"
        ElseIf b = 3 Then
            d = "Mart"
        ElseIf b = 4 Then
            d = "Nisan"
        ElseIf b = 5 Then
            d = "Mayıs"
        ElseIf b = 6 Then
            d = "Haziran"
        ElseIf b = 7 Then
            d = "Temmuz"
        ElseIf b = 8 Then
            d = "Ağustos"
        ElseIf b = 9 Then
            d = "Eylül"
        ElseIf b = 10 Then
            d = "Ekim"
        ElseIf b = 11 Then
            d = "Kasım"
        ElseIf b = 12 Then
            d = "Aralık"
        End If
        If b = 12 Or b = 1 Or b = 2 Then
            f = "kış"
        ElseIf b = 3 Or b = 4 Or b = 5 Then
            f = "ilk bahar"
        ElseIf b = 6 Or b = 7 Or b = 8 Then
            f = "yaz"
        ElseIf b = 9 Or b = 10 Or b = 11 Then
            f = "son bahar"
        End If
        g = 2015 - c
        TextBox4.Text = a & " " & d & " " & c & " tarihinde bir " & f & " günü doğdunuz. " & g & " yaşındasınız."
    End Sub
End Class

Yaş Hesaplama Programı Video İzle




Bir önceki visual basic dresimizde Vb.Net 2010 ile Arka Plan Rengi Ayarlama programının yapımını anlattık.

«
Next
Sonraki Kayıt
»
Previous
Önceki Kayıt

Hiç yorum yok:

Yorum Yazmak İçin Aşağıdaki Seçenekleri Kullanınız


Lütfen konuyla alakasız yorumlardan kaçının. Sadece link almak amaçlı ( spam ) yorumlar yazmayınız. ( anında silinir ). Argo, küfür, siyasi vb. içerik barındıran yorumlar yazmayınız.

Not: Yorum yapabilmek için (yorumlama biçiminden) Anonim ( isimsiz olarak ) veya Adı/URL'yi ( Adı ( gerekli ) / URL ( kısmını boş bırakınız ), fonksiyonlarından seçim yaparak yorumlarınızı yazabilirsiniz.

Ancak Google + profili ile yapılan yorumları onaylamıyorum bilginize. Yorum yaparken Adı/URL kısmından yaparsanız sadece isim yazmanız yeterli. Site adresi, URL eklerseniz yorumunuz onaylanmaz.