Skip to main content

AccessTr.neT


if kosulu

if kosulu

#7
sayın ugur1208,

öncelikle,bir hususu belirginleştirmekte fayda var kanısındayım.zira,uygulamanıza dair bir çıkış noktası oluşturmanız adına da görülen o dur ki buna gereksiniminiz var.

5.mesajınızda,açılan kutu değerleri içerisine başka değer atamayacağınızı ve dolayısı ile içeriğinde sadece "aa" ve "bb" değerlerinin olacağını beyan etmişsiniz.fakat,aynı mesajınızdaki bu beyanınızın akabinde,açılan kutu içerisine harici olarak bir de "cc" ve "diğer" değerlerinin de aktarmak istediğinizi de yazmışsınız.

anlaşılan o dur ki,size önceki mesajda tavsiye niteliğinde belirtilen açılan kutudaki iki değer de seçilmeyip boş bırakıldığında da açılan kutunun bir değer içermesi gerektiğini fark etmiş olacaksınız ki,bu denetimin de formun kullanım sürecinde boş bırakılmaması için değer atama işlemini uygun görmüşsünüz.bunun için de,yeni bir talep olarak,açılan kutuya istediğiniz değerlerin nasıl aktarılacağını öğrenmek istiyorsunuz.bu talebinize yönelik olarak,size yeni bir tavsiyede daha bulunmak gerektiği görülmektedir.o da,şu dur:

eğer açılan kutu içerisinde sadece "aa","bb" ve boy metin kutusuna manuel olarak değer yazmaya imkan vermesi için de "cc" ve "diğer" değerlerini de aktarmak ise amacınız ve bu 4 değer ile de sınırlı kalacak ise diğer bir ifade ile başka değer olmayacaksa;harici kod ile açılan kutuya değer atamaktansa,bunu önceden tanımlı olarak belirtmekte fayda var.

çünkü;bu daha sonraları hem kafa karışıklığınıza neden olabilir hem de kod yüklemesi ile gereksiz bir eylem halini alır.bunu ancak,daha ileri düzeyse bir uygulama içerisinde olup da açılan kutuya değer atama gereksinimi duyduğunuzda yapmanız önerilir.ve bunu da Lİstede Yokken (NotInList) Olay Yordamı aracılığı ile yapmanız daha iyi ve daha geçerli olur.bir önceki mesajda da,dikkat çekildiği gibi,Listede Yokken kullanımına dair site içerisindeki aramalarda çeşitli bilgi ve örnekleri barındıran konuları edinip inceleyebilirsiniz.)

ayrıca,Listede Yokken kullanımı da sadece,açılan kutu içerisine her yeni değer ekleme gereksinimi olduğu zamanlarda kullanılacağı için,bunu da ancak,böyle bir gereklilik ihtiyacı duyacağınız uygulamalarınızda uygulayınız.sizin bu uygulamanızda şu an itibarı ile de gerekli değil.zira,amacı dışında bir durum söz konusu olur.bilgilenmeniz için yapılan araştırma önerisi sadece,bilmeniz ve ileride gerektiğinde kullanınız diye yapılmıştır.

ayrıca,önceki mesajda örnek olarak verilen boy metin denetim kutusunun Çıkıldığında Olay Yordamında (Private Sub boy_Exit(Cancel As Integer)) yer alan kodlamadaki Me.Acilan_kutu1 = "DİĞER" ifadesinin yazılma nedeni,sadece açılan kutunun boş göstermemesini sağlamak adınadır.kaldı ki,buraya yazılması,bu değerin yani "DİĞER" ifadesinin açılan kutu içerisinde de yer alacağı ya da göstereceği anlamına da gelmemektedir.bunu formu çalıştırdığınızda da fark edeceksinizdir,eğer böyle bir çalışma sağlamışsanız.açılan kutuda göstermez fakat,tabloya bu atama sonucu şeklinde yazar ve kaydeder.bunu da bilgi olarak paylaşmakta ve anlaşılmasında fayda görerek paylaşmak istedim.şimdilik olarak eğer sadece bu dört değer ile sınırlı olmasını isterseniz,o zaman şöyle bir öneri size yeterli olacaktır.

1) formunuzu Tasarım olarak açınız ve açılan kutunun olduğu denetim kutusunu seçiniz.
2) ÖZELLİKLER-VERİ-SATIR KAYNAK TÜRÜ satırını seçip buradan da DEĞER LİSTESİ ifadesini seçiniz.
3) yine aynı sekmedeki SATIR KAYNAĞI satırına da "aa";"bb";"cc";"diğer" şeklinde yazınız.
4) böylece,formunuzu FORM GÖRÜNÜMÜ olarak çalıştırdığınızda,açılan kutunun içeriğinde bu dört değerin olduğu hali ile göreceksiniz.bu belirtilenleri tamamladıktan sonra,ilgili açılan kutunun Değiştiğinde Olay Yordamı içerisine aşağıdaki gibi bir kodlama eklemeniz yeterlidir.

Kod:
Private Sub tercih_Change()
Select Case tercih
      Case "aa"
           Me.sonucu = "2,50"
      Case "bb"
           Me.sonucu = "2,90"
      Case "cc"
           Me.sonucu = ""
      Case "DİĞER"
           Me.sonucu = ""
End Select
End Sub

böylece,"aa" ve "bb" değerleri seçildiğinde ilgili metin kutusuna aktaracağı değerler bellidir.eğer "cc" veya "DİĞER" değerleri seçilecek olursa da ilgili metin kutusu(boy için kullanılan) boş bırakılacaktır.

EK'te;
hem Form1 adlı formda,bu yukarıda bahsi geçildiği gibi DEĞER LİSTESİ oluşturularak hazırlanmış hem de Form2 adlı formda,açılan kutunun değerlerini bir başka tablodan alacak şekilde oluşturularak hazırlanmış bir örnek uygulama mevcuttur.inceleyebilirsiniz.bilginize.

iyi çalışmalar,
saygılar.
.rar ComboSecimineGore-ATOZ.rar (Dosya Boyutu: 17,37 KB | İndirme Sayısı: 6)
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla
#8
atoz112 vermiş olduğunuz örneği inceledim.
açılan kutuya değer listesi olarak seçmeden sizin örnekteki kodu yazdım form1 deki kodu case boy ="" olduğu zaman kendim yazdığım zaman yazdığım şekilde kayıt yapılabiliyor.
o yüzden açılan kutu olarak bıraktım.

Private Sub tercih_Change()
Select Case tercih
Case "aa"
Me.sonucu = "2,50"
Case "bb"
Me.sonucu = "2,90"
Case "cc"
Me.sonucu = ""
Case "DİĞER"
Me.sonucu = ""
End Select
End Sub

bu kodlar oldu.
teşekkür ederim.
ilginiz için yardımlarınız için.




select case kullanımı olarak
2 koşul olduğu zaman nasıl yapacağım

s2 1-24 arası sayılar var 1. grup 1-14-15-16-17-18-19-20-21-22-23-24 arası boy 1,90
2. grup s2 2-13 arası boy 1,85 olarak 2 gruptan oluşuyor.
yani s2 2 seçtiğim zaman boy 1,85 olsun s2 1 olduğu zaman 2,90 olsun
birden fazla koşulu yazması nasıl yapılıyor.
Cevapla
#9
sayın ugur1208,


bu konunuzda paylaşılan bilgilendirmeler size fayda sağlayıp sorununuzu çözdüyse,(ki,yaptığınız açıklama bu yönde);

lütfen bu konunuzun kapatılmasına ve Cevaplanmış Sorular kategorisine taşınmasına yönelik bir açıklama yaptıktan sonra,bu yeni sorunuz ile ilgili (select...case kullanımına dair),yeni bir konu açınız ki;

hem site içerisinde konu çeşitliliğinin olmasını hem de diğer üyelere bu konuda araştırma yapabilecekleri alternatif bir konu daha dahil etmiş olursunuz.bilginize.

iyi çalışmalar,
saygılar.
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla
#10
açmış olduğum konu çözüme ulaşmıştır.
yardımlarınız için teşekkür ederim cevaplanmış sorulara taşıyabilirsiniz.
iyi forumlar
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task