Remove curly braces from a GUID - [RESOLVED]

I need a function that will strip the opening and closing curly braces from a GUID...I have tried using the Replace function (only good for replacing one character) and the Instr function (could get this to work)

Any Ideas???

Code:

---

strGUID = "{89eh-84h8-920d-93hd-94jd}"

I need it to remove the { and } and return just the
89eh-84h8-920d-93hd-94jd value

---

Hi:wave:

Hope this helps you should work i just tested it

VB Code:

[color="#0000A0"]Dim[/color] A [color="#0000A0"]As[/color] [color="#0000A0"]String[/color]
[color="#0000A0"]Dim[/color] B [color="#0000A0"]As[/color] [color="#0000A0"]String[/color]
[color="#0000A0"]Dim[/color] C [color="#0000A0"]As[/color] [color="#0000A0"]String[/color]
A = InStr(1, txtStr, "{") + 1
B = InStr(A, txtStr, "}")
C = Mid$(txtStr, A, B - A)
MsgBox C

If it's always the first and last character of the string this code is easier:

VB Code:

Dim strGUID As String
strGUID = "{89eh-84h8-920d-93hd-94jd}"
MsgBox Mid(strGUID, 2, Len(strGUID) - 2)

Quote:

---

Originally posted by Memnoch1207
I have tried using the Replace function (only good for replacing one character)

---

For what it's worth:

VB Code:

MsgBox Replace(Replace("{89eh-84h8-920d-93hd-94jd}", "{", ""), "}", "")

Also, If you use Mid() while working with String Data Types, then use the $ like: strBuff = Mid$()



Bruce.

Or, if {} are always going to be first and last,

VB Code:

strGUID = "{89eh-84h8-920d-93hd-94jd}"
strGUID = Left(strGUID, (Len(strGUID) - 1)
strGUID = Right(strGUID, (Len(strGUID) - 1)

I went with this code.

Code:

---

Mid$(EID, 2, Len(EID) -2)

---

but for some reason this

Code:

---

Replace(Replace("{89eh-84h8-920d-93hd-94jd}", "{", ""), "}", "")

---

was generating an error.

It's all finished, thanks for the help.