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


Автор: neiron 19.2.2007, 22:39
Возможно ли выводить дату не в формате ДМГ ЧМС, а в формате ЧасМинутаСекунда, даже если Час>24... В общем, необходимо показать некое время юзеру, а потом то же самое время использовать... 
Т.е. при времени более 24 часов у меня выодится:
01.01.1990 3:02:45
Как вывести это в такой форме:
27:02:45?
Из функций нашёл только datepart... Но, как я понял, ею можно вывести только один параметр даты...
В общем, пока надумал только коструировать строку из нескольких datepart от одной даты... 
есть получше способ?

Автор: Naghual 19.2.2007, 22:46
Попробуй DateDiff

Автор: Akina 20.2.2007, 00:09
да напиши ты свою функцию спецформатирования...

Автор: neiron 20.2.2007, 17:39
Naghual, через DatePart легче выводить... вторая дата не нужна... но всё равно спасибо


Akina, не понял... в смысле "спецформатирования"? Новый тип данных создать? Линку дай, плиз, куда-нибудь))) (через поиск ничего не нашёл по спецформату)

Автор: Akina 20.2.2007, 23:58
Цитата(neiron @  20.2.2007,  18:39 Найти цитируемый пост)
не понял... в смысле "спецформатирования"?

В смысле специального, нужного только тебе и только для решения одной узкой задачи. Будь проще. Public Function MyTimeFormat(...)...

Автор: neiron 21.2.2007, 00:10
Сейчас у меня в подобной фукции написано 

Код

...
If VPrDate >= "24:00:00" Then
            Str = Str + CStr(DatePart("d", VPrDate)) + ":" + CStr(DatePart("h", VPrDate)) + ":" + CStr(DatePart("n", VPrDate)) + ":" + CStr(DatePart("s", VPrDate))
Else
            Str=Str+CStr(VPrDate)
...

где VPrDate типа Date и содержит реальный временной отрезок
Str - строковая, которая иммитирует формат с количеством часов более 24 в случае необходимости

В принципе, пока всё работает... Правда обратный отсчёт не проверял на датах с более 24 часами (кстати, нормально работать будет?)
Но, в принципе, возможно ли как-либо определить вывод даты в нужном формате без подобных действий? Т.е. чтобы у меня и в переменной,и на экранчике было абсолютно одинаково))

ЗЫ Public Function MyTimeFormat(...) as ...(Date)? - тогда, видимо, так и не понял

Автор: Akina 21.2.2007, 00:30
As String

Использовать вместо Format()

Автор: neiron 21.2.2007, 00:55
Akina, всё, понял smile Ещё раз спасибо smile 

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