99555

Коллекции объектов в Visual Basic

Доклад

Информатика, кибернетика и программирование

В Visual Basic объекты можно объединять в коллекции. Как правило, такие объекты относятся к одному типу. Однако можно объединять в коллекцию и объекты разных типов. Коллекция позволяет выполнять некоторые одинаковые действия со всеми входящими в нее объектами.

Русский

2016-09-23

125 KB

0 чел.

Коллекции объектов

К коллекции объектов можно применять оператор For Each.

В Visual Basic объекты можно объединять в коллекции. Как правило, такие объекты относятся к одному типу. Однако можно объединять в коллекцию и объекты разных типов. Коллекция позволяет выполнять некоторые одинаковые действия со всеми входящими в нее объектами.

В Visual Basic определены две встроенные коллекции объектов, к которым можно обращаться непосредственно:

Forms - включает все загруженные формы проекта;

Controls - включает управляющие элементы всех форм.

Каждая коллекция, кроме методов и свойств, входящих в нее объектов, имеет собственные методы и свойства. Кроме того, все коллекции имеют следующие общие свойства и методы:

• свойство Count - содержит число объектов в коллекции;

• метод Item - служит для выбора объекта в коллекции. Некоторые коллекции имеют следующие методы:

Add - с его помощью в коллекцию можно включить новый объект;

Remove - с его помощью объект можно исключить из состава коллекции.

В случае необходимости, кроме встроенных коллекций, можно определять свои коллекции. Для этого необходимо создать объект типа Collection. Объявление такого объекта имеет синтаксис

Public  |    [Private] |  Dim ИмяКоллекции As New Collection

 Некоторые объекты могут не поддерживать какое-то конкретное свойство или метод. VB позволяет обойти это препятствие двумя способами: с помощью ключевого слова TypeOf и функции TypeName.

Ключевое слово TypeOf можно использовать только в операторах IfThenElse … . Необходимо включить имя класса непосредственно в разрабатываемый код. Например, If TypeOf MyControl Is CheckBox Then ….

Функция TypeName отличается большей гибкостью. Ее можно использовать в любом месте кода и, так как она возвращает имя класса в строке, ее можно использовать в операторах сравнения со строковой переменной.

Рассмотрим пример создания коллекции управляющих элементов и их массовой обработки. В экранной форме проекта для этого примера будут размещены пять элементов управления CommandButton и один элемент Label. Все элементы CommandButton будут включены в коллекцию, а затем для каждого управляющего элемента этой коллекции в цикле For Each свойствам Caption будет установлено значение Мы из коллекции. Для разработки программы примера следует выполнить такие действия.

1. Создать новый проект с экранной формой, как показано на рис. 1, установить ее свойству Caption значение Цикл For Each.

Рис. 1

2. Поместить в форму управляющий элемент CommandButton, а затем создать массив из четырех этих элементов.

3. Поместить в экранную форму еще два элемента CommandButton, установив их свойствам Caption значения Выполнить и Выход соответственно.

4. Свойству Caption управляющего элемента Label установить значение Коллекция управляющих элементов.

5. В раздел "General" формы поместить код:

Option Explicit

Dim Коллекция As New Collection 'Объявление объекта типа Collection

Dim X As Control 'Объявление переменной типа Control

6. В процедуру обработки события Click для управляющего элемента с именем Command2 поместить код:

Private Sub Command2_Click()

For Each X In Controls   'Начало цикла

If TypeOf X Is CommandButton Then

 'Если управляющий элемент CommandButton,

'то добавить в коллекцию

Коллекция.Add X

End If

Next X 'Конец цикла For Each

For Each X In Коллекция

'Цикл, устанавливающий значения свойств

'Caption коллекции элементов

X.Caption = «Мы из коллекции»

Next X

End Sub

7. В процедуру обработки события Click для управляющего элемента с именем Command3 поместить код:

Private Sub Command3_Click()

End

       End Sub

8. Запустить программу на выполнение. После щелчка мышью по кнопке <Выполнить> изображение на экране примет вид, как показано на рис. 2.

Рис. 2


 

А также другие работы, которые могут Вас заинтересовать

63405. Обоснование режимов работы добывающих скважин при снижении забойного давления ниже давления насыщения пластовой нефти газом 391.5 KB
  Поэтому имеет место дополнительное снижение проницаемости системы по нефти жидкости которое определяется зависимостью фазовой проницаемости по нефти от газонасыщенности пласта в свою очередь зависящей от давления.
63406. Психологические особенности школьника старшего возраста 208.5 KB
  Они должны владеть своими психическими процессами подчиняя их определенным задачам жизни и деятельности. Ведущее место занимают мотивы связанные с самоопределением и подготовкой к самостоятельной жизни.
63407. Социально-экологические проблемы современности: рост населения, ресурсный кризис, изменение генофонда, возрастание общей агрессивности среды, новые виды воздействии 211 KB
  Интенсивное и нерациональное развитие орошаемого земледелия в бассейне рек Амурдарья и Сырдарья привело к тому что с 1960 года начал катастрофически понижаться уровень Аральского моря и сейчас он понизился на 18 метров. Состояние каспийского моря сейчас оценивается как предкризисное.
63408. Методы кодового разделения каналов 482.11 KB
  Наиболее типичными представителями протоколов данного типа являются многостанционный доступ с частотным разделением FDM многостанционный доступ с временным разделением TDM многостанционный доступ с кодовым разделением...
63409. ИНФОРМАЦИЯ О РАЗЛИЧНЫХ СУБД 739 KB
  За почти пятидесятилетнюю историю развития БД были созданы сотни различных программных продуктов, которые обеспечивали управление данными. Это были разработки как ведущих разработчиков программных средств (MS, IBM, Oracle, др.), так и программные средства некоторых организаций в России и за рубежом.
63410. Понятие экономической системы. Типы экономических систем. Историческая классификация экономических систем. Натуральное хозяйство, основные этапы его развития. Недостатки натурального хозяйства 74.5 KB
  Модели смешанной экономики. Модели организации экономики отличаются между собой по степени свободы принятия решений и участия рыночных отношений в процессе перераспределения имеющихся ресурсов. В рамках каждого типа экономической системы существуют свои национальные модели.
63411. Управление режимами работы добывающих и нагнетательных скважин при заводнении 614 KB
  Режимы работы скважин определяют скорость вытеснения нефти или депрессию давления в пласте градиенты давления в пласте. Оценка добывных возможностей скважин при заводнении При заводнении пласта закачиваемыми водами происходит снижение коэффициента продуктивности скважины.
63412. ВЫБОР СУБД 404 KB
  Оптимизацию этих расходов можно произвести через правильный выбор СУБД. Выбор СУБД представляет собой сложную многопараметрическую задачу и является одним из важных этапов при создании БД.