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
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?
Select Case Me.txtogrsay
Case Is < 17
Me.txtgrpsay = 1
Case Is < 24
Me.txtgrpsay = 2
Case Is < 31
Me.txtgrpsay = 3
End Select
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
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
Tamamdır. Konu çözülmüştür. Teşekkür ederim.