Change Spaces to"_"

[irresistible007]

I have a text box, list Box and a cmd Button... clicking cmd button will add the Item typed in text box to List Box... BUT!!! i need to change any spaces to underscores, for instance if somebody typed "United Kingdom" and hit the add button then the item should appear like "United_Kingdom" in the List Box....

Any suggestions... though I know that the Chr function is the main ingredient but then how to look for positions and repeatitions?

 

[SydneyGeek]

If you want to replace all spaces with underscores, try:

sItem = Replace(Trim(sItem), " ", "_")

Where sItem is the data from the textbox

You can then add sItem to the listbox.

Denis

 

[irresistible007]

How about using Instr and Replace?... have just come to know about these functions

 

[SydneyGeek]

You could, but it's unnecessary. Replace does the job very efficiently by itself.

I added Trim in case anyone typed a space at the beginning or end.

Denis