Buscar caracter dentro de un string y evitar recorte de palabra

Tengo un texto en un textbox(txtDatos) y quiero separar las palabras en tramos de 100 en 100 en un msgbox, pero que estas palabras no se corten por ejemplo el codigo actual me devuelve asi:

Código:

¿Cómo funciona el patrón MVC? El funcionamiento básico del patrón MVC, puede resumirse en:El usua
rio realiza una petición.El controlador captura el evento (puede hacerlo mediante un maneja
dor de eventos handler, por ejemplo).Hace la llamada al modelo/modelos correspondientes(por ejem
plo, mediante una llamada de retorno callback).

Lo que quiero hacer es buscar el ultimo espacio de cada tramo de 100 caracteres y seguir con el sigte. tramo, por lo tanto algunos tramos no tendran 100 sino 85, 92 dependiendo de la ultima palabra, nose si me dejo entender.

Código:

Private Sub Form_Load()
txtNumero = "1"
End Sub

Private Sub Command2_Click()
x = txtNumero
MsgBox Mid(txtDatos, x, 100)
txtNumero = Val(txtNumero) + 100
End Sub

El resultado tendria que ser mas o menos asi, la cuestio es que no me corte la ultima palabra de cada tramo de 100 caracteres:

Código:

¿Cómo funciona el patrón MVC? El funcionamiento básico del patrón MVC, puede resumirse en:El
usuario realiza una petición.El controlador captura el evento (puede hacerlo
mediante un manejador de eventos handler, por ejemplo).Hace la llamada al modelo/modelos
correspondientes(por ejemplo, mediante una llamada de retorno callback).