Deleting few characters from a string

[rpk_20061975]

I have a string like:
strMessage = "0x68393............"
While reading I want to first retrieve the 0x68393 code and
store it in a variable, and then delete this code from the
string "strMessage".

How to do so?
...............
Rohit.

[phinds]

go to the on-line help and check out "left$" and "right$"

[techyspecy]

Option Explicit
 
Private Sub Form_Load()
Dim l_strMessage As String
Dim l_strPartial As String
    
    l_strMessage = "0x68393............"
    l_strPartial = Mid(l_strMessage, 1, InStr(1, l_strMessage, ".", vbTextCompare) - 1)
    l_strMessage = Replace(l_strMessage, l_strPartial, "")
End Sub

[rpk_20061975]

Thanks, I will try.