Hent tekststreng mellem to ord

Hvis du vælger at anvende kun et "." istedet for "da." & ".ad"
kunne du lave en:

dim streng as string
for each streng in split("hallihallotida.hila.adndjdskfg", ".")
    ' udskriv eller tæl frem til element du ønsker
next

Det var bare et hurtigt forslag

brug InStr...

Hvordan bruger jeg Instr? Jeg kan ikke bruge din løsning rbj fp, da der ikke vil være 2 ens ting på hver side af det ord jeg skal bruge.

Læs i hjælpen om brug af instr

Dim strInput As String
Dim strResult As String
Dim intStart As Integer
Dim intEnd As Integer
Dim strSearchSTART As String
Dim strSearchEND As String

strSearchSTART = "da."
strSearchEND = ".ad"

strInput = "hallihallotida.hila.adndjdskfg"
intStart = InStr(1, strInput, strSearchSTART) + Len(strSearchSTART)
intEnd = InStr(1, strInput, strSearchEND)
strResult = Mid(strInput, intStart, intEnd - intStart)
MsgBox strResult

Ovenstående tager ikke højde for forkert brug - f.eks. at du søger noget, der ikke findes osv. Lav selv kode der håndterer dette

I øvrigt, therichman:

Jeg kan se, at du har gang i Visual Basic igen nu.

Du LOVEDE at lave et program, der kunne forudsige vejret. Det var ret let at lave, det kunne du sagtens, sagde du engang. Har du fået lavet det?

Når du skriver:

SVAR HURTIGST MULIGT!

Ville det måske være passende at acceptere svarene du får, fx. inden to uger som der nu næsten er gået ;o)