Bahsini yaptığınız talebinize yönelik olarak aşağıdaki açıklamalar yeterli olacaktır.
İlgili alanın tablodaki adının odeme olduğunu ve veri türünün de metin olduğunu kabul edelim.
Mevcut bir form üzerinde yer alan bu odeme alanının kaynak gösterileceği ilgili metin kutusunun adının da odeme_txt olduğu varsayalım.
Bu durumda,odeme_txt metin kutusunun Çıkıldığında Olay Yordamı içerisine aşağıdaki kodları dahil ediniz.
Kod:
Dim a, b
a = Left(Me.odeme_txt, InStr(Me.odeme_txt, "/") - 1)
b = Mid(Me.odeme_txt, InStr(Me.odeme_txt, "/") + 1)
Me.odeme_txt = Round(a / b, 2)
Yukarıdaki kodlara belki sonraki aşama olarak,NZ Fonksiyonu kontrolü de yapılabilir,tercihe ve gereksinime göre.
Son olarak da,yine kullanım tercihine göre;alan türünün sayı değeri olması gerekiyorsa,bunun için de,metin değerini sayı değerine dönüştürme işlemi de uygulanabilir,ileriki aşamalarda veya kullanım durumlarında.bilginize.
İyi çalışmalar,
Saygılar.