Math Functions VisualBasic Script

Sub mathF7()
    Debug.Print Sgn(-9)
End Sub