TextBox Question

[System_Error]

If you had two textboxes and in the first one the user typed a number such as 15. How would you get it to say Fifteen in the second textbox?

[taxes]

Hi,

There is always the long way;

Select case val(txt1.text)
case 1
txt2.text="One"
etc

[michaeljustman]

Make an array of a string variable and have each of the values of the array hold the text for the name of number. (This would only work if you were willing to type in up to the number that you needed in text.) For example:

Public NText$(9) As String
 
NText$(0) = "Zero"
NText$(1) = "One"
NText$(2) = "Two"
NText$(3) = "Three"
NText$(4) = "Four"
NText$(5) = "Five"
NText$(6) = "Six"
NText$(7) = "Seven"
NText$(8) = "Eight"
NText$(9) = "Nine"
'NText$(n) = "(English Equivilant)"
'....on forever

Then when you needed it. You could refrence the variable in your code.

Sub Text1_Change
    If IsNumeric(Text1.Text) = True THEN Text2.Text = NText$(VAL(Text1.Text))
End Sub