HigherDigitHindiString = HigherDigitHindiNumberArray( CInt(codeIndex.Substring( 0, 1)) - 1) If Amount = 0 Then Return ' शून्य' ' Unique and exceptional case If amountString.Length > 15 Then Return ' That's too long.' Dim amountArray() As Integer = NumberToArray(amountString)ĭim j As Integer = 0 Dim digit As Integer = 0 Dim result As String = ' ' Dim separator As String = ' ' Dim higherDigitHindiString As String = ' ' Dim codeIndex As String = ' ' For i As Integer = amountArray.Length To 1 Step -1 Private Function HindiStyle() As String Dim amountString As String = Amount.ToString These numbers, we take advantage of both backward ( i variable) and forward ( j variable) indices. If it’s in unit place, tenth place and other place. Once we know the place of the digit we can trisect the case as The logic behind this array is very simple, explained later in theĪrticle.
We first find out in which place the given digits falls in like, unit, tenth, hundredth, and so on by using SouthAsianCodeArray.
