|
|
|
Supreme Being
      
участник
Last Login: 27.06.2008 14:10
Сообщ.: 275,
Visits: 865
|
|
Здравствуйте!
Покажите пожалуйста как из этого набора цифр - 228945175440008000 получить нормальную дату.
Что это за цифры не спрашивайт, сам не знаю, но точно знаю, что они показывают дату и время.
|
|
|
|
|
Supreme Being
      
участник
Last Login: 14.09.2007 16:26
Сообщ.: 123,
Visits: 1 095
|
|
| Попробуйт так: Public Sub Trans() ' Переменные Dim strDate As String ' строка с датой в числовом формате Dim dblDate As Double ' дата во внутреннем формате VB ' Код ' записываем число в строку strDate = Format(228945175440008000, "0") ' преобразовываем первые 10 символов строки к внутреннему представлению даты dblDate = Val(Left(strDate, 10)) / (10 ^ 5) ' получаем из числа дату MsgBox Format(dblDate, "dd.mm.yy hh:mm:ss") End Sub
|
|
|
|
|
Supreme Being
      
участник
Last Login: 27.06.2008 14:10
Сообщ.: 275,
Visits: 865
|
|
Это не то :(
Там дата должна быть 04.04.2007 и какое-то время
|
|
|
|
|
Forum Member
      
участник
Last Login: 15.08.2008 21:32
Сообщ.: 33,
Visits: 346
|
|
Vodizzz (06.04.2007) Это не то :( Там дата должна быть 04.04.2007 и какое-то времяя мож глупость скажу, а не может это быть время исчисления в секундах от например 1970 года 1 января 0:00 часов? ну иль еще чето в этом роде...
|
|
|
|
|
Supreme Being
      
участник
Last Login: 27.06.2008 14:10
Сообщ.: 275,
Visits: 865
|
|
| Такую версию я уже просматривал. Здесь цифр больше даже если смотреть с 01.01.00 00:00:00
|
|
|
|
|
Supreme Being
      
участник
Last Login: 26.10.2007 9:10
Сообщ.: 166,
Visits: 1 538
|
|
| Если бы ты сказал, что твоё число соответствует 03.04.2007, то я бы сказал, что оно указывает количество наносекунд, прошедших с начала 2000 года.
|
|
|
|
|
новичок
      
участник
Last Login: 14.05.2007 11:30
Сообщ.: 2,
Visits: 6
|
|
Vodizzz (04.04.2007) Здравствуйте! Покажите пожалуйста как из этого набора цифр - 228945175440008000 получить нормальную дату. Что это за цифры не спрашивайт, сам не знаю, но точно знаю, что они показывают дату и время.Excel понимают её как дату и время, если после пятой цифры поставить запятую. Согласно Excel: 22894,5175440008=05.09.1962 12:25:16
|
|
|
|