Подскажите с округление плиз! - VB

Формулировка задачи:

Подскажите с округление плиз!
Есть ли финкция уже какая-нибудь , которая умеет округлять чила...
мне нужно следующее округление до:

можно самому писать но это не малый код и проверок много...
тем более еще надо округлять как вверх, так вниз и математически!
спасибо!

Решение задачи: «Подскажите с округление плиз!»

textual
                            Листинг программы 
                        

                            т.е. математически до <font color="darkblue"><b>900</b></font>
<font color="darkblue"><b>420</b></font> - <font color="darkblue"><b>0</b></font> 
<font color="darkblue"><b>450</b></font> - <font color="darkblue"><b>900</b></font>
<font color="darkblue"><b>449</b></font> - <font color="darkblue"><b>0</b></font>
<font color="darkblue"><b>1420</b></font> - <font color="darkblue"><b>1900</b></font>
<font color="darkblue"><b>1399</b></font> - <font color="darkblue"><b>900</b></font>
вверх  до <font color="darkblue"><b>900</b></font>
<font color="darkblue"><b>420</b></font> - <font color="darkblue"><b>900</b></font>
<font color="darkblue"><b>440</b></font> - <font color="darkblue"><b>900</b></font>
<font color="darkblue"><b>800</b></font> - <font color="darkblue"><b>900</b></font>
<font color="darkblue"><b>901</b></font> - <font color="darkblue"><b>1900</b></font>
и вниз до <font color="darkblue"><b>900</b></font>
<font color="darkblue"><b>420</b></font> - <font color="darkblue"><b>0</b></font>
<font color="darkblue"><b>899</b></font> - <font color="darkblue"><b>0</b></font>
<font color="darkblue"><b>901</b></font> - <font color="darkblue"><b>900</b></font>
<font color="darkblue"><b>1899</b></font> - <font color="darkblue"><b>900</b></font>
                        