If
If karar yapısı, bir koşul sağlandığı zaman yapılacak işlemleri kapsar. Kontrol edilecek koşul ifadesinin sonucu True değerini alırsa, If - End If bloğu arasındaki kodlar çalıştırılır.
If Şart veya Koşul Then
Ara kod
End If
Örnek: 2 Vize ve final notunu kullanıcıdan aldıktan sonra, geçme notunu hesaplayan ve notun 70’den büyük olması durumunda ekrana “Geçtiniz.” mesajını çıkartma eğer kişi 70 i tutturamadıysa “Kaldınız Üzgünüz..” mesajı verdirtme :
Yeni bir proje açıyoruz açtığımız projemizde form1 e çift tıklayarak kod kısmına geçiyoruz ve aşağıdaki kodu yazıyoruz.
F5 ile projemizi çalıştırdığımızda bize Vize 1 notu girilir
Sonrada vize 2 notu girilir
Daha sonrada Final notunu girmemizi isteyecektir
girdikten sonra gerekli hesaplama yapılıp bize olumlu ise “geçtiniz”, olumsuz ise “kaldınız” mesajını vericektir.
If yapısında geçen koşul ifadelerinin sonucu Boolean tipinde bir değerdir. Karşılaştırma operatörlerinin dönüş tipinin Boolean olduğundan Eğer If deyimindeki bir karşılaştırma ifadesi kullanılmazsa, buradaki değer Implicit Conversion ile Boolean tipine çevrilir.
Dim sayi As Integer = InputBox("Sayi girin:")
If sayi Mod 2 Then
MsgBox(sayi & " tek sayıdır.")
Else
MsgBox(sayi & " çift sayıdır.")
End If
sayi Mod 2 ifadesinin değeri, girilen sayıya göre 1 ya da 0 olabilir. Bu değerler If kontrolünde Boolean tipine çevrilir. 1 değeri True olarak çevrileceği için, girilen sayı tek ise If bloğunun içine girilir.
If blokları içinde iç içe If kontrolleri yapılabilir.
Örnek: Diyelim ki dershanemiz de fen ve edebiyat sınıfı var kullanıcıdan FEN**** veya EDE**** şeklinde bir giriş istenir kullanıcının istediği sınıfa kaydını yapan uygulama.
Yeni bir proje açıyoruz açtığımız projemizde Form1 Üstüne label ekliyoruz
Properties kısmından Text bölümünü boş bırakıyoruz
Form1 e çift tıklayarak kod kısmına geçiyoruz ve aşağıdaki kodu yazıyoruz.
F5 ile projemizi çalıştırdığımız da bizden giriş isteyecektir.
Buraya FEN1234 veya EDE1234 tarzında bir değer girip enterladığımız da Form 1 e eklediğimiz label da ilgili sınıfa kayıt yapıldığına dair bilgi verecektir.
Karar Yapıları "II" Adlı makalemiz de görüşmek üzere..
Fikret AKIN