Language Basics VisualBasic Script

Sub CallerSub()
      Ans = CubeRoot(125)
      MsgBox Ans
End Sub
Function CubeRoot(number)
      CubeRoot = number ^ (1 / 3)
End Function