Insert space

[honky]

Good morning,
I have an array of strings: name$(n).
I would like to insert a space between the penultimate and the last character of each string.
How to do please ?
Thank you for.

[whiskeyd]

NewWord$ = LEFT$(String$, LEN(String$) - 1) + " " + MID$(String$, LEN(String$) - 1)

[plus]

wrd$ = "I_am_an_inch_worm."
for j = 1 to 72
   for i =  len(wrd$) to 1 step -1
       cls
       print space$(j) +mid$(wrd$, 1, i) +  " " + mid$(wrd$, i+1 , len(wrd$)-i)
       call pause 120
   next
next

sub pause mil   'tsh version has scan built-in
   t0 = time$("ms")
   while time$("ms") < t0 + mil : scan : wend
end sub



[honky]

Thank you "whiskeyd"
And thank you "plus"