Rambler's Top100
Форум: MS ACCESSVBVBA MS OfficeMS SQL server
Новые сообщения: 0000

Форум: VB

Программирование VB

Обновить визитку
Участники «Online»
Все участники

 
 

Доброго времени суток, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: Как Преобразовать дату в слово?
 
 автор: Волшебник   (14.04.2010 в 17:19)   личное сообщение
 
 

Как Преобразовать дату в слово?
сейчас на форме в поле стоит =Date() по умолчанию

Пробовал с Week(Date()), что-то не получается,
А мне б хотелось чтобы было
На форме видеть не 14.04.2010, а Среда
не 15.04.2010, а Четверг
не 16.04.2010, а Пятница и тд.

  Ответить  
 
 автор: ДрЮня   (14.04.2010 в 17:26)   личное сообщение
 
 


d Display the day as a number without a leading zero (1 – 31). 
dd Display the day as a number with a leading zero (01 – 31). 
ddd Display the day as an abbreviation (Sun – Sat). 
dddd Display the day as a full name (Sunday – Saturday). 
ddddd Display the date as a complete date (including day, month, and year), formatted according to your system's short date format setting. The default short date format is m/d/yy. 
dddddd Display a date serial number as a complete date (including day, month, and year) formatted according to the long date setting recognized by your system. The default long date format is mmmm dd, yyyy. 
w Display the day of the week as a number (1 for Sunday through 7 for Saturday). 
ww Display the week of the year as a number (1 – 54). 
m Display the month as a number without a leading zero (1 – 12). If m immediately follows h or hh, the minute rather than the month is displayed. 
mm Display the month as a number with a leading zero (01 – 12). If m immediately follows h or hh, the minute rather than the month is displayed. 
mmm Display the month as an abbreviation (Jan – Dec). 
mmmm Display the month as a full month name (January – December). 
q Display the quarter of the year as a number (1 – 4). 
y Display the day of the year as a number (1 – 366). 
yy Display the year as a 2-digit number (00 – 99). 
yyyy Display the year as a 4-digit number (100 – 9999). 
h Display the hour as a number without leading zeros (0 – 23). 
Hh Display the hour as a number with leading zeros (00 – 23). 
N Display the minute as a number without leading zeros (0 – 59). 
Nn Display the minute as a number with leading zeros (00 – 59). 
S Display the second as a number without leading zeros (0 – 59). 
Ss Display the second as a number with leading zeros (00 – 59). 

  Ответить  
 
 автор: Волшебник   (14.04.2010 в 17:50)   личное сообщение
 
 

не понятно!

  Ответить  
 
 автор: Волшебник   (14.04.2010 в 18:05)   личное сообщение
 
 

Me![Дата].Caption = Format(Date, "dddd")
Спасибо и Вам большое!
Вот можно ещё и так:
Me![Дата].Caption = WeekdayName(Weekday(Date, 2))
(используется надпись)

  Ответить  
HiProg.com - Технологии программирования
Rambler's Top100 TopList