LEADERSOFT.ru Разработка на заказ программ и сайтов
Форумы по информационным технологиям
 
Регистрация  |  Вход
left
Форумы Минимизировать
ПоискСписок форумов
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: Ограничен...
 Тема: Ограничение по дням
 
 15.06.2007 19:58:16
SergeApp1
30 сообщения


Тема: Ограничение по дням
Задача такая: В отчете стоит определенная дата, если проходит, например, 30 дней, дата выделяется. Т.е. увеличивается шрифт и выделяется красным цветом. Как это сделать. Если можно код, и куда его вписать, я новичoк в Access


P.S. Управление датой
Автор: SergeApp от 19.11.2001 10:07:10 Источник ...
 15.06.2007 19:58:17
All
4316 сообщения
1-ый


RE: Ограничение по дням
Событие форматирование данных отчета (измененный 8 пример файла la_report.mdb):
Private Sub ОбластьДанных_Format(Cancel As Integer, FormatCount As Integer)
Dim ctl As Control
Set ctl = Me.Section(acDetail).Controls("Дата")

'Выбираем поле Даты и проверяем значения
Select Case ctl
Case Null 'Если нет даты, то отключаем запись
Cancel = False
Case Is >= DateValue("31.12.1999") + 1 'Отображаем книги 2000 года
Cancel = False 'Отключаем оставшиеся записи
Case Else
Cancel = True
ctl.ForeColor = RGB(0, 255, 0) ' Выбираем цвет
End Select
End Sub


P.S. Управление датой
Автор: Виктор Конюков от 0:00:00 Источник ...
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: Ограничен...
ПоискПоиск  Список форумовСписок форумов  
right