Převodník jednotek

Zde je jedna z dalších ukázek použití jazyka VB.NET, dnes tu máme ukázkovou aplikaci převodník jednotek.

Aplikace převádí jednotky kapacity TB, GB, MB, KB a B. Pro převod používá matematický vzorec.

OOP Návrh

Aplikace má třídu Prevodnik. Ve třídě prevodnik je soukromý výčet Jednotky, soukromá metoda ziskejJednotku, která vrací jednotku ze zadaného textu. A do třetice soukromá metoda Hodnota, která vrací hodnotu.

Dále je ve třídě Prevodnik veřejná metoda Preved, která převede číslo.

Algoritmus

uzvatelovaHodnota * 1024 ^ (uzivatelovaStaraJednotka - uzivatelovaNovaJednotka)

Jak to funguje? Máme enumeraci jednotky, v enumeraci jsou jednytky přidělené nějaké hodnotě.

Private Enum jednoty As Integer
    TB = 4
    GB = 3
    MB = 2
    KB = 1
    B = 0
End Enum

A abychom dostali převodovou hodnotu musíme umocnit 1024 na rozdíl jednotek. No a abychom napsali uživateli, kolik je to jeho číslo, tak to musíme ještě vynásobit.

Galerie