Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.56/18: Рейтинг темы: голосов - 18, средняя оценка - 4.56
1687 / 559 / 74
Регистрация: 10.04.2009
Сообщений: 9,188
1

DateDiff

28.06.2017, 14:13. Показов 3397. Ответов 10
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
здравствуйте в коде есть
Visual Basic
1
2
3
4
Старт_программы = Time
много всего
Конец_программы = Time
MsgBox$ "Время обработки текста: " & DateDiff("s", Конец_программы, Старт_программы) & " сек."
почему секунды в конце кода отображает с минусом? спасибо
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
28.06.2017, 14:13
Ответы с готовыми решениями:

DateDiff
здравствуйте в коде считаю секунды между датами, получаю выделение DateDiff и сообщение, argument...

Таблица с DateDiff, циклом и сортировкой строк
Доброго всем времени суток. Потихоньку осваиваю VBA. Возникли затруднения с циклами. Помогите...

Программа работает только для невисокосных годов. Как её доработать? (DateDiff не использовать)
Sub hj() Dim A As Date Dim b As Date Dim k As Integer Dim b1 As Date Dim X As Integer Dim Y...

DateDiff
Здравствуйте! Необходимо сделать округление даты с точностью до суток. У меня вот что получилось...

10
5562 / 1368 / 150
Регистрация: 08.02.2009
Сообщений: 4,109
Записей в блоге: 30
28.06.2017, 14:32 2
На здоровье.

Компьютеру-то невдомёк, что Конец_программы — это на самом деле Старт_программы и наоборот. Синтаксис, дружище!
0
1687 / 559 / 74
Регистрация: 10.04.2009
Сообщений: 9,188
28.06.2017, 14:33  [ТС] 3
ничего не понял
0
es geht mir gut
11272 / 4756 / 1183
Регистрация: 27.07.2011
Сообщений: 11,439
28.06.2017, 14:44 4
Цитата Сообщение от Ципихович Эндрю Посмотреть сообщение
ничего не понял
Поменяй конец с началом
0
1687 / 559 / 74
Регистрация: 10.04.2009
Сообщений: 9,188
28.06.2017, 14:47  [ТС] 5
то есть я от большего отнимаю меньшее и получаю минус
мне предлагают от меньшего отнять большее, надо подумаааааать..........
0
es geht mir gut
11272 / 4756 / 1183
Регистрация: 27.07.2011
Сообщений: 11,439
28.06.2017, 15:12 6
Цитата Сообщение от Ципихович Эндрю Посмотреть сообщение
мне предлагают от меньшего отнять большее
Не, ну если ты сам отнимаешь -то пожалуйста
А если скармливаешь эти даты функции, то почитай хотя бы справку

Добавлено через 3 минуты
Цитата Сообщение от SoftIce Посмотреть сообщение
почитай хотя бы справку
А МСДН пишет
Поведение

Обработка параметров. Функция DateDiff вычитает значение Date1 из значения Date2, возвращая разность. В вызывающей программе не изменяется ни одно из значений.

Возвращаемые значения. Поскольку параметры Date1 и Date2 относятся к типу данных Date, они содержат значения даты и времени с точностью до 100-наносекундных квантов времени системного таймера. Тем не менее, функция DateDiff всегда возвращает количество интервалов времени в значении типа Long.

Если Date1 представляет более позднюю дату, чем Date2, то функция DateDiff возвращает отрицательное число.
0
185 / 183 / 31
Регистрация: 11.10.2016
Сообщений: 599
28.06.2017, 15:12 7
если почитать описание функции DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]]), то там так и написано:
If date1 refers to a later point in time than date2, the DateDiff function returns a negative number - если date1 ссылается на позднюю точку во времени, чем date2, то функция возвращает отрицательное число
0
1687 / 559 / 74
Регистрация: 10.04.2009
Сообщений: 9,188
28.06.2017, 16:42  [ТС] 8
логика не железная, спасибо

Добавлено через 55 минут
Visual Basic
1
MsgBox$ "Время обработки текста: " & DateDiff("s", Старт_программы, Конец_программы) & " сек."
поменял местами, всё равно с минусом ответ

Добавлено через 15 секунд
Visual Basic
1
MsgBox$ "Время обработки текста: " & DateDiff("s", Старт_программы, Конец_программы) & " сек."
поменял местами, всё равно с минусом ответ
0
3927 / 2324 / 786
Регистрация: 02.11.2012
Сообщений: 6,176
28.06.2017, 16:46 9
у меня с плюсом.
в режиме отладки не желаете пройтись да посмотреть что у вас в Старт_программы и Конец_программы? F8
0
185 / 183 / 31
Регистрация: 11.10.2016
Сообщений: 599
28.06.2017, 17:07 10
Лучший ответ Сообщение было отмечено Sasha_Smirnov как решение

Решение

вообще, если речь идет о секундах то можно проверить время выполнения таким кодом:
Visual Basic
1
2
3
4
Dim tm!
   tm = Timer
'много всего
   MsgBox "прошло " & (Timer - tm) & " секунд"
2
1687 / 559 / 74
Регистрация: 10.04.2009
Сообщений: 9,188
28.06.2017, 17:34  [ТС] 11
Лучший ответ Сообщение было отмечено Sasha_Smirnov как решение

Решение

окейно, с плюсом
Visual Basic
1
MsgBox$ "Время обработки текста: " & DateDiff("s", Старт_программы, Time) & " сек."
спасибо
0
28.06.2017, 17:34
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
28.06.2017, 17:34
Помогаю со студенческими работами здесь

запрос с DATEDIFF
всем привет! ребят, помогите пожалуйста школьнику с задачкой. я в курсе, что это самые основы и...

Ошибка DATEDIFF
Перенес БД из access в mysql и теперь выдает ошибку в dataset, при его активации, на DATEDIFF ...

DateDiff и DateTimePicker
Только начал изучать visual Basic, так что сильно не ругайте. Пишу небольшую программку для...

Функция DateDiff
Мне нужно составить список авторов книги которых изданы в текущем году. Использую функцию...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
11
Ответ Создать тему
Новые блоги и статьи
Как подключить JavaScript файл в другом JavaScript файле
InfoMaster 20.01.2025
В современной веб-разработке организация кодовой базы играет ключевую роль в создании масштабируемых и поддерживаемых приложений. Модульность и правильное структурирование кода стали неотъемлемыми. . .
Как откатить изменения в исходниках, не внесенные в Git
InfoMaster 20.01.2025
При работе с системой контроля версий Git разработчики часто сталкиваются с необходимостью отменить внесенные изменения в исходном коде. Особенно актуальной становится ситуация, когда изменения еще. . .
В чем разница между px, in, mm, pt, dip, dp, sp
InfoMaster 20.01.2025
В мире цифрового дизайна и разработки интерфейсов правильный выбор единиц измерения играет ключевую роль в создании качественного пользовательского опыта. История развития систем измерений для. . .
Как изменить адрес удалённого репозитория (origin) в Git
InfoMaster 20.01.2025
В терминологии Git термин origin является стандартным именем для основного удаленного репозитория, с которым взаимодействует локальная копия проекта. Когда разработчик клонирует репозиторий с. . .
Как переместить последние коммиты в новую ветку (branch) в Git
InfoMaster 20.01.2025
При работе над проектом часто возникают ситуации, когда необходимо изолировать определенные изменения от основной линии разработки. Это может быть связано с экспериментальными функциями, исправлением. . .
Как вернуть результат из асинхронной функции в JavaScript
InfoMaster 20.01.2025
Асинхронное программирование представляет собой фундаментальную концепцию в JavaScript, которая позволяет выполнять длительные операции без блокировки основного потока выполнения программы. В. . .
Какой локальный веб-сервер выбрать
InfoMaster 19.01.2025
В современной веб-разработке локальные веб-серверы играют ключевую роль, предоставляя разработчикам надежную среду для создания, тестирования и отладки веб-приложений без необходимости использования. . .
Почему планшеты и iPad уже не так популярны, как раньше
InfoMaster 19.01.2025
Эра революционных инноваций История планшетов началась задолго до того, как эти устройства стали привычными спутниками нашей повседневной жизни. В начале 1990-х годов появились первые прототипы,. . .
Как самому прошить BIOS ноутбука
InfoMaster 19.01.2025
BIOS (Basic Input/ Output System) представляет собой важнейший компонент любого компьютера или ноутбука, который обеспечивает базовое взаимодействие между аппаратным и программным обеспечением. . .
Какой Linux выбрать для домашнего компьютера
InfoMaster 19.01.2025
Современные реалии выбора операционной системы В современном мире выбор операционной системы для домашнего компьютера становится все более важным решением, которое может существенно повлиять на. . .
Как объединить два словаря одним выражением в Python
InfoMaster 19.01.2025
В мире программирования на Python работа со словарями является неотъемлемой частью разработки. Словари представляют собой мощный инструмент для хранения и обработки данных в формате "ключ-значение". . . .
Как без исключения проверить существование файла в Python
InfoMaster 19.01.2025
При разработке программного обеспечения на Python часто возникает необходимость проверить существование файла перед выполнением операций с ним. Это критически важная задача, которая помогает избежать. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru