Visual Basic, .NET, ASP, VBA, VBScript
 
  Справочники  
  Справочник по Windows API Справочник по Visual Basic  
     
  Функция Timer  
 

Функция

Timer

Синтаксис

Timer

Возвращает значение типа Single, представляющее число секунд, прошедших после полуночи.

Параметры

Функция не имеет никаких параметров.

Замечания

Значение, возвращаемое таймером, ограничено числом секунд в сутках и обнуляется ровно в полночь. Для точных расчетов используйте API функции, например timeGetTime.

Пример использования

'в данном примере функция Timer используется для временной остановки
'приложения, кроме того, в нем используется инструкция DoEvents ,
'организующая передачу управления другим процессам на время паузы.


Dim PauseTime, Start, Finish, TotalTime
If (MsgBox("Нажмите Да, чтобы прервать выполнение на 5 секунд", 4)) = vbYes Then
  PauseTime = 5 'задает длительность
  Start = Timer 'задает начало паузы
  Do While Timer < Start + PauseTime
    DoEvents 'передает управление другим процессам
  Loop
  Finish = Timer 'задает конец паузы
  TotalTime = Finish - Start 'вычисляет длительность паузы
  MsgBox "Длительность паузы: " & TotalTime & " секунд"
Else
  End
End If

Дополнительная информация

Категория: Обработка данных дата/время

Еще функции: Date, DateAdd, DateDiff, DatePart, DateSerial, DateValue, Day, Hour, Minute, Month, MonthName, Now, Second, Time, Timer, TimeSerial, TimeValue, WeekDay, WeekDayName, Year

 
     
  VBNet online (всего: 51616)  
 

Логин:

Пароль:

Регистрация, забыли пароль?


В чате сейчас человек
 
     
  VBNet рекомендует  
   
     
  Лучшие материалы  
 
ActiveX контролы (112)
Hitman74_Library (36119)
WindowsXPControls (20739)
FlexGridPlus (19374)
DSMAniGifControl (18295)
FreeButton (15157)
Примеры кода (546)
Parol (18027)
Passworder (9299)
Screen saver (7654)
Kerish AI (5817)
Folder_L (5768)
Статьи по VB (136)
Мое второе впечатление... (11236)
VB .NET: дорога в будущее (11161)
Основы SQL (9225)
Сообщения Windows в Vi... (8788)
Классовая теория прогр... (8619)
 
     
Техническая поддержка MTW-хостинг | © Copyright 2002-2011 VBNet.RU | Пишите нам