B4J Question Rupees in Words in Lakh format?

[raghav1611]

Hello
I am developing little project using b4j.
Now I want Rupees in words in Lakhs, crore format.

I found one Library in the forum owned by @omidaghakhani1368
It works great. But that library format is million,billion format.

But I want lakh,crore format.

Any library Available or any Suggestion.

Thanks
Raghav

 

[aeric]

I found one Library in the forum owned by @@omidaghakhani1368

Unfortunately, it is a compiled library. No source code for reference.

 

[AnandGupta]

You can check this,

[B4X] Format 10,000 (Ten Thousand) to Lakh

B4J 2.80+ Sub FormatLakh(number As Double, decimals As Int) As String Dim dd As Int, ss As String Dim mm As Long = Abs(number) Dim nn As Long = mm / 1000 Dim dc As Double = (mm Mod 1000) + Abs(number) - mm Dim lakh As String = NumberFormat2(dc, 1, decimals, decimals, False)...

www.b4x.com

 

[aeric]

You can check this,

[B4X] Format 10,000 (Ten Thousand) to Lakh

B4J 2.80+ Sub FormatLakh(number As Double, decimals As Int) As String Dim dd As Int, ss As String Dim mm As Long = Abs(number) Dim nn As Long = mm / 1000 Dim dc As Double = (mm Mod 1000) + Abs(number) - mm Dim lakh As String = NumberFormat2(dc, 1, decimals, decimals, False)...

www.b4x.com

He wants number to words. Example 10,000 to “One Lakh”.

 

[AnandGupta]

He wants number to words. Example 10,000 to “One Lakh”.

Ok. then below will work, I think

[B4X] Integer to Word

' Convert an integer number to words ' Pr.S ' Range: >-1,000,000 to Int2Word(-13422, False, True) Sub Int2Word (Value As Int, IgnoreZero As Boolean, AllowNegatives As Boolean) As String Dim OnWords() As String = Array As...

www.b4x.com

 

[raghav1611]

You can check this,

[B4X] Format 10,000 (Ten Thousand) to Lakh

B4J 2.80+ Sub FormatLakh(number As Double, decimals As Int) As String Dim dd As Int, ss As String Dim mm As Long = Abs(number) Dim nn As Long = mm / 1000 Dim dc As Double = (mm Mod 1000) + Abs(number) - mm Dim lakh As String = NumberFormat2(dc, 1, decimals, decimals, False)...

www.b4x.com

Thanks. I will check it out.