AccessTr.neT

Tam Versiyon: Sonucu Sıfıra Yada Beşe Yuvarla
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
merhaba arkadaşlar,
fiyat artırımı yaparken artırılan miktarın virgülden sonraki değeri : 0,75    -  0,80    - 0,85    1,25    -  1,30    -  3,55  - 3,60 gibi olacak,  kusurat olmayacak, nasıl yukarı yuvarlayabilirim acaba?
rakamın sonu hep 5 yada 0 sıfır olacak.

örnek:
1,67==>> 1,70
1,71==>> 1,75
0,63==>> 0,65
0,52==>> 0,55
0,49==>> 0,50
1,96==>> 2,00
3,72==>> 3,75
2,51==>> 2,55 gibi olacak.

yardımlarınız için şimdiden çok teşekkür ederim,
bu işlemi nerede yapmak istediğinizi tam anlamadım ama bir modüle aşağıdaki fonksiyonu ekleyip sorgu içinden çağırabilirsiniz?
Function Yuvarla(byval Sayi As Double) As Double
    Yuvarla = -Int(-Sayi * 100 / 5) * 5 / 100
End Function
RENK_FIYATI İstenen
0,3900 ==>> 0,40
0,4400 ==>> 0,45
0,4725 ==>> 0,50
0,4900 ==>> 0,50
0,5000 ==>> 0,50
0,5200 ==>> 0,55
0,5250 ==>> 0,55
0,6300 ==>> 0,65
0,6700 ==>> 0,70
0,6825 ==>> 0,70
0,7350 ==>> 0,75
0,8400 ==>> 0,85
0,8400 ==>> 0,85
1,6700 ==>> 1,70
1,6800 ==>> 1,70
1,7100 ==>> 1,75
1,8375 ==>> 1,85
1,9600 ==>> 2,00
2,5100 ==>> 2,55
3,7200 ==>> 3,75
eklemiş olduğum formda, fiyat değişikliği yapılmak istendiğinde kullanacağım.
fonksiyon doğru çalışıyor,
yapmak istediğim de buydu,
çok teşekkür ederim,
kendi çalışmanıza uyarlayabildiniz mi?
çözülmüşlere taşıyalım mı?
uyguladım,
süper oldu.
iyi çalışmalar
kolay gelsin
Sayfalar: 1 2