VBA.VB6 - noapaļošanas funkcija (lielāka vai mazāka par n cipariem)

Apaļā () funkcija nodrošina nepareizu skaitļu noapaļošanu šādā formā:

(2a + 0, 5) x 10 ^ -n (ap pusi uz leju)

Ar mīnusiem formas (2a - 0, 5) x 10 ^ -n numuri parasti ir ap pusi.

Autors: Patrice33740

Piemēram:

Kārta (0, 15, 1) = 0, 2

Kārta (0, 25, 1) = 0, 2

Kārta (0, 35, 1) = 0, 4

Kārta (0.45, 1) = 0.4

Turpmāk norādītajai noapaļošanas funkcijai nav šādas anomālijas:

Kārta (0, 15, 1) = 0, 2

Kārta (0, 25, 1) = 0, 3

Kārta (0, 35, 1) = 0, 4

Kārta (0, 45, 1) = 0, 5

 Privātās funkcijas kārta (ByVal Number, ByVal Decimal) Arrondi = Int (skaits * 10 ^ Decimālais + 1/2) / 10 ^ Decimālā beigu funkcija