Ottenere da un testo una parte delimitata da due parole

Da Gambas-it.org - Wikipedia.

Se di un testo si vuole ottenere una parte delimitata da due parole, si può semplicemente utilizzare la funzione Scan().


Poniamo per esempio di voler ottenere dal seguente testo:

Lo scopo di questa Wiki è quello di condividere,
scambiare, immagazzinare la conoscenza in modo collaborativo
grazie alle potenzialità offerte dalla Wiki stessa,
una collezione di documenti ipertestuali.

la parte compresa tra la parola "la conoscenza" e la parola "collezione".

Si procederà inserendo come elementi del secondo argomento della funzione Scan(), detti percorsi, la parola o le parole, qualora sia necessario inserire più parole per individuare precisamente l'inizio o il termine della parte da ottenere. l'Adozione di questa seconda modalità - con pidue o più parole, risulta utile quando la parola precedente l'inizio della parte di testo da ottenere, oppure la parola successiva alla fine della parte, sia un lemma presente due o più volte nel testo.

Public Sub Main()

 Dim testo As String = "Lo scopo di questa Wiki è quello di condividere," &
                        "scambiare, immagazzinare la conoscenza in modo collaborativo" &
                        "grazie alle potenzialità offerte dalla Wiki stessa," &
                        "una collezione di documenti ipertestuali."

  Print Scan(archivo, "*immagazzinare* *di*")[2]

End


Il risultato finale in console sarà:

la conoscenza in modo collaborativo
grazie alle potenzialità offerte dalla Wiki stessa,
una collezione