AccessTr.neT
Şartlı Kod Çalıştırmak - Baskı Önizleme

+- 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ığı: Şartlı Kod Çalıştırmak (/konu-sartli-kod-calistirmak.html)



Şartlı Kod Çalıştırmak - ayavuz2233 - 31/12/2022

Merhaba
 Eğer SiparislerAltForm da KDV_DUR Açılan Kutusunda  Kdv Hariç ise HesapYap_1 ,  Kdv Dahil ise HesapYap_2 kodu çalışsın. Bunun için nasıl bir kod eklememiz gerekiyor.


RE: Şartlı Kod Çalıştırmak - atoykan - 31/12/2022

KDV_DUR güncelleştirme sonrasında If denetimadı="kdv hariç" then ....... else denetimadı="kdv dahil" then ....... şeklinde yazacaksınız.


RE: Şartlı Kod Çalıştırmak - ayavuz2233 - 31/12/2022

Hocam Yeni yilın size ailenize sağlık ve mutluluk getirmesini diliyorum.

Hocam kodu aşağıdaki şekilde ekledim hata veriyor çalışmiyor

Kod:
Private Sub KDV_DUR_AfterUpdate()
If KDV_DUR = "KDV HARİÇ" Then
HesapYap_1
Else
KDV_DUR = "KDV DAHİL"
  HesapYap_2
End Sub




RE: Şartlı Kod Çalıştırmak - atoykan - 01/01/2023

Ne hata veriyor ben denedim şimdi örneğinizde bir sorun yok çalışıyor kod. Çalışmanızda compile ederken çokça hata var bunlardan birine takılıyorsunuz sanırım onları bir kontrol edin.


RE: Şartlı Kod Çalıştırmak - ayavuz2233 - 01/01/2023

Çok teşekkürler Hocam ellerinize sağlık.
Koda aşağıdaki şekilde ekleme yaptım sorun çözüldü.

Yeni yılınız kutlu olsun. Saygılar.

PHP Kod:
Private Sub KDV_DUR_AfterUpdate()
 If 
KDV_DUR "KDV HARİÇ" Then
 HesapYap_1
 
Else
 
KDV_DUR "KDV DAHİL"
 
HesapYap_2
Exit Sub
End 
If

End Sub