IF Komutu - Visual Basic Dersleri

ads

ads

IF Komutunun kullanımı

Visual basic  dili  if komutunun uygulanması ile ilgili bu dersimiz  yeni başlayanlar için     faydalı olabilecek derslerimizdendir.

İf komutunun   türkçe  karşılığı  "eğer"  anlamını içermektedir.

Bu konumuz     Visual Basic dilini      bilenler için  basit gelebilir ancak  if komutu visual basic  ve bir çok proglamlama dilinde önemli bir yeri olmakla beraber  bir çok çalışmanızda sık sık kullanmanız gerekecek ve karşınıza çıkacaktır.

Form'a eklemeniz gerken araçlar  yukarıda resimde görüldüğü gibi   2 adet  TextBox ve bir  tane Button ekleyiniz Button'un ismini  topla olarak değiştiriniz .  Biz  2  sayının toplanmasını istiyoruz  fakat  kullanıcı  TextBox'lara sayı girmeden de  Button'a basabilir  eğer ki topla buttonuna  basarsa  hata  verir ve  istenilmeyen sorunlarla karşılaşabiliceğiniz  için bu durumu   engellemenin 2  yolu vardır. 

1. Yol

if kullanımı

2. Yol

Try-Catch-Finally Kullanımı

Biz bu dersimizde  bu durumu  çözmek için if  komutunu yani birinci  yolu  seçip  hemen kodlamaya geçelim.

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 Sayı Giriniz.")
        Else
            sayi1 = TextBox1.Text
            sayi2 = TextBox2.Text
            sonuc = Val(TextBox1.Text) + Val(TextBox2.Text)
            MsgBox(sonuc)
        End If
    End Sub
End Class

NOT : Öncelikle  3 tane  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 de  sayi1 ile sayi2 değişkenlerinin toplamını atamış bulunduk

Bu işlemlerimiz   sıradan toplama işlemi daha sonra en üste çıktık ve bir if komutu yazalım   aşağıdaki komut;

If TextBox1.Text = " " Or TextBox2.Text = " " Then
            MsgBox("Lütfen Sayı Giriniz..")
        Else
       
       End If

Textbox2'nin içinde " " varsa(yani içleri boşsa) Mesaj kutusu olarak lütfen Sayı giriniz  mesajı  çı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...

ads