public DateTime NextDateTime( DateTime minValue, TimeSpan maxSpan )
Public Function NextDateTime ( _ minValue As DateTime, _ maxSpan As TimeSpan _ ) As DateTime