Skip to main content

AccessTr.neT


Vba Da Select Case Yöntemi

Vba Da Select Case Yöntemi

Çözüldü #1
formdaki bir butonun tıklanma olayına;

formdaki txtsay metin kutusunun içeriğine göre;
0 ile 17 arasındaysa 1
17 ye eşit ve 24 den küçükse 2
24 eşit ve 34 den büyükse 3 değerini
formdaki txtsonuç metin kutusuna
nasıl kodlarım
Cevapla
#2
Private Sub Komut69_Click()
Select Case Me.txtogrsay

Case Me.txtogrsay > 0 Or Me.txtogrsay < 17
Me.txtgrpsay = 1

Case Me.txtogrsay > 16 Or Me.txtogrsay < 24
Me.txtgrpsay = 2
Case Me.txtogrsay > 23 Or Me.txtogrsay < 31
Me.txtgrpsay = 3
End Select
End Sub

Bu kod neden çalışmıyor acaba?
Cevapla
#3
Select Case Me.txtogrsay
Case Is < 17
Me.txtgrpsay = 1
Case Is < 24
Me.txtgrpsay = 2
Case Is < 31
Me.txtgrpsay = 3
End Select
Cevapla
#4
0 ile 17 arası için 1
18 ile 24 arası için 2

24 den büyük için 3 yapmak istiyorum.

or ifadesini nasıl kullanabilirim
Cevapla
#5
Case yerine if kullanmayı deneyebilirsiniz
Ama yazdığım kod hatalı sonuç mu verdi?
23-31 arası koşulu siz koymuştunuz o nedenle o koşulu ekledim
Cevapla
#6
Tamamdır. Konu çözülmüştür. Teşekkür ederim.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da