Число2время

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
_Мика_
Гуру
Гуру
 
Сообщения: 1459
Зарегистрирован: 24.10.2003 (Пт) 15:05
Откуда: г. Москва, м.Речной вокзал

Число2время

Сообщение _Мика_ » 08.06.2005 (Ср) 22:49

Перменная cont содержит какоето число....предположим 3600. Мне нужно чтобы это преобразовалось в
01:00:00

Код: Выделить всё
Format(Int(cont) \ 3600, "00") & ":" & Format(Int(cont) \ 60, "00") & ":" & Format(cont Mod 60, "00")


Вот этот код выдает 01:60:00 :(
-Папа, а правда, что форумы делают людей дибилами?
-гы гы гы, сынок, лол!

Sebas
Неуловимый Джо
Неуловимый Джо
Аватара пользователя
 
Сообщения: 3626
Зарегистрирован: 12.02.2002 (Вт) 17:25
Откуда: столько наглости такие вопросы задавать

Сообщение Sebas » 08.06.2005 (Ср) 23:02

& ":" & Format(Int(cont) -Int(cont) \ 60 *60, "00") & ":"
чёта типа того
- Я никогда не понимал, почему они приходят ко мне чтобы умирать?

sebas<-@->mail.ru

BV
Thinker
Thinker
Аватара пользователя
 
Сообщения: 3987
Зарегистрирован: 12.09.2004 (Вс) 0:55
Откуда: Молдавия, г. Кишинёв

Сообщение BV » 08.06.2005 (Ср) 23:31

Код: Выделить всё
Debug.Print Format$(cont \ 3600, "00") & _
        ":" & Format$((cont \ 60) Mod 60, "00") & ":" & _
        Format$(cont Mod 60, "00")
const char *out = "|*0>78-,+<|"; size_t cc = char_traits<char>::length(out);
for (size_t i=0;i<cc;i++){cout<<static_cast<char>((out[i]^89));}cout<<endl;

_Мика_
Гуру
Гуру
 
Сообщения: 1459
Зарегистрирован: 24.10.2003 (Пт) 15:05
Откуда: г. Москва, м.Речной вокзал

Сообщение _Мика_ » 08.06.2005 (Ср) 23:41

Благодарю :)
-Папа, а правда, что форумы делают людей дибилами?
-гы гы гы, сынок, лол!

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 08.06.2005 (Ср) 23:48

Ещё проще:
Код: Выделить всё
Debug.Print CDate(3600/86400)

Работает для интервалов меньше суток.
Изображение

_Мика_
Гуру
Гуру
 
Сообщения: 1459
Зарегистрирован: 24.10.2003 (Пт) 15:05
Откуда: г. Москва, м.Речной вокзал

Сообщение _Мика_ » 08.06.2005 (Ср) 23:54

tyomitch писал(а):Ещё проще:
Код: Выделить всё
Debug.Print CDate(3600/86400)

Работает для интервалов меньше суток.

Ну вообще мне это нужно было в VB.NET :wink: и есть вероятность что это число будет больше суток :)
-Папа, а правда, что форумы делают людей дибилами?
-гы гы гы, сынок, лол!


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Yandex-бот и гости: 183

    TopList