AltFormda hesap için üstformdaki şartı gösterme

18/03/2011, 19:20

estapan

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.
18/03/2011, 20:42

Coskun0559

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
18/03/2011, 20:53

estapan

sn coskun_cakal,

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