Основы офисного программирования и язык VBA


   кухонные мойки из камня; мойка Blanco Nova 45 S Гранит          

Коллекция Controls


Для доступа к набору элементов управления диалогового окна можно использовать коллекцию Controls, включающую все элементы управления окна. Каждый элемент управления имеет в этой коллекции индекс, значение которого может быть числом или строкой. Для первого элемента управления индекс равен 0. Числовые индексы определяются порядком размещения элементов в коллекции. Строковое значение индекса соответствует имени (Name) элемента.

Например, следующий цикл позволяет скрыть элементы управления диалогового окна MyForm, которые в данный момент не нужны пользователю.

Public Sub WorkWithForm2 () Dim myForm As New frmMy2 Dim Ctrl As Control Dim msgCode As Integer, Answer As Integer For Each Ctrl In myForm. Controls 'цикл по всем элементам управления msgCode = vbYesNo + vbQuestion 'Вопрос об очередном элементе управления: Answer = MsgBox (prompt:="Скрыть элемент " & Ctrl. Name, _ Buttons:=msgCode, Title:="Вопрос") If Answer = vbYes Then 'ответ "Да" Ctrl. Visible = False 'скрыть очередной элемент End If Next Ctrl myForm. Show End Sub



Содержание  Назад  Вперед





Forekc.ru
Рефераты, дипломы, курсовые, выпускные и квалификационные работы, диссертации, учебники, учебные пособия, лекции, методические пособия и рекомендации, программы и курсы обучения, публикации из профильных изданий