Samanalevi Netkafe Anasayfa

Vısual Basıc'de Kontrol Komutları

Sosyal Ağ Paylaşımı :                                

	Ekleyen : beykozlu Zaman : 28 Haziran 2007 Okunma : 1747 Yorumlar : 0 - Yorumları Oku - Yorum Yaz

Kontrol komutlari programcilar tarafindan sikca kullanilan belirli ifadeleri kontrol etmek veya bazi sartlarin gerçeklesip gerçeklesmedigini kontrol etmek amaciyla kullanilan komutlardir. Biz burada en çok kullanilan komutlarin üzerinde duracagiz.
If Kontrol Yapisi :
Genel olarak bu komut yapisi su sekilde yazilir.
If Kosul Then
Kosul dogru ise yapilmasi istenen islemler.
Endif

Kullandigimiz her If kontrolu için mutlaka bir Endif kullanmaliyiz. Bu kontrol yapisinin sonlandigini belirtir.
Örnek:

If ad="FATIH" Then

Maas=10000000
Endif

Eger kosul gerçeklesmemis ise yapilmasi istenen bazi islemler varsa o zaman su sekilde bir kontrol yapisini kullanabiliriz.
If Kosul Then
Kosul dogru ise yapilmasi istenen islemler.
Else
Kosul yanlis ise yapilmasi istenen islemler.
Endif
Ayni anda bir kaç kosul için karsilastirma yapilmak isternirse;
If Kosul Then
Kosul dogru ise yapilmasi istenen islemler.
Elseif Kosul1 Then
Kosul1 dogru ise yapilmasi istenen islemler.
Elseif Kosul2 Then
Kosul2 dogru ise yapilmasi istenen islemler.
Else
Bütün kosullar yanlis ise yapilmasi istenen islemler.
Endif
yapisi kullanilir. Bu yapida mutlaka Else blogunun bulunmasina gerek yoktur. Burada eger Kosul dogru ise ilk Then’den sonraki satirlar çalistirilarak Elseif ifadesine kadar icra edilirler. Daha sonra Endif ifadesinden sonraki satir icra edilir.Eger Kosul yanlis ise Kosul1 ifadesi kontrol edilir.Dogru ise buradaki then den sonraki satirlar çalistirilir. Yanlis ise Kosul2’ye bakilir. Eger bu kosulda yanlis ise Else ifadesinden sonraki satirlar çalistirilir.
Örnek :

If Isim="Ali" Then
Maas=Maas * 1.2

Elseif Isim="Murat" Then

Maas=Maas * 1.4

Elseif Isim="Kemal" Then

Maas=Maas * 1.1

Endif

Örnek :

If Bolen=0 Then

Msg.Text=" Bolen sayi sifir olamaz."

Else

Sonuc= Sayi / 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

Select Case:

Bu kontrol yapisinda sadece bir degiskenin durum kontrolü yailir.Kontrolü yapilacak degiskenin genel olarak alabilecegi degerler belirli ise bu yapinin kukllanilmasi If yapisina göre daha avantajlidir. Yazilis biçimi genel olarak asagidaki sekildeki gibidir
Select Case Degisken
Case Deger1
Degisken=Deger1 oldugu durumda yapilmasi istenen islemler
Case Deger2
Degisken=Deger2 oldugu durumda yapilmasi istenen islemler
Case Else
Degisken yukaridaki degerler den hicbirine esit degil ise yapilacak islemler
End Select
Kullandigimiz her Select ifadesi için bir End Select kullanmaliyiz.
Örnek :

Select Case No

Case 1304

Name="Murat Tuna"

Case 1306

Name="Ayse Sinem"

Case 1307

Name="Hakan Kaya"

Case 1312

Name="Abdullah Kahyali"

Case 1324

Name="Hatice Uygun"

End Select

Örnek :

Select Case Ay

Case 1

Max_date=31

Case 2

Dim Artik as Integer

Artik = Yil Mod 4

If Artik=0 Then

Max_date=29

Else

Max_date=28

Endif

Case 3

Max_date=31

Case 12

Max_date=31

Case Else

Mesaj="Error : Bir yilda 12 ay vardir."

End Select

Konuya Ait Yorumlar

Şu an yorum yazılmamış!..

İlginizi Çekebilecek Konular
Başlık	Ekleyen
Ico'dan Bmp'ye Çevirmek	seasparrow
Veri Tabanı Bağlantısı Yapmak	onur_1518
Denetim Masası Uygulaması Çalıştırmak	seasparrow
Vısual Basıc’de Degısken Tanımlama	beykozlu
Hangı Kullanıcı Logın Yaptı..	beykozlu
Değişkenler	seasparrow
Notepad'ı Çalıştırmak	beykozlu
Sitenizdeki Aktif Ziyaretçiler	admin
Ağ Ortamında Makinenin İsmini Bulma	Ayhans
Html Sayfasını Yazdırmak	seasparrow
Ateş Efektli Yazı	admin
Dizi Değişken Fonksiyonu	seasparrow
Ekran Çözünürlüğünü Öğrenmek	seasparrow
Kontrol Paneldeki Ayarları Programdan Açmak	seasparrow
Vb'de Arıtmetıksel Operatorler	beykozlu
Hareketli İmleç Kullanma	seasparrow
Vısual Basıc'de Kontrol Komutları	beykozlu
Memo'da Cursorun Yerini Bulma	seasparrow
Dövız Kurlarını Almak	admin
Sql Tablolarda Değişiklik Yapmak	beykozlu