powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как преобразовать строку во время
5 сообщений из 5, страница 1 из 1
Как преобразовать строку во время
    #32775056
marvel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Есть строковое значение '12:60'. Мне надо преобразовать это значение во время, т.е.олучилось '13:00'.
Format (значение; "h:nn") не помогает, как можно по другому?
...
Рейтинг: 0 / 0
Как преобразовать строку во время
    #32775059
Kelme
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а 12:120 - это 14:00? :)
...
Рейтинг: 0 / 0
Как преобразовать строку во время
    #32775066
marvel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kelmeа 12:120 - это 14:00? :)
По моей логики ты прав, но задача остается.
Кстати для моей задачи максимальное значение у минут 60.
...
Рейтинг: 0 / 0
Как преобразовать строку во время
    #32775094
Kelme
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
если в общих чертах, то используй Split и Join (если Access2000 и выше)
если 97, то Mid$

этим ты разобьёш строку на часы и минуты

ну а дальше дело техники :)
...
Рейтинг: 0 / 0
Как преобразовать строку во время
    #32775195
Iskander68
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Как вариант (нужно добавить обработку ошибок). Подразумевается, что строка
должна быть в формате 99:00)

Private Function MyTime(N As String)

If CInt(Right(N, 2)) > 59 Then
MyTime = CDate(CInt(Left(N, InStr(1, N, ":") - 1)) + 1 & ":" & "00")
Else
MyTime = CDate(N)
End If

End Function



--
Regards
Alexander Artamonov

Posted via ActualForum NNTP Server 1.1
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как преобразовать строку во время
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]