Unable to Save Formula

Hi

Unable to save below formula . The remaining text does not appear to be part of the Formula.
Using Crystal Reports 9

tmp={Invoice.invoiceno}
exVal = Val( Mid$(tmp, InstrRev(tmp,"/") + 1))

Thanks