Deleting a hypen from a value ( 12-13) 1

[campbere]

I would like to delete a hyphen from a value. For example I have the value 12-13 and I want 1213. I thought about using the Instr to find the position of the - and then use that possibly to remove the -. But I am not sure what function does this. Does anyone have any ideas or could point me in the right direction? If it matters my field is a varchar(2) and it is in Oracle.

Thanks

 

[dsi]

You could use the Instr() function like this:

Option Explicit

Sub Test()
    MsgBox RemoveHyphen("12-13")
End Sub

Public Function RemoveHyphen(sVal As String) As String
    Dim iPos As Long
    iPos = InStr(1, sVal, "-")
    If iPos > 0 Then
        RemoveHyphen = Left(sVal, iPos - 1) & Right(sVal, Len(sVal) - iPos)
    Else
        RemoveHyphen = sVal
    End If
End Function

 

[dpaulson]

if you have vb6 the you could use the replace function

MsgBox Replace("12-13","-","&quot


David Paulson

 

[rspainhour]

The Instr function is one way to go. It identifies the position the item being searched for occurs in and if it does not occur it returns a zero.
example:
dim strTest as string
dim strNew as string
dim intMypos as integer
strTest = '12-13'

intMyPos = Instr(1, strTest, "-&quot

strnew = left$(strtest, intMyPos-1) + mid$(strtest, intmypos+1)

This should do it. Also check MSDN help on the Instr function.