Using the InStr Function

Hi,

I am having a little trouble using the InStr function. I don’t have a clue how to use it? I was making a program that found the “ – “ in the title bar and added some text to the right of it. How would I do this? I tried this statement:

Dim intFound As Integer
intFound = InStr(form1.Caption, “ – “)
Form1.caption = Left$(Form1.Caption, intFound) & Text1.Text

For some reason this is not working. Could you please tell me the correct statement and explain is it is not too much bother.

Thanks

This seems to work for me:

Code:

---

Private Sub Command1_Click()
    Dim intFound As Integer
    intFound = InStr(Form1.Caption, "–")
    Form1.Caption = Form1.Caption & Left$(Form1.Caption, intFound) & Text1.Text
End Sub

---

Your code doesn't work because when You use Left function it automatically erases everything in a caption and then just adds whatever Left came up with.

Note: It will only work if there is no more than one (1) '-' in Form1.Caption


------------------
Visual Basic Programmer (at least I want to be one)
------------------
PolComSoft
You will hear a lot about it.

[This message has been edited by QWERTY (edited 11-14-1999).]