Почему не работает Format для даты?

[Rojohn]

Ещё проблемка... Пытаюсь перевести в формат даты с 4-х значным годом:

Код: Выделить всё

selDate = Format(DateClicked, "DD.MM.YYYY")


В результате и DateClicked и selDate остаются в формате с 2-х значным годом. Почему?

[Ennor]

1. Какого типа переменная selDate?
2. Ты указал неправильный формат в одноименной функции. Надо писать так:

Код: Выделить всё

selDate = Format(DateClicked, "long date")

Дальнейшее будет зависеть от того, какой именно у тебя в региональных настройках стоит полный формат даты. Но в общем случае используется примерно та форма, которую ты использовал, только с учетом региональных настроек конкретной машины.

[Rojohn]

Да... полный прикол У всех на компах, где стоит наша прога мы дату меняем на полную (даже в руководстве пользователя написано), а у себя дома поменять забыл Спасибо, Ennor!
Теперь работает даже в моём формате!


А можно сделать так, чтобы не зависело от формата в машине и везде исправляло на полный формат? Понимаю, что разбирая дату и опять собирая можно, а проще (Format или похоже)?

[lord0n]

ну незнаю товарищи чего вы мудрите
только что проверил

Код: Выделить всё


a=format(date,"d.m.yy") 'показывает 24.8.05

d="01.01.2005"
a=format(d,"d.m.yy") 'показывает 1.1.05



[Rojohn]

Да в том-то и дело, что двойные-то форматы работают везде. А вот если надо из YY перевести в YYYY, то енто работает только на машинах с установленым полным форматом в "региональных форматах-дата", а на других остаётся YY, как бы кто не мудрил":)

[lord0n]

Да в том-то и дело, что двойные-то форматы работают везде. А вот если надо из YY перевести в YYYY, то енто работает только на машинах с установленым полным форматом в "региональных форматах-дата", а на других остаётся YY, как бы кто не мудрил":)

гон полнейший
в настройках стоит dd.mm.yy

Код: Выделить всё


d = "01.01.05"
Label1 = Format(d, "dd.mm.yyyy") 'выводит 01.01.2005

d = "24.01.2005"
Label1 = Format(d, "mm.dd.yyyy") 'выводит 01.24.2005

d = "24.01.05"
Label1 = Format(d, "dd.mm.yyyy") 'выводит 24.01.2005



[Andrey Fedorov]

Ещё проблемка... Пытаюсь перевести в формат даты с 4-х значным годом:

Код: Выделить всё

selDate = Format(DateClicked, "DD.MM.YYYY")


В результате и DateClicked и selDate остаются в формате с 2-х значным годом. Почему?

Гы! Что-то мне подсказывает что selDate у Вас имеет тип даты!

И что Вы при этом хотите получить, интересно???

[Rojohn]

Гы! Что-то мне подсказывает что selDate у Вас имеет тип даты!

И енто совершеннейшая правда! Я действительно совершил полнейшую ерунду объявив переменную уровня формы как Data и потом в ентой же форме делая ей CStr(Data) - гы! Сейчас усё в порядке и независит от установок компа! Спасибы добрые люди!