Vb de İf Kontol Yapısı

Jul 26,2007 00:00 by erkan
Kontrol komutları programcılar tarafından sıkca kullanılan belirli ifadeleri kontrol etmek veya bazı şartların gerçekleşip gerçekleşmedigini kontrol etmek amacıyla kullanılan komutlardır. Biz burada en çok kullanılan komutların üzerinde duracagız.

If Kontrol Yapısı :
Genel olarak bu komut yapısı şu şekilde yazılır.

If Kosul Then
Kosul dogru ise yapılması istenen işlemler.
Endif

Kullandıgımız her If kontrolu için mutlaka bir Endif kullanmalıyız. Bu kontrol yapısının sonlandıgını belirtir.
Örnek:

If ad="FATIH" Then  
Maas=10000000  
Endif

Eger koşul gerçekleşmemiş ise yapılması istenen bazı işlemler varsa o zaman şu şekilde bir kontrol yapısını kullanabiliriz.

If Kosul Then
Kosul dogru ise yapılması istenen işlemler.
Else
Kosul yanlış ise yapılması istenen işlemler.
Endif

Aynı anda bir kaç koşul için karşılaştırma yapılmak isternirse;

If Kosul Then
Kosul dogru ise yapılması istenen işlemler.
Elseif Kosul1 Then
Kosul1 dogru ise yapılması istenen işlemler.
Elseif Kosul2 Then
Kosul2 dogru ise yapılması istenen işlemler.
Else
Bütün kosullar yanlış ise yapılması istenen işlemler.
Endif
yapısı kullanılır. Bu yapıda mutlaka Else blogunun bulunmasına gerek yoktur. Burada eger Kosul dogru ise ilk Then’den sonraki satırlar çalıştırılarak Elseif ifadesine kadar icra edilirler. Daha sonra Endif ifadesinden sonraki satır icra edilir.Eger Kosul yanlış ise Kosul1 ifadesi kontrol edilir.Dogru ise buradaki then den sonraki satırlar çalıştırılır. Yanlış ise Kosul2’ye bakılır. Eger bu kosulda yanlıs ise Else ifadesinden sonraki satırlar çalıştırılır.

Örnek :

If Isım=”Ali” Then  
Maas=Maas * 1.2  
Elseif Isım=”Murat” Then  
Maas=Maas * 1.4  
Elseif Isım=”Kemal” Then  
Maas=Maas * 1.1 
Endif

Örnek :

If Bolen=0 Then 
Msg.Text=” Bolen sayı sıfır olamaz." 
Else 
Sonuc= Sayı / Bolen 
Msg.Text = Sonuc 
Endif

Ornek :

If name="Ali" AND no="1301920035" 
Not=4 
ElseIf name="Ahmet" AND no="1301940023" Then 
Not=3 
ElseIf name="Hakan" AND no="1301930045" Then 
Not=2 
ElseIf name="Hatice" AND no="1301940005" Then 
Not=7 
Endif