Round to the nearest hundreds place 2

[cramd]

Variable caccumtotal = $637362.20

process vb statement--
caccumtotal = Round(rst("glpa13&quot, 0)

now caccumtotal = $637362 BUT I need it to round to the nearest hundreds place. Result should be $637400. What am I missing? Any thoughts would be appreciated.

Diane

 

[JFoushee]

Would this help?

caccumtotal = Round(rst("glpa13&quot / 100, 0) * 100

 

[mirirom]

well, without digging through MS's instrinsic functions, you could simply calculate the hundreths value yourself, then round accordingly. such as:

lngYourNumber = 45677

intRounder = lngYourNumber Mod 100  'the hundreths value

If intRounder >= 50 Then
   ' add the difference of 100 - the remainder
   lngYourNumber = lngYourNumber + (100 - intRounder)
Else
   ' subrtract the remainder
   lngYourNumber = lngYourNumber - intRounder
End If

 

[cramd]

Thank you both for the suggestions. Exactly what I needed!!
Diane