IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Visual Basic Dilinde if komutunun kullanılmasını anlatan yeni başlayanlar için yararlı bir ders olacaktır.

Bu derste size visual basic dilinde if(eğer) komutunun kullanımını anlatacağım.

UYARI : Bu konuyu küçümsemeyelim Visual Basic dilinde ve daha birçok programlama dilinde çok önemli bir komuttur sık sık kullanmak zorunda kalacaksınız.

İlk olarak formumuza 2 TextBox ve bir adet Button ekleyelim. Yani şu şekilde;

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Şimdi biz 2 sayının toplanmasını istiyoruz ama kullanıcı buralara sayı yazmadanda topla butonuna basabilir eğer basarsa program hata verir ve istenmeyen bir durum ortaya çıkmış olur bunu engellmenin 2 yolu vardır.

1.) İf Kullanımı
2.) Try-Catch-Finally Kullanımı (Bunu daha sonraki derslerimde ayrıntılı bir şekilde anlatacağım)

Biz Bu Problemi İf İle Çözmeye Uğraşacağız;

Kod:

Public Class Form1

    Dim sayi1, sayi2, sonuc As Integer

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        If TextBox1.Text = " " Or TextBox2.Text = " " Then

            MsgBox("Lütfen bütün alanları eksiksiz doldurunuz")

        Else

            sayi1 = TextBox1.Text

            sayi2 = TextBox2.Text

            sonuc = Val(TextBox1.Text) + Val(TextBox2.Text)

            MsgBox(sonuc)

        End If

    End Sub

End Class

AÇIKLAMA : İlk Olarak 3 adet integer türünde değişken tanımladık ve sayi1 değişkenine TextBox1'i sayi2 değişkenine ise TextBox2'yi atadık.

Sonuc değişkenimize ise sayi1 ile sayi2 değişkenlerinin toplamını atattırmış olduk.

Bu yaptığımız işlem sıradan toplama işlemi daha sonra en üste çıktık ve bir if komutu yazdık bu komut;

Kod:

If TextBox1.Text = " " Or TextBox2.Text = " " Then

            MsgBox("Lütfen bütün alanları eksiksiz doldurunuz")

        Else

       .................. 'Böyle değise olacak komutlar

       End If

(burada eğer Textbox1'in içinde veya(Or veya anlamına gelir)

Textbox2'nin içinde " " varsa(yani içleri boşsa) Mesaj kutusu olarak lütfen bütün alanları eksiksiz doldurunuz ifadesi çıksın Else(Böyle Değilse) Böyle değilse olacak komutlar yazılır. End If(If komutumuzu bitirdiğimizi gösteren ibra end if))

Ve değilse yazılacaklar yazan yere toplama işlemimizi yazdık yani eğer Textbox1 veya Textbox2'den birisi dahi boş olsa işlemi yapma mesajı ver eğer bir problem yoksa yani Textbox1 ve Textbox2'nin içleri doluysa toplama işlemini yap ve sonucu mesaj olarak göster.

PÜF NOKTA : And ifadesi Ve anlamına Or ifadesi ise Veya anlamına gelir if komutlarımızı yazarken aralara bu komutları yazarak bir ifadeyi birden çok şarta bağlayabiliriz örnek vermek gerekirse;

Kod:

If TextBox1.Text = 1 And TextBox2.Text = 2 And Textbox3.Text = 3 Then

...........

Else

...........

End If

yada

Kod:

If TextBox1.Text = 1 Or TextBox2.Text = 2 Or Textbox3.Text = 3 Then

...........

Else

...........

End If

şeklinde kullanabiliriz.

kaynak; sanalkurs.net