Спящих в VBA (переполнение целочисленного !!)

Question

В VBA вы можете

Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

, чтобы обеспечить себя рутину сна.

Однако Long, который должен быть передан подпрограмме, переполняется для значений, превышающих 32000 миллисекунд.

Есть ли способ спать в течение более длительных периодов времени без сложностей наложения нескольких последовательных вызовов в режим сна?

Answer 1

Нет, он не переполняется, если только ваш код, который вычисляет необходимое количество миллисекунд, вызывает переполнение.

Пример:

dim t as long 
t = 10000 * 10000/10000 'Overflow 

Пример 2:

dim t as long 
t = 10000! * 10000/10000 'Ok