Funkce:
Public Function KilogramsToPounds(Kilograms As Single) As Single
'P°evod
kilogram∙ na libry
KilogramsToPounds = Round(Kilograms / 0.4536, 4)
End Function
Public Function PoundsToKilograms(Pounds As Single) As Single
'P°evod
liber na kilogramy
PoundsToKilograms = Pounds * 0.4536
End Function
|