Запуск таймера в определенное время

Тема в разделе "Visual Basic", создана пользователем nikh848, 29 ноя 2009.

  1. nikh848

    nikh848 Гость

    Привет всем!
    Подскажите пож., как в VB6 запустить timer в определенное время.
    Например, программа запускается вместе с windows, а таймер в 9:00

    В VBA вроде есть OnTime, есть ли в VB6?
     
  2. alex777

    alex777 Гость

    Другим таймером проверять системное время
     
  3. nikh848

    nikh848 Гость

    Спасибо за подсказку,
    написал следующим образам, заработала:
    Код (Text):
    Private Sub Запустить_Click() 'Нажимаем на форме кнопку
    Timer2.Enabled = True 'Включаем таймер для проверки сист врем
    End Sub

    Private Sub Timer2_Timer() 'Интервал таймера 1000
    If Time = "15:00:00" Then
    Call Timer1_Timer 'Выводим форму 1-й раз, дальше по таймеру
    Timer2.Enabled = False 'Отключаем таймер для пров Сист Врем
    Timer1.Enabled = True 'Включаем таймер для вывода формы
    End If
    End Sub

    Private Sub Timer1_Timer()
    Form2.Show
    End Sub
     
Загрузка...

Поделиться этой страницей