Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

как перевести данные функции Now в часы, например?

248
28 декабря 2012 года
Dmitry2064
590 / / 06.12.2006
Пытаюсь узнать время работы над проектом.
В одной ячейке получаю Now. Через нек. время, когда делаю перерыв на обед, получаю новое Now. Разницу пишу в третьей ячейке: 0,00538194444379769. Можно ли из этого числа вытащить часы, а когда цифра станет больше, то и дни?
7
28 декабря 2012 года
@pixo $oft
3.4K / / 20.09.2006
Тип Now какой?
327
29 декабря 2012 года
UserNet2008
748 / / 03.04.2010
Цитата: @pixo $oft
Тип Now какой?


Это текущее время

 
Код:
Dim strTimeSecond As String
strTimeSecond = Second(Now)
'есть функции
'Month
'Day
'Hour
'Minute
Подскажите, плз, как сделать таймер?


Код:
Option Explicit
Dim vntTimeStart, vntTimeFinish
Dim dtmTimeSummary As Date

Private Sub cmdStartFinish_Click()
Static blnTrigger As Boolean

With cmdStartFinish
  If blnTrigger Then
    blnTrigger = False
    .Caption = "Пуск"
    vntTimeFinish = Time
    dtmTimeSummary = dtmTimeSummary + (vntTimeFinish - vntTimeStart)
    txtTimeWorkProject.Text = dtmTimeSummary
Else
    blnTrigger = True
    .Caption = "Стоп"
    vntTimeStart = Time
  End If
End With

End Sub
248
29 декабря 2012 года
Dmitry2064
590 / / 06.12.2006
А приведенный код суммирует только минуты и часы? Проблема в том, что работа будет скорее всего занимать несколько дней и отчет нужно давать в количестве потраченных дней с точностью до полудня. По-моему, данный вариант будет считать только часы и минуты.
248
29 декабря 2012 года
Dmitry2064
590 / / 06.12.2006
Я понял? что надо добиться. Чтобы в приведенном окошке "Время работы над проектом" тикало бы время с учетом кол-ва дней, часов и минут (ну и можно чтобы секунды бежали. А когда я нажму стоп, оно бы записалось в активную ячейку. А потом если я опять запущу таймер, он должен взять уже записанное время и к нему прибавлять опять же секунды, часы и дни, пока не нажато стоп. И тогда опять записать новое полученное значение в активную ячейку. Так будет запоминаться и прибавлять новое время к уже посчитаному + видно, что работа над проектом идет. Пока я сам попробую, но на успех особе не рассчитываю. (хотя подскажка уже очень полезная, - спасибо большое, "2008й"!).
248
29 декабря 2012 года
Dmitry2064
590 / / 06.12.2006
извините за опечатки - все в спешке и в нервотрепке )))
Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог