Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Access
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 22.11.2012, 19:52   #1
Вадим27
Новичок
Джуниор
 
Регистрация: 22.11.2012
Сообщений: 2
По умолчанию Как изменить формат даты в отчете

Столкнулся с такой проблемой.
Отчет мною сформирован.
Но бланк отчета определенного стиля (фирменный, типографский).
В нем есть поля "дата", но мой забитый в поле таблицы формат даты 22.12.2012 должен выйти в таком формате в отчете : 22(два пробела)12(четыре пробела)12.
Не знаю что делать
Вадим27 вне форума Ответить с цитированием
Старый 22.11.2012, 21:00   #2
R Dmitry
Форумчанин
 
Регистрация: 07.03.2010
Сообщений: 796
По умолчанию

используйте формат поля
Код:
dd"  "mm"    "yy
или используйте пользовательскую функцию
Код:
Public Function D_Format(d)
D_Format = Format(d, "dd  mm    yy")
End Function
Логика?!.... она где то рядом... E_mail: dg_rusak@mail.ru Если спасибо мало: Яндекс . Деньги - 41001731366021 WM R269866874234

Последний раз редактировалось R Dmitry; 22.11.2012 в 21:08.
R Dmitry вне форума Ответить с цитированием
Старый 23.11.2012, 09:39   #3
Вадим27
Новичок
Джуниор
 
Регистрация: 22.11.2012
Сообщений: 2
По умолчанию

Цитата:
Сообщение от R Dmitry Посмотреть сообщение
используйте формат поля
Код:
dd"  "mm"    "yy
или используйте пользовательскую функцию
Код:
Public Function D_Format(d)
D_Format = Format(d, "dd  mm    yy")
End Function
Спасибо! все получилось.
Подскажите, как сделать так чтобы текстовое поле выводилось в отчете так: оригинал "ИВАНОВ", в отчете "И В А Н О В"
Вадим27 вне форума Ответить с цитированием
Старый 23.11.2012, 10:29   #4
alvk
Форумчанин
 
Регистрация: 22.05.2012
Сообщений: 136
По умолчанию

Это можно решить своей функцией, встроенные не помогут просто:
Код:
Public Function rasshir(pole)
Dim i As Integer
Dim s As String
s = Left(pole, 1)
For i = 2 To Len(pole)
  s = s & " " & Mid(pole, i, 1)
Next i
'Debug.Print s
End Function
применять:
Код:
select rasshir(поле) from таблица
Код:
?rasshir("иванов")
и в а н о в
alvk вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
формат даты в отчете Максон11 Помощь студентам 1 10.08.2011 16:29
Формат даты в Отчете Skolot Microsoft Office Access 5 23.04.2010 20:52
Как изменить в программе формат отображения даты и времени Alex_C Общие вопросы Delphi 2 13.09.2008 23:39
Как установить формат даты на всю книгу ? SD_KOROLEV Microsoft Office Excel 3 02.03.2008 20:14
Как изменить формат отбражаемой даты? Vindigo Помощь студентам 1 27.01.2008 22:25