Bookshelf Home | Contents | Index | Search | PDF |
Siebel VB Language Reference > Siebel VB Language Reference >
Sgn Function
This standard VB function returns a value indicating the sign of a number.
Syntax
Sgn(number)
Returns
If number is less than zero, -1.
If number is equal to zero, 0.
If number is greater than zero, 1.
Example
This example tests the value of the variable profit and displays 0 for profit if it is a negative number. The subroutine uses Sgn to determine whether profit is positive, negative, or zero.
Sub Button_Click
Dim profit as Single
Dim expenses
Dim sales
expenses = 100000
sales = 200000
profit = Val(sales)-Val(expenses)
If Sgn(profit) = 1 then
`Yeah! We turned a profit!
ElseIf Sgn(profit) = 0 then
`Okay. We broke even.
Else
`Uh, oh. We lost money.
End If
End SubSee Also
Exp Function
Fix Function
Int Function
Log Function
Rnd Function
Sqr Function
Bookshelf Home | Contents | Index | Search | PDF |
Siebel VB Language Reference Published: 18 June 2003 |