Дополнительные элементы управления

В VBA, кроме перечисленных стандартных элементов управления, имеется ряд дополнительных. Дополнительные элементы управления являются самостоятельными объектами, обладающие как общими для всех элементов управления свойствами и методами, так и присущими только им свойствами и методами. Для добавления дополнительных элементов управления на панель элементов необходимо:

Выбрать команду Сервис, Дополнительные элементы (Tools, Additional Controls).

В появившемся на экране окне Дополнительные элементы (Additional Controls) (рис. 7.27) в списке Доступные элементы (Available Controls) установить флажок напротив добавляемого элемента.

Нажать кнопку ОК.

Удаление ненужного элемента управления из панели элементов почти аналогично добавлению, а именно, надо:

Выбрать команду Сервис, Дополнительные элементы (Tools, Additional Controls).

В появившемся на экране окне Дополнительные элементы (Additional Controls) (рис. 7.27) в списке Доступные элементы (Available Controls) снять флажок напротив удаляемого элемента.

Нажать кнопку ОК.

Рис. 7.27. Диалоговое окно Дополнительные элементы

Среди дополнительных элементов управления очень полезным является элемент управления Calendar (календарь) (рис. 7.28). Этот объект представляет средство для организации удобного интерфейса по вводу дат. Элемент управления конструируется в форме с помощью кнопки Календарь (Calendar)

Рис. 7.28. Календарь в форме

Перечислим основные свойства элемента управления calendar.


	Day		Возвращает выбранный день
	DayFont , DayFontColor		Устанавливают шрифт и цвет шрифта для названий дней недели
	DayLenght		Допустимые значения: Длинный (Long) (отображаются полные названия дней) Средний (Medium) (в русской версии — отображаются две буквы из названий дней, в английской -три буквы) Короткий (Short) (отображается только по первой букве из названия дня)
	FirstDay		Первый день недели. Допустимые значения от воскресенье (Sunday) до суббота (Saturday)
	Month		Возвращает выбранный месяц
	MonthLenght		Допустимые значения: длинный ( Long ) (отображаются полные названия месяца) и короткий (short) (отображаются только первые три буквы из названия месяца)
	ShowDays		Допустимые значения: True (отображаются названия дней недели) и False (в противном случае)
	ShowDataselected		Допустимые значения: True (отображается выбранная дата в верхней части календаря) и False (в противном случае)
	Value		Возвращает выбранную дату
	Year		Возвращает выбранный год

<
Перечислим основные методы элемента управления calendar.


	NextDay, NextWeek, NextMonth и NextYear	Устанавливает следующий день, неделю, месяц и год
	PreviousDay, PreviousWeek, PreviousMonth и PreviousYear	Устанавливает предыдущий день, неделю, месяц и год
	Today	Устанавливает текущую дату в календаре

В качестве примера использования календаря приведем следующую процедуру, которая считывает из календаря выбранную дату и вводит ее в ячейку рабочего листа:

Private Sub Calendarl_Click()

Cells (1, 1).Value = Calendar1.Value

End Sub

Содержание раздела