Skip to main content

AccessTr.neT


Seçenek Gruplama-If Komutu

Seçenek Gruplama-If Komutu

Çözüldü #1
Merhaba;

Ekteki örneğin Günlük Ziyaretler formundaki Büyüme Potansiyeli seçenek grubundan Evet veya Belki seçildiğinde yanalrındaki metin kutularına yüzde olarak sayı girişini zorunlu kılmaya çalışıyorum. Aynı formun Kiralama kısmında evet - hayırlı seçenek için kod yazmıştık ancak buna uyarlayamadım. Aşağıdaki kod çalışmadı. Yardımcı olursanız çok sevinirim. İyi çalışmalar.
NOT: Evet veya belki seçenekleri seçildiğinde yüzdeler yazılması zorunlu olacak; ancak eğer yanlışlıkla seçilmişse işaretlemenin kaldırılmasına da imkan sağlanacak. Aynı kiralama bölümündeki tarih giriş zorunluluğu gibi.

Private Sub Metin120_Exit(Cancel As Integer)
If IsNull(Metin120) Or Metin120 = "" Then
MsgBox ("Cevabınız Evet ise büyüme olasılığını yüzde olarak belirtiniz")
Onay114.SetFocus
ExitSub
End If
End If
End Sub
Cevapla
Çözüldü #2
inceleyin ve kendinize göre geliştirebilirsiniz
.rar Satış Destek-celoyce.rar (Dosya Boyutu: 47,51 KB | İndirme Sayısı: 21)
Cevapla
Çözüldü #3
Mevzuyu tam anlayamadım ama "Çerçeve111"'in günceştirme sonrasında olayına aşağıraki kodu yazınız.

If IsNull(Metin120) And Çerçeve111 = "1" Then
If MsgBox("büyüme olasılığını yüzde olarak belirtiniz?", 36, "Büyüme Olasılığı...") = vbYes Then
Me.Metin120.SetFocus
Else
Me.Çerçeve111 = ""
End If

End If
If IsNull(Metin122) And Çerçeve111 = "3" Then
If MsgBox("büyüme olasılığını yüzde olarak belirtiniz?", 36, "Büyüme Olasılığı...") = vbYes Then
Me.Metin122.SetFocus
Else
Me.Çerçeve111 = ""
End If
End If


Cevabını görmedim Mevlüt hocam.Img-grin
Cevapla
Çözüldü #4
Her iki kodu da deneyerek bilgi vereceğim. Celoyce nin gönderdiği koda biraz bakma fırsatım oldu. Yalnzı evet seçildiğinde iki ayrı metin kutusu açılıyor. Bunlardan kod yazılmamış olanı kaldıracağım. Aynı uygulamayı belki seçeneği için de geliştirmeye çalışacağım. Diğerini henüz denemedim. Teşekkürler.
Sledgeab acaba çerçeve 111 nerede yer alıyor? Tasarım modunda açıp baktığımda sadece onay kutuları ve metinler bulunmakta.
Yapmak istediğimi de tekrar açıklayayım. Belki anlaşılırsa daha net olur.
Gruplandırma yaptığım kutucuklarda "evet" ya da "belki" seçeneği işaretlendiğinde yanalrındaki metin kutularına olasılığın girimesini zorunlu kılmak istiyorum. Aynı zamanda yanlışlıkla bu seçeneklerin işaretlenmesi de olabileceğinden kullanıcı örneğin hayırı işaretleyecekken eveti işaretlemişse bir kere yüzdeyi giriniz uyarısını alsın ama daha sonra geri dönüp işaretleyi "hayır" olarak değiştirebilsin diyorum.
Son Düzenleme: 01/06/2011, 15:57, Düzenleyen: sally.
Cevapla
Çözüldü #5
Sayın sally Açılan kutuda evet veya belki seçildiğinde

Private Sub Açılan_Kutu128_Change()
If Açılan_Kutu128.Value = "Evet" Or Açılan_Kutu128.Value = "Belki" Then
Me.Metin120.Visible = True
Me.Metin120.SetFocus
Me.Metin122.Visible = True
ElseIf Açılan_Kutu128.Value = "Hayır" Then
Me.Metin120.Visible = False
Me.Metin122.Visible = False
End If
End Sub

Bu şekilde denediniz mi?
Kaplumbağa ya dikkat et...
Sadece  başını çıkartıp risk aldığında ilerleyebiliyor...
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da