Mega Code Archive

 

Categories / VisualBasic Script / Math Functions

 

Sgn(number) returns -1 if number is negative, 0 if number is 0, 1 if number is positive

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