Math Functions VisualBasic Script

Sub mathDemo11()
   Debug.Print Sgn(7)
End Sub