Click here to Skip to main content
15,880,543 members
Articles / Programming Languages / VBScript

Convert Currency To Words in Lakh, Crores, etc.

Rate me:
Please Sign up or sign in to vote.
3.26/5 (23 votes)
16 Feb 2004CPOL1 min read 183.6K   8.8K   24   15
Convert a given currency in words with Indian style digital grouping

Introduction

In the computing world, the convention used for grouping of digits is based on international standards which generally follows American practice. It means that digits are grouped in groups of two digits each, i.e. thousands, millions, billions, etc. However, people in India are habituated to groups of three, two, two... This groups form the thousands, lakhs, crores, etc. To solve this problem, a function has already been posted on CodeProject by me for converting any number to the groupings of thousands, lakhs, crores, etc. In continuation of this, the function here converts any number to the number in words with digit grouping of thousands, lakhs, crores, etc.

Background

This function is in Visual Basic and is based on the knowledge base article of Microsoft. The original article converts the number to the international digit grouping, i.e. thousands, millions, billions, etc.

Using the Code

As the function is written in Visual Basic, the same may be used in any application using Visual Basic as the scripting language. For using the code in Excel, Word, Access, simply copy and paste the full code in the Visual Basic module and use the function.

How It Works

The function is named as NumberToWords. This accepts a parameter of type variant. First, the function checks the existence of decimal in the number passed as parameter. If decimal exists, it constructs the word for paisa. After removing the decimal digits from the number, it converts digits, tens and hundreds by using routine ConvertDigits, ConvertTens and ConvertHundreds respectively. It constructs and returns a string containing the number in words with rupees and paisa as prefix and suffix.

History

  • 16th February, 2004: Initial post

License

This article, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)


Written By
Systems Engineer
India India
I love to learn new technology specially IT related. Programming is my hobby.

Comments and Discussions

 
GeneralBugs corrected in the function [modified] Pin
Vidyadhar B.C.14-Oct-07 22:05
Vidyadhar B.C.14-Oct-07 22:05 
GeneralConvert Currency To Words Solved all problems Pin
Nair Sreekumar30-Jul-07 23:25
Nair Sreekumar30-Jul-07 23:25 
GeneralBug in the code and a workaround Pin
kunmun2314-Jul-07 7:53
kunmun2314-Jul-07 7:53 
GeneralRe: Bug in the code and a workaround [modified] Pin
Vidyadhar B.C.14-Oct-07 17:55
Vidyadhar B.C.14-Oct-07 17:55 
Questionhow do i use? Pin
pavanghai8-Mar-07 5:15
pavanghai8-Mar-07 5:15 
GeneralPls specify the function or the formula to be used in MS Excel/Access [modified] Pin
Suresh Kardar8-Oct-06 19:13
Suresh Kardar8-Oct-06 19:13 
GeneralDigit to word conversion program-reg Pin
S.PRAKASH7-Jul-06 20:17
S.PRAKASH7-Jul-06 20:17 
GeneralSolved my Problem Pin
tmistry23-May-06 21:22
tmistry23-May-06 21:22 
GeneralThousand Digit Not define Properly Pin
John dsoza28-Apr-06 1:57
John dsoza28-Apr-06 1:57 
GeneralUnable to use the function in access 2003 Pin
Dnyanraj16-Jan-06 23:51
Dnyanraj16-Jan-06 23:51 
I have copied the code given by you but I am unable to use it in access 2003. Can you help me by giving instructions on how to use the code in an Access 2003 Form

DMP
GeneralWant to use the same for other application Pin
gotspatel1-Feb-05 3:08
gotspatel1-Feb-05 3:08 
GeneralProblem in Conversion Pin
Krishna Kumar Menon30-Aug-04 1:55
Krishna Kumar Menon30-Aug-04 1:55 
GeneralGreat, but... Pin
Snyp17-Feb-04 15:45
Snyp17-Feb-04 15:45 
GeneralRe: Great, but... Pin
P.K.Agarwal19-Feb-04 16:06
P.K.Agarwal19-Feb-04 16:06 
GeneralRe: Great, but... Pin
P.K.Agarwal19-Feb-04 16:10
P.K.Agarwal19-Feb-04 16:10 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.