Number => Text

[Ralf1980]

Hoi,

Dit is een lastige vraag.. ik weet dat het mogelijk is maar ik weet niet hoe..

Wat ik wil is een formule waarmee je cijfers omzet in text.

Bijv. 1150 => eleven thousand one hundred fifthy

Ik heb al eens een programma gezien waarin dit gedaan was, maar weet helaas niet meer hoe..

Is er iemand die dit weet???

Bvd,
Ralf

 

[Tanja1968]

Heb je hier iets aan? (ben zelf niet thuis in VB) http://www.planet-source-code.com/vb/scripts/ShowCodeAsText.asp?txtCodeId=520&lngWId=-1

 

[computernerd]

Sorry, ik had de post hierboven niet gelezen, beschou dit maar als "niet gepost" .

--------------------------------------------------------------------
Je kan natuurlijk opgeven iets als:

Private Sub Command1_Click()
If Text1 = "1" Then Text1 = "one"
If Text1 = "2" Then Text1 = "two"
Ervan uitgaande dat Text1 de cijfers bevat die je om wil zetten

Maar dan moet je voor elk cijfer, tiental, hondertal, duizendtal etc. etc. een aparte naam opgeven, dit is enorm veel werk. Verder zou ik het ook niet weten .