MyTetra Share
Делитесь знаниями!
Проверка - Имеет ли форма секции (Заголовок | Примечание)
Время создания: 16.03.2019 23:43
Раздел: !Закладки - VBA - Access - msa.polarcom.ru - 05 Формы
Запись: xintrea/mytetra_db_adgaver_new/master/base/1531972305nfk2dbrv91/text.html на raw.githubusercontent.com

Проверка - Имеет ли форма секции (Заголовок | Примечание)

Private Function FormHasSections(frm As Form) As Boolean

'Возвращает True если указанная в аргументе форма имеет Секции (Заголовок | Примечание)

'--------------------------------------------------------------------

Dim b As Boolean

'--------------------------------------------------------------------

On Error GoTo FormHasSections_Err

b = frm.Section(acHeader).Visible

FormHasSections = True

Exit Function


FormHasSections_Err:

FormHasSections = False 'Error 2462

Err.Clear


End Function




Так же в этом разделе:
 
MyTetra Share v.0.59
Яндекс индекс цитирования