Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Useful-ish function?
#1
I'm bored, just came up with this:

Code:
Private Function IsDivisibleBy(ByVal Number As Long, ByVal Divisible As Long) As Boolean
    IsDivisibleBy = (Number Mod Divisible) = 0
End Function

Example in HandleShutDown: If IsDivisibleBy(Secs, 5) Or Secs
Reply


Forum Jump:


Users browsing this thread: 1 Guest(s)