11,931,104 members (58,387 online)
Add your own
alternative version

121.8K views
8.7K downloads
32 bookmarked
Posted

# Convert Number to Word

, 19 Feb 2008 CPOL
 Rate this:
Please Sign up or sign in to vote.
Convert any decimal number to word using vb.net

## Introduction

I have created this function for converting amount in Indian Rupees (INR). You can manipulate as you wish like decimal setting, Doller (any currency) Prefix.

## Background

I have coded this function as per client's requirement to print word format of Billed Amount.

## Using the code

This two dimensional array store the primary word convertion of number.

``` Function retWord(ByVal Num As Decimal) As String
'This two dimensional array store the primary word convertion of number.
retWord = ""
Dim ArrWordList(,) As Object = {{0, ""}, {1, "One"}, {2, "Two"}, {3, "Three"}, {4, "Four"}, _
{5, "Five"}, {6, "Six"}, {7, "Seven"}, {8, "Eight"}, {9, "Nine"}, _
{10, "Ten"}, {11, "Eleven"}, {12, "Twelve"}, {13, "Thirteen"}, {14, "Fourteen"}, _
{15, "Fifteen"}, {16, "Sixteen"}, {17, "Seventeen"}, {18, "Eighteen"}, {19, "Nineteen"}, _
{20, "Twenty"}, {30, "Thirty"}, {40, "Forty"}, {50, "Fifty"}, {60, "Sixty"}, _
{70, "Seventy"}, {80, "Eighty"}, {90, "Ninety"}, {100, "Hundred"}, {1000, "Thousand"}, _
{100000, "Lakh"}, {10000000, "Crore"}}

Dim i As Integer
For i = 0 To UBound(ArrWordList)
If Num = ArrWordList(i, 0) Then
retWord = ArrWordList(i, 1)
Exit For
End If
Next
Return retWord
End Function

```

## License

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

## About the Author

 Software Developer (Senior) India
Pranav Patel
B.Sc, MCSD

I am serving my company as Sr. Software Engineer. I have more than 4 years of experience in Microsoft Technologies specially VB 6, VB.Net,C#,ASP.Net and MS SQL Server

## Comments and Discussions

 First Prev Next
 Worked Member 1112113630-Sep-14 8:16 Member 11121136 30-Sep-14 8:16
 THANKS A LOT Member 1111700928-Sep-14 23:32 Member 11117009 28-Sep-14 23:32
 number conversion Member 1102112918-Aug-14 22:05 Member 11021129 18-Aug-14 22:05
 number conversion using vb.net Member 1102112918-Aug-14 21:53 Member 11021129 18-Aug-14 21:53
 THANKS A LOT DEAR..... satishgurav18-Jul-14 19:21 satishgurav 18-Jul-14 19:21
 My vote of 3 Ashoka Pathirana21-May-14 19:38 Ashoka Pathirana 21-May-14 19:38
 thanks Ram A Singh14-Aug-13 7:50 Ram A Singh 14-Aug-13 7:50
 It never converts zeros JAYANTHIMURUGESAN26-Mar-13 15:33 JAYANTHIMURUGESAN 26-Mar-13 15:33
 Thanks taenel l pasaylo27-Jan-13 2:27 taenel l pasaylo 27-Jan-13 2:27
 Not perfect alifaris5-Nov-12 9:36 alifaris 5-Nov-12 9:36
 project rahul binaikia29-May-12 5:58 rahul binaikia 29-May-12 5:58
 Thanks !!! Member 340016411-May-12 16:17 Member 3400164 11-May-12 16:17
 My vote of 5 Jack_32123-Apr-12 0:38 Jack_321 23-Apr-12 0:38
 Thanks Member 850926513-Mar-12 20:09 Member 8509265 13-Mar-12 20:09
 My vote of 4 Md. Marufuzzaman2-Jan-12 20:22 Md. Marufuzzaman 2-Jan-12 20:22
 My vote of 5 Аslam Iqbal26-Dec-11 21:43 Аslam Iqbal 26-Dec-11 21:43
 Nice Work maruf2111-Dec-11 13:17 maruf21 11-Dec-11 13:17
 My vote of 1 Member 846869111-Dec-11 5:16 Member 8468691 11-Dec-11 5:16
 My vote of 1 divyanivas18-Aug-11 10:10 divyanivas 18-Aug-11 10:10
 How do increase to more than 999999999.99 Deepesh Krishnan29-Apr-11 20:50 Deepesh Krishnan 29-Apr-11 20:50
 My vote of 5 CodeDog13-Apr-11 5:58 CodeDog 13-Apr-11 5:58
 My vote of 1 yogeshd3918-Feb-11 2:23 yogeshd39 18-Feb-11 2:23
 Good Article but with alot of limitations Albert Dadze17-Dec-10 7:00 Albert Dadze 17-Dec-10 7:00
 My vote of 3 Ashwani2k12-Jul-10 9:14 Ashwani2k 12-Jul-10 9:14
 Usefull Work Vimal Upadhyay16-May-10 23:43 Vimal Upadhyay 16-May-10 23:43
 Thanks hrivero23-Mar-10 10:35 hrivero 23-Mar-10 10:35
 My vote of 1 geminiousgoel26-Jan-10 6:45 geminiousgoel 26-Jan-10 6:45
 C# Code please yeswanths4-May-09 5:36 yeswanths 4-May-09 5:36
 Re: C# Code please - Working upto 999999999.99 Member 468636426-Nov-09 1:09 Member 4686364 26-Nov-09 1:09
 Thanks a lot rajakar0123-Dec-08 20:00 rajakar01 23-Dec-08 20:00
 Try One million and above sensei41200131-Aug-08 23:20 sensei412001 31-Aug-08 23:20
 Thanks Rai Shahid16-Jul-08 0:38 Rai Shahid 16-Jul-08 0:38
 IndRs. converter Arijit Manna15-Jul-08 3:31 Arijit Manna 15-Jul-08 3:31
 Last Visit: 31-Dec-99 19:00     Last Update: 29-Nov-15 23:42 Refresh 1

General    News    Suggestion    Question    Bug    Answer    Joke    Praise    Rant    Admin

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

| Advertise | Privacy | Terms of Use | Mobile
Web03 | 2.8.151126.1 | Last Updated 20 Feb 2008
Article Copyright 2008 by Patel Pranav
Everything else Copyright © CodeProject, 1999-2015
Layout: fixed | fluid