I don't recommend you to remove the dot. It will be easier to remove the currency character and the minus, parse the number and then multiply it by 100.
B4X:
Sub CleanNumber(s As String) As Double
Dim sb As StringBuilder
sb.Initialize
For i = 0 To s.Length - 1
Dim c as Char = s.CharAt(i)
If IsNumber(c) OR c = "." Then sb.Append(c)
Next
Return sb.ToString * 100
End Sub