Набор вкладок (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.

Значение параметра	Диалоговое окно
xlDialogFindFile	Открытие документа при поиске файла.
xlDialogFileDelete	Удалить файл.
xlDialogGoalSeek	Подбор параметра.
xlDialogOpen	Открытие файла.
xlDialogSaveAs	Сохранить как.
xlDialogSaveWorkBook	Сохранить.
xlDialogPrint	Печать.
xlDialogPrintPreview	Предварительный просмотр.

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

Application.Dialogs(xlDialogOpen).Show

Команды компоновки элементов управления на форме

Находятся в меню Format

Команда	Назначение
Align	Относительное выравнивание элементов.
Make Same Size	Задать размеры элементов в группе.
Horizontal Spacing	Горизонтальные промежутки.
Vertical Spacing	Вертикальные промежутки.
Center In Form	Центрировать относительно формы.
Arrange Buttons	Размещать относительно краев формы.
Order	Установить порядок отображения перекрывающихся элементов управления.

Лекция №5. Операторы

Любая программа представляет собой последовательность операторов. В строчке друг от друга операторы отделяются знаком двоеточие (:).

1.Операторы присваивания

Let (прямое присваивание)

LSet (левое присваивание)

RSet (правое присваивание)

Оператор Let

[Let] имяПеременной = <выражение>

Ключевое слово Let может быть опущено. С помощью оператора = происходит присваивание переменной, стоящей слева от оператора, значения выражения, стоящего справа от знака =. Тип присваиваемого значения должен соответствовать типу переменной.

Например:

Dim Возраст As Integer, Строка As String

Возраст = 32: Строка = «Жизнь прекрасна! » + «Все будет хорошо!»

Оператор LSet

Служит для специфического присваивания строк с одновременным выравниванием слева, а также для присваивания значения записи одного пользовательского типа записи другого.

LSet имяСтроковойПеременной = СтроковоеВыражение

LSet имяПеременной1 = имяПеременной2

В первом случае результатом присваивания является строка той же длины, что и у значения имяСтроковойПеременной. Если значение выражения СтроковоеВыражение длиннее, то лишние символы справа удаляются, если короче – то заполняются пробелами справа.

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

Например:

Sub ПримерИспользованияОператораLSet()

Dim Строка1 As String, Строка2 As String

Строка1 = "0123456789"

Строка2 = "Влево"

LSet Строка2 = Строка1

MsgBox (Строка2) ‘В результате будет выведено 01234

End Sub