I mitt projekt öppnar jag en fil och vill lista varje rad i en ComboBox

Dim LWord, Mslag
Open AppPath & "ord.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, temp
Mslag = InStr(1, temp, " ") ' Hitta mellanslag
If Mslag Then
LWord = Left(temp, Mslag - 1) ' Vänstra ordet
Combo1.AddItem LWord
End If
Loop
Close #1

Den koden gör vad den ska, men hur hittar jag sista mellanslaget och listar sen varje rad, utan sista ordet på varje rad?

Du kan använda <code>InstrRev()</code>
Läs mer: http://www.pellesoft.nu/login/articles/vb/stringguide.asp

Tyvärr, jag tror inte jag kan använda InstrRev(). Anänder just nu VB 3!
Kan det inte gå att använda Right-funktionen?
Har provat men får inte till det. Anta att sista ordet alltid är 1 eller 2 tecken långt!

Något sånt här funkar kanske:

str = Split(Trim(temp), " ")
RWord = str(Ubound(str))

Split() kom i och med vb6. Finns inte i VB 3. ;o)