Преглед садржаја
Тајмер Опис
Враћа појединачну вредност која представља број секунди које су протекле од поноћи.
Примери једноставних тајмера
Ево једноставног примера тајмера:
123 | Под тимер_Пример ()МсгБок ТимерЕнд Суб |
Синтакса тајмера
У ВБА Едитор -у синтакса функције Тимер.
1 | Тимер |
Функција Тајмер не садржи аргументе:
Примери Екцел ВБА функције тајмера
Користећи следећи пример кода, покушајте да упоредите сец1 и сец2.
Затим, лако можемо сазнати значење функције Тајмер.
123456789101112131415161718192021222324252627 | Тајмер_Пример1 ()Дим сец1 Ас СинглеДим сец2 Ас Лонгсец1 = Тајмерсец2 = ГетСецондсФромМиднигхтМсгБок "сец1 =" & сец1 & вбЦрЛф & _"сец2 =" & сец2Енд СубФункција ГетСецондсФромМиднигхт () Ас ЛонгДим дт Ас ДатеДим х Као цео бројДим м Ас ИнтегерДим с Ас Интегердт = Садах = Сат (дт)м = минута (дт)с = Друга (дт)мин = х * 60 + мсек = мин * 60 + сГетСецондсФромМиднигхт = секЗавршна функција |
Помоћу функције Тимер можемо измерити колико би времена требало да се покрене део ВБА кода.
1234567891011121314151617 | Под тимер_Пример2 ()Дим стартСец Ас СинглеДим ендСец Ас СинглеДим и Ас ЛонгстартСец = Тајмер'Почетак тестирања ВБА кодаЗа и = 1 до 500000ДоЕвентсЗатим сам„Крај ВБА кода за тестирањеендСец = ТајмерМсгБок "Било је потребно" & ЦСтр (ендСец - стартСец) & "с."Енд Суб |