Hay probablemente maneras más elaboradas de hacer esto, pero itsuch un dolor que mecanografía en esta pantalla minúscula, así que ofreceré esto:
Función GetSnippet (el src de la secuencia, internacional maxlen) como secuencia
{
Temp dévil como nuevo System.Text.StringBuilder ();
Palabras déviles () como secuencia = src. Partir (nuevo carbón de leña () {''});
Para i como número entero = palabras 0. Longitud - 1
Si temp. Longitud + palabras [i]. Temp <� maxlen="" Then=""> de la longitud. Añadir (palabras (i) y “")
temp.ToString de vuelta (). Ajuste ()
Terminar si
Después
temp.ToString de vuelta (). Ajuste ()
Función del final