Visual Basic - Numeros

Hola a todos estoy intentando un redondeo del siguiente tipo que os explico ahora peor no se como hacerlo:

si el nº es 12.500 es =13
si el nº es 10.001 es =11
si el nº es 8.500 es = 9
si el nº es 500 es = 1

gracias por todo.

Hola, una solución creo que podría ser tomar los números cómo cadenas, y separando la parte entera con una función.
Si hay punto o coma a la parte entera le sumas 1 y si el número es menor que 1000 devolvés 1.
Espero que te sirva....