Data Type VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Data Type
  4. Mathematica does not understand 1 2E-03, use 1 210^-03 instead
Function Scientific(s As String) As String
  Dim pos%
  pos = InStr(s, "E")
  If pos Then
    Scientific = Left(s, pos - 1) + "*10^" + Mid(s, pos + 1)
  Else
    Scientific = s
  End If
End Function