Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > VB6 > Создание таймера с БД Access


Автор: Vic 24.2.2004, 13:19
На форме необходимо создать кнопку, которая бы при нажатии запускала таймер, а при повторном нажатии останавливала его и в поле выдавала значение таймера, то есть, сколько прошло времени.
Можно ли это сделать и как. Заранее благодарна

Автор: shilnik 25.2.2004, 11:22
Если тебе нужно просто измерить время между нажатиями, то:

Private isTimer As Boolean
Private Sub Command1_Click()

Static timer As Date

If isTimer Then
MsgBox CDate(Now - timer)
isTimer = False
Else
timer = Now()
isTimer = True
End If

End Sub


Автор: Medved 25.2.2004, 13:57
Перенесено из раздела БД.

Автор: Vic 26.2.2004, 15:21
Спасибо shilnik'у за помощь, но у меня эта процедура не пошла. Возможно будут еще предложения, или кто-то дополнит эту. Vic

Автор: cardinal 26.2.2004, 19:21
Цитата
но у меня эта процедура не пошла

А у меня пошла smile.gif. Может напишешь что именно не пошло? А вообще вариантов есть много разных, но этот кстати говоря не такой уж и плохой ИМХО.

Автор: Vic 27.2.2004, 10:32
Работает! Спасибо огромное!!!! Vic

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)