[RESOLVED] basic string help :(

Ok, so i have done this:

Text1.Selstart = Instr(Text1, "http://img.")

This begins the start of the selection, however there isnt a Selend, only a Sellength!

I need a way (because the length will always be random) to find the string ".jpg" and end the selection there.

Its properly really easy :p but im finding this really hard

thanks

Truncate the trailing part first. Sellength would then be length of this string less length of leading characters you will also truncate.

Could you give me an example :$ im real bad with this string stuff, it really messes with my mind

something like this maybe:

Code:

---

Dim val As Integer
Text1.SelStart = 0
pos = InStr(Text1.Text, ".jpg")
val = Len(Mid(Text1.Text, 1, pos - 1))
Text1.SelLength = val

---

My contribution, something like:

Code:

---

Private Const SEARCHFOR As String = "http://img."

Private Sub Command1_Click()
Dim intSelStart As Integer
Dim intSelEnd As Integer
Dim intSelLength As Integer
Dim intSLen As Integer
intSLen = Len(SEARCHFOR)
intSelStart = InStr(Text1.Text, SEARCHFOR)
intSelEnd = InStr(intSelStart + intSLen - 1, Text1.Text, ".jpg")
Text1.SelStart = intSelStart - 1
Text1.SelLength = intSelEnd + 3 - intSelStart + 1
End Sub

---

thanks. that last one did it :)