AccessTr.neT

selam,

Alt formda yaptığım hesaplama üst formdaki onay kutusundaki seçili alan şartına bağlı olarak iki değişik formul çalıştıracak.

Private Sub İskonto_AfterUpdate()
If Me.[CokluKDV].Visible = -1 Then
İskontoTutar = (BrimFiatı * Giren) * Nz([İskonto]) / 100
KDVTutar = (BrimFiatı * Giren - Nz([İskontoTutar])) * KDV / 100
Else
İskontoTutar = 0
KDVTutar = 0
End If

ATutar = (BrimFiatı * Giren) - Nz([İskontoTutar]) + Nz([KDVTutar])
End Sub

[CokluKDV] alanı üst formda olduğu için hata veriyor. VB.den çok anlamadığım için nası yazılcağını bilemedim.
Üst formdaki [CokluKDV] alanı seçiliyse şartını nasıl yazabilirim.

If Form_AlışFaturaİlkKayıt.CokluKDV.Value = -1 Then

'Şart ve şartlar hesaplamasını istedğin değerleri yazabilirsin

MsgBox "visible değil value kullanmanız lazım"

End If

Zamanım olmadığı için diğer alanları ve değerleri hesaplamadım
onay kutusunun visible ve value özelliğine dikkat ediniz...
kolay gelsin

sn coskun_cakal,

ilginiz için teşekkürler. problem çözülmüştür.