
dotnetprogrammersnotes.blogspot.com
.Net Programmer's NotesMonday, February 1, 2010. Converting Numbers into Words 2. Public Function gfstrSpellNoThousand(ByVal strParamNo As String) As String. Dim strDollars As String. Dim strCents As String. Dim strTemp As String. Dim intDecPlace As Integer. Dim intCount As Integer. Dim strPlace(9) As String. StrPlace(2) = " Thousand ". StrPlace(3) = " Million ". StrPlace(4) = " Billion ". StrPlace(5) = " Trillion ". String representation of amount. Position of decimal place 0 if none. IntDecPlace = InStr(strParamNo, ".").
http://dotnetprogrammersnotes.blogspot.com/