VBcoders Browse New Submit Contact Sign In

No account? Register free

Forgot password?

MexCurrency2Words

AlGen Technologies  (2 Submissions)   String Manipulation   Visual Basic 3.0   Beginner   Wed 3rd February 2021

This module contains a function that will
take a currency var (up to 999,999,999.99)
and return the result
(including cents) as a string "spelled-written"
amount formated for mexican pesos.
'Public Function ConvierteNumeroALetra(Numero As Currency) As String'
Altrough it was made for mexican pesos,
it can be easily adapted for
any unit, in any language,in any way.
There are lots of number2words functions
out there, but I think mine is the
more understandable ans simplier
of 'em.
You will have to spend some time converting
the spanish numbers to english, thou...
----------------
Este modulo contiene una funcion que
toma una variable de moneda(currency)
(Hasta 999,999,999.99) y regresa
la cantidad de forma escrita como String.
(Incluye centavos)
'Public Function ConvierteNumeroALetra(Numero As Currency) As String'
La cantidad escrita la regresa usando el
formato de monto escrito en pesos mexicanos,
usado en cheques, depositos, facturas, etc.
Por ejemplo:
$1,525.23 = (Mil Quinientos Veinticinco Pesos, 23/100 M.N.)
Los centavos se escriben siempre sobre cien, y
M.N. significa Moneda Nacional.

Si esto les sirve, haganmelo saber.
-Fongus


Rate MexCurrency2Words (3(3 Vote))
MexCurrency2Words.bas

MexCurrency2Words Comments

No comments yet — be the first to post one!

Post a Comment

0/1000 characters