[VB6] Découper un mot dans une textBox multiligne?

Bonjuour à tous,

Comment faire pour découper un mot?

Je m'explique : j'ai une textBox multiligne, "Text1", je vais faire un exemple, dans ma text1, j'ai :

"Bonjour, comment aller-vous? Moi je vais très bien." -> 1ère ligne
"Maintenant je dois aller travailler pour gagner de l'argent" -> 2ème ligne

Et moi j'aimerais un truc dans ce genre là :

"Bonjour, comment aller-vous? Moi je vais très bien. Main-" -> 1ère ligne
"tenant je dois aller travailler pour gagner de l'argent" -> 2ème ligne


Merci d'avance.

Bonjour
Regardes du coté de l'instruction Mid (pas la fonction).