+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Kayıtlardaki tarih alanı ile süre alanının bir sonraki tarih alanına otomatik eklemesi (/konu-kayitlardaki-tarih-alani-ile-sure-alaninin-bir-sonraki-tarih-alanina-otomatik-eklemesi.html)
Kayıtlardaki tarih alanı ile süre alanının bir sonraki tarih alanına otomatik eklemesi - saslan33 - 25/05/2011
Arkadaşlar kolay gelsin sizlerin desteğiyle bi program hazırlıyorum ama kullanıcı açısından kolaylık olsun diye bazı işlemleri programın kendisinin yapmasını istiyorum. Bu nedenle bazı yerlerde takıldıkça sizlerden desdek istiyorum bunun için form yönetimine ve destek verenlere teşekkür ederim.
Konuyla ilgili bir örnek ekledim.
Yardımlarınızı bekliyorum
Sorun:
Arkadaşlar kayıtlarda herhangi bir mahkemeden süre alınıyor . Bu kayıtlarda tarihi ve karşısında süresi yazılıyor. 1.kayıt eklenirken mahkeme adı tarihi ve süresi yazılıyor. 2. kayıta geçildiğinde yine mahkeme adı yazılıp tarih kısmına geçildiğinde 1. kayıtaki tarih ile sürenin tplamını otomatik yazmasını istiyorum. Süresi kısmının verisini girdikten sora 3. kayıta geçtiğimde bu sefer 2. kayıttaki tarihle sürenin toplamını tarih kısmına yazmasını istiyorum. Kısaca bu işlemi her yeni kayıtta yapmasını istiyorum. ***** ayrıca süre kısmınada bır kısıtlama yapabilirsek çok güzel olur. Oda şöyle ilk 3 kayıtta 90'ar gün ekleyecek 4. kayıt ve sonra 2 kayıtta 50 gün daha snraki kayıtlarda ise serbest
Cvp: Kayıtlardaki tarih alanı ile süre alanının bir sonraki tarih alanına otomatik eklemesi - ozanakkaya - 25/05/2011
İnceleyiniz.
Kimlik eklenmesi için kimlik alanına girilmesi gereklidir.
Cvp: Kayıtlardaki tarih alanı ile süre alanının bir sonraki tarih alanına otomatik eklemesi - saslan33 - 26/05/2011
teşekkürler sledgeab elinize sağlık
2. dediğim konuda yapılabilinirmi?
Cvp: Kayıtlardaki tarih alanı ile süre alanının bir sonraki tarih alanına otomatik eklemesi - ozanakkaya - 26/05/2011
(26/05/2011, 16:30)saslan33 yazdı: teşekkürler sledgeab elinize sağlık
2. dediğim konuda yapılabilinirmi?
Aşağıdaki kodu ekle
Sub SureEkle()
Select Case Me.Kimlik.Value
Case "1"
Me.Süresi = "90"
Case "2"
Me.Süresi = "90"
Case "3"
Me.Süresi = "90"
Case "4"
Me.Süresi = "50"
Case "5"
Me.Süresi = "50"
Case "6"
Me.Süresi = "50"
Case Else
Me.Süresi = ""
End Select
End SubTarihi metin kutusunun girildiğinde olayınada aşağıdakini ekle
Call SureEkle