powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Format + Date
11 сообщений из 11, страница 1 из 1
Format + Date
    #35423555
Петров Андрей
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Люди сломал себе всю голову :-)))
Есть вот такое простейшее преобразование:

Dim tracedate As Date
tracedate = "01/05/2009"
MsgBox "Trace " + Left(Format(tracedate, "MM-YY"), 5)

У меня на компе все выдается без проблем.
Удаленно это не работает и утверждается что результат выдается = DD-YY т.е. 01-09 вместо 05-09
Скажите как такое может быть? :-)))))) Пыыых.
Я понимаю что бред но все же...
...
Рейтинг: 0 / 0
Format + Date
    #35423574
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
используйте DateAdd() и не будет проблем
...
Рейтинг: 0 / 0
Format + Date
    #35423593
Петров Андрей
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не вкурил. Простите :-)
А причем здесь DateAdd? Это же прибавление к дате числа вроде - нет?
...
Рейтинг: 0 / 0
Format + Date
    #35423597
AndrF
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Петров АндрейЯ понимаю что бред но все же...

tracedate = #01/05/2009#

заметь разницу...
...
Рейтинг: 0 / 0
Format + Date
    #35423611
Петров Андрей
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 AndrF

Итить что это было? :-) Как устранить то? Какой формат ставить?
...
Рейтинг: 0 / 0
Format + Date
    #35423615
AndrF
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
И, кстати:

MsgBox "Trace " & Format$(tracedate, "mm-yy")

Должно всегда выдавать: 01-09 при tracedate = #01/05/2009#

Догадайся почему ;)
...
Рейтинг: 0 / 0
Format + Date
    #35423617
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Автор: Петров Андрей
> Люди сломал себе всю голову :-)))
> Есть вот такое простейшее преобразование:
> Скажите как такое может быть? :-)))))) Пыыых.

Лихко :) Региональные настройки стоят не такие как у тебя ;)

> Я понимаю что бред но все же...

А попробуй задать дату как дату, а не как строку:
tracedate = "01/05/2009"
MsgBox CStr(Month(tracedate))
tracedate = #01/05/2009#
MsgBox CStr(Month(tracedate))
и поломай голову ещё немного :)

--
С уважением Горбонос Игорь Леонидович

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
Format + Date
    #35423619
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
да, извините, не внимателен стал, столько одинаковых впросов по сравнение дат за сегодня :)


замените на :

Код: plaintext
1.
2.
3.
Dim tracedate As Date

tracedate = DateSerial( 2009 ,  5 ,  1 )
MsgBox "Trace " & Format(tracedate, "mm-yy")
...
Рейтинг: 0 / 0
Format + Date
    #35423620
AndrF
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Петров Андрей2 AndrF

Итить что это было? :-) Как устранить то? Какой формат ставить?

Я же тебе уже все написал...
...
Рейтинг: 0 / 0
Format + Date
    #35423684
Петров Андрей
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Поставим вопрос по другому. Какие региональные настройки мне поменять?
А то код не хотелось бы трогать...
...
Рейтинг: 0 / 0
Format + Date
    #35423692
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а придется код трогать
...
Рейтинг: 0 / 0
11 сообщений из 11, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Format + Date
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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