Ana Sayfa / Forum Ana Başlıklar / Şart (Koşul) Yapıları / Select Case Yapısı
"Select Case" karar yapısı , "If" yapısı gibi, bir veri ile ilgili karşılaştırma kontrolü için kullanılabilir. "Select Case"yapısı karmaşık ve uzun "If-Else" yapılarını daha anlaşılır, kolay ve zevkli hâle getiren bir alternatiftir. Döndürdüğü değerler "True" ya da "False" olacaktır. "True" (Doğru) olduğunda altındaki kod satırları çalışır, "False" (Yanlış) olduğunda varsa diğer "Case" şartlarına kontrole gidilir. Başka "Case" şartları varsa ve o "Case" şartları "True" oluyorsa onun alt satırlarındaki kodlar uygulanır. Başka "Case" şartı yoksa, ya da kontrole gidilen diğer "Case" şartları hep "False" cevabı döndürüyorsa, "End Select" deyimi ile "Select Case" bloğu dışına çıkılır.
Select Case 'Kontrol Edilecek Veri
Case Is Şart_1 'İlk şart
Kodları 'İlk Şart doğru ise yapılacak işlem
Case Is Şart_2 'İkinci şart
Kodlar 'İkinci Şart doğru ise yapılacak işlem
Case Is Şart_3 'Üçüncü şart
Kodlar 'Üçüncü Şart doğru ise yapılacak işlem
Case Else 'Tüm şartlar yanlış ise
Kodlar 'Tüm şartlar yanlış ise yapılacak işlem
End Select 'Fonksiyon sonu
Private Sub UserForm_Initialize()
Dim Gunler As Byte
Gunler = 7
Select Case Gunler
Case 1
GunAdi = "Pazartesi"
Case 2
GunAdi = "Salı"
Case 3
GunAdi = "Çarşamba"
Case 4
GunAdi = "Perşembe"
Case 5
GunAdi = "Cuma"
Case 6
GunAdi = "Cumartesi"
Case 7
GunAdi = "Pazar"
Case Else
GunAdi = "Belirsiz Gün"
End Select
End Sub
"Case" deyimi planlanmayan farklı bir şart gerçekleşirse, o zaman "Case Else" blogu devreye girer ve bu blokta verilen kodlar çalıştırılır. "Case Else" bloğu İhtiyaç olmadığı müddetçe kullanilmasi zorunlu değildir. Select Case yapısı görüldüğü üzere çok kullanışlıdır. Fakat işleme ait şartlari iyi formüle etmek gerekir.
Bu Alt Başlık için henüz Soru oluşturulmamış...
TOPLAM | DÜN | |
---|---|---|
Sorular: | 2 | 0 |
Gönderiler: | 3 | 0 |
Kullanıcılar: | 4 | 0 |