Поскольку Кухня не работает, кидаю сюда. Вопрос по бэйсику

Все, что вы хотели знать о программизме, но боялись спросить.
Ответить
Аватара пользователя
AlexANB
Маньяк
Сообщения: 2904
Зарегистрирован: 17 фев 2003, 18:47
Откуда: Ontario

Поскольку Кухня не работает, кидаю сюда. Вопрос по бэйсику

Сообщение AlexANB »

Да-да, я знаю, что васик -- это шит и крап, но выбора нет, ибо Excel понимает только васик. Ну, он же VB...

Вопрос -- мне надо систематически стартовать определенную процедуру с каким-то интервалом времени. То есть, нужен какой-то таймер.

Пока в VBA нашел только процедуру TimeSerial(), с последующей сработкой Application.OnTime earliesttime:=runWhen, procedure:=RUN_WHAT, schedule:=True, но беда в том, что функция TimeSerial() понимает время лишь с точностью до секунды, а мне надо чаще.

Есть ли другой способ стартовать мою процедуру чаще, чем раз в секунду?
Аватара пользователя
Yury
The L'ony
Сообщения: 26202
Зарегистрирован: 22 янв 2004, 13:48
Откуда: Мирный -> Vancouver
Контактная информация:

Re: Поскольку Кухня не работает, кидаю сюда. Вопрос по бэйсику

Сообщение Yury »

Timer Event?
там минимальный интервал 1/1000
или это только в аксесе есть?

вот это еще нашел
http://www.tushar-mehta.com/excel/software/vba_timer/
vg
Маньяк
Сообщения: 2803
Зарегистрирован: 29 май 2003, 22:29
Откуда: Магадан - Миссиссага

Re: Поскольку Кухня не работает, кидаю сюда. Вопрос по бэйсику

Сообщение vg »

AlexANB писал(а):Да-да, я знаю, что васик -- это шит и крап, но выбора нет, ибо Excel понимает только васик. Ну, он же VB...

Вопрос -- мне надо систематически стартовать определенную процедуру с каким-то интервалом времени. То есть, нужен какой-то таймер.

Пока в VBA нашел только процедуру TimeSerial(), с последующей сработкой Application.OnTime earliesttime:=runWhen, procedure:=RUN_WHAT, schedule:=True, но беда в том, что функция TimeSerial() понимает время лишь с точностью до секунды, а мне надо чаще.

Есть ли другой способ стартовать мою процедуру чаще, чем раз в секунду?
В принципе можно делать так - Declare Function SetTimer Lib "user32" ....
Ответить