:afrog:
thanks
:thumb:
Printable View
:afrog:
thanks
:thumb:
VB Code:
Dim strString As String strString = "name=SOMETHINGmessage=SOMETHING" MsgBox Split(Split(strString, "=")(1), "message")(0) MsgBox Mid(strString, InStrRev(strString, "=") + 1, Len(strString) - InStrRev(strString, "=") + 1)
Welcome to the forums. :wave:
You will need to be a bit more specific.
Where is the line? Are you talking about text in a textbox? Text in a file?
When we have what we are looking for, what are we searching? A database field? A textbox? A text file? What?
try this:VB Code:
Dim myString$ Private Sub Command1_Click() myString = "name=SOMETHINGmessage=SOMETHINGELSE" MsgBox "name = " & Split(Split(myString, "=")(1), "message")(0) MsgBox "message = " & Mid$(myString, InStrRev(myString, "=") + 1) End Sub
EDIT: Not again :cry: