Arkadaşlar Merhaba
Ben bir sigorta acente programı yapıyorum.Satış formunda aşağıdaki bilgiler var.
1-Müşteri Adı Soyadı (Sayı)
2-Ürün Bilgisi (Açılır Kutu)
3-Poliçe Numarası(Metin)
4-Başlangıç Tarihi (Tarih)
5-Bitiş Tarihi (Tarih)
6-Plaka No
7-Model yılı
8-Model Türü
9-MotorNO
10-Şasi No
11-TescilNO
12-Notlar
13-KK Banka Adı(Metin)
14-KK KART No(Metin)
15-KK CVC (Metin)
16-KK SKT(Metin)
17-Kart Türü (Metin)
18-Net Prim
19-Vergi
20-Brüt Prim
21Komisyon Tutarı
Bu tabloda Ürün Bilgisi Trafik veya Kasko Sigortası seçildiğinde Araç bilgileri(sırano 6 ile 12arasının) aktif olmasını diğer ürünlerde pasif olmasını istiyorum.
Teşekkürler
açılan kutudan seçilen satıra göre başka bir formu aktif veya pasif yapma
Örnek Uygulama Ekleyiniz.
komşuda dülger mi var geliyor keser sesi,
ustalar konuşunca çıraklar keser sesi.
ustalar konuşunca çıraklar keser sesi.
1. ve 2. maddedeki alanların türleri yanlış. Ayrıca tablodaki isimlendirme inşaallah böyle değildir. Türkçe karakter ve boşluk kullanılmamalı.
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Sn.ZASUGO
Application Engineer
Hocaların affına sığınarak şöyle bir tavsiye de bulunmak istiyorum
Formun yüklendiği olayına;
Me.Plaka_No.visible=false
Me.Model_yılı.visible=false
Me.Model_Türü.visible=false
Me.MotorNO.visible=false
Me.Şasi_No.visible=false
Me.TescilNO.visible=false
Me.Notlar.visible=false
Yazınız.
Sonra Ürün Bilgisi açılır kutusunun güncelleştirme sonrası olayına;
If Ürün_Bilgisi .Value = "Trafik Sigortası" or "Kasko Sigotası" Then
Me.Plaka_No.visible=True
Me.Model_yılı.visible=True
Me.Model_Türü.visible=True
Me.MotorNO.visible=True
Me.Şasi_No.visible=True
Me.TescilNO.visible=True
Me.Notlar.visible=True
End If
Yazarak deneyiniz bu kod ilgili alanların görünür olup olmamasını belirler. Şayet istediğiniz görünmesi ancak etkin olmaması ise visible yazan yerleri enabled olarak değiştirebilirsiniz
Formun yüklendiği olayına;
Me.Plaka_No.visible=false
Me.Model_yılı.visible=false
Me.Model_Türü.visible=false
Me.MotorNO.visible=false
Me.Şasi_No.visible=false
Me.TescilNO.visible=false
Me.Notlar.visible=false
Yazınız.
Sonra Ürün Bilgisi açılır kutusunun güncelleştirme sonrası olayına;
If Ürün_Bilgisi .Value = "Trafik Sigortası" or "Kasko Sigotası" Then
Me.Plaka_No.visible=True
Me.Model_yılı.visible=True
Me.Model_Türü.visible=True
Me.MotorNO.visible=True
Me.Şasi_No.visible=True
Me.TescilNO.visible=True
Me.Notlar.visible=True
End If
Yazarak deneyiniz bu kod ilgili alanların görünür olup olmamasını belirler. Şayet istediğiniz görünmesi ancak etkin olmaması ise visible yazan yerleri enabled olarak değiştirebilirsiniz
Sayın zasugo, lütfen açtığınız konuyu takip ediniz. Olumlu veya olumsuz geri bildirimde bulunun.
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Konuyu Okuyanlar: 1 Ziyaretçi