[ﻣﺒﺘﺪﺉ]

للتقريب لأقرب مئة بشكل دقيق بنضيف سطر ال 100 بعد العشرة

Dim n = 346
n = Math.Round(n / 10) * 10
n = Math.Round(n / 100) * 100