Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
VBA (методичка).doc
Скачиваний:
0
Добавлен:
01.04.2025
Размер:
2.3 Mб
Скачать

Набор вкладок (TabStrip)

Создает несколько вкладок в диалоговом окне. Объект TabStrip содержит семейство Tabs, представляющее собой набор всех вкладок. Объект TabStrips и семейство Tabs обладают теми же свойствам и методами, что и объект MiltiPage и семейство Pages.

Календарь (Calendar)

Он представляет собой средство для организации удобного интерфейса по вводу дат. Для добавления этого элемента управления при включенной панели элементов следует выбрать команду Tools – Additional Controls и выбрать календарь в появившемся списке. Затем календарь конструируется на форме кнопкой Calendar .

Свойства объекта

Свойство

Описание

Day

Возвращает выбранный день

DayFont, DayFontColor

Устанавливает шрифт и цвет шрифта для названия дней недели.

DayLength

Допустимые значения:

2 – отображается полные названия дней;

1 – две буквы из названий дней;

0 – отображается только по первой букве из названия дня.

FirstDay

Первый день недели. Допустимы значения от воскресенья до субботы.

Month

Возвращает выбранный месяц.

MonthLength

Допустимые значения:

2 – отображается полное название месяца;

0 – отображаются только первые три буквы из названия месяца.

ShowDays

Допустимые значения:

True – отображаются названия дней недели;

False – в противном случае.

ShowDateSelected

Допустимые значения:

True – отображается выбранная дата в верхней части календаря;

False – в противном случае.

Value

Возвращает или устанавливает выбранную дату.

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

Private Sub Calendar1_Click()

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

End Sub

Year

Возвращает или устанавливает выбранный год.

Методы объекта

Методы

Описание

NextDay, NextWeek, NextMonth, NextYear

Устанавливает следующий день, неделю, месяц и год.

PreviousDay, PreviousWeek, PreviousMonth, PreviousYear

Устанавливает предыдущий день, неделю, месяц и год.

Today

Устанавливает текущую дату в календаре.

Отображение встроенных диалоговых окон

Все диалоговые окна образуют семейство Dialogs, индекс которого определят активизируемое диалоговое окно. Отображение окна на экране осуществляется методом Show.

Таблица 18. Значение индекса семейства Dialogs

Значение параметра

Диалоговое окно

xlDialogFindFile

Открытие документа при поиске файла.

xlDialogFileDelete

Удалить файл.

xlDialogGoalSeek

Подбор параметра.

xlDialogOpen

Открытие файла.

xlDialogSaveAs

Сохранить как.

xlDialogSaveWorkBook

Сохранить.

xlDialogPrint

Печать.

xlDialogPrintPreview

Предварительный просмотр.

Например: Отображение диалогового окна Открытие документа.

Application.Dialogs(xlDialogOpen).Show