I'm wanting to add +- 30 seconds to a field within my code.
I've got it somewhat working, but it seems to add a random number outside the ranges of the ones I've set.
Below is the code I'm using:
' Set random number generator limits
upperBound = (0.000347001 * 2) * 1000 ' 60 seconds
lowerBound = 0 ' 0 seconds
' Loop around
For lp = 0 To j - 2
rnd_adjustment = (upperBound - lowerBound + 1) * Rnd + lowerBound
rnd_adjustment = rnd_adjustment / 1000
If (rnd_adjustment > 0.000347001) Then
rnd_adjustment = -rnd_adjustment / 2
My thinking behind the code is as follows:
1. 0.000347001 is equal to 30 seconds when converted to hh:mm:ss format.
2. To use the Rnd function I decided to create a number between 0 and (0.000347001*2) and then if above 0.000347001 divice by 2 and turn negative.
The output of my code does change the original hh:mm:ss but the changes are not limited to +-30 seconds as intended.
Could anyone shed light on this? Is it my method or is it something to do with the datatype (as it 0.000347001 it needs to be a Double?)
Any help sorting this out would be hugely appreciated.
0 · ·