I just did a similar thing in one of my scenes. This should get you started. In the script for the text object try this.
Dim index as integer
index = Text.IndexOf(" ")
Text = Text.Remove(0,index)
This script counts up to the first space in the string them removes everything up to that. How it helps.
Mike
#XPression