Math.Round(number, 4 - (CType(Math.Log10(number) + 1, Integer)))
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)