|
|
Module Checks
Public Function Check(ByVal Value As Integer) As Integer
If Value > 255 Then
Return 255
ElseIf Value < 0 Then
Return 0
Else
Return Value
End If
End Function
End Module
|
By viewing downloads associated with this article you agree to the Terms of Service and the article's licence.
If a file you wish to view isn't highlighted, and is a text file (not binary), please
let us know and we'll add colourisation support for it.
This member has not yet provided a Biography. Assume it's interesting and varied, and probably something to do with programming.
Submit an article or tip