Элемент управления «рисунок» (Image)

Создается кнопкой «Image» . Необходим для размещения на форме различных графических объектов.

Основное свойство «Picture», в котором вы должны указать имя файла, из которого необходимо поместить картинку в наш рисунок.

Пример.

Хотим разместить на форме картинку, с информацией о виде функции

Наши действия:

1. открываем MS Word и в редакторе формул набираем .

2. копируем нашу формулу в буфер обмена.

3. открываем Paint и вставляем содержимое буфера обмена. Отметим, что сделать размер рисунка надо небольшим, таким чтобы на нём разместилась формула, а свободного места, по сути, не было. Иначе при вставке в небольшой по габаритам образ, формулу будет не видно. Вставляется то весь рисунок, вместе с «пустым» местом.

4. сохраняем рисунок. Например на диске С:\FORMULA.bmp.

5. открываем VBA. Вставляем на форму элемент Image, и в его свойстве «Picture», указываем адрес рисунка С:\FORMULA.bmp.

Элемент управления «список» (ListBox)

Создается кнопкой «Список».Применяется для хранения списка значений. Пользователь из списка может выбрать одно или несколько значений, которые затем можно использовать.

Пример списка вы видели при настройке, например, нужных вам служебных программ.

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

Список в любое время можно программно! дополнить или сократить. Похож «Список» на этапе визуального программирования на текстовое поле. Выбор элемента из списка производится щелчком по элементу.

Отметим, что все элементы списка можно представить как элементы некоторого массива, индексы которых начинаются с 0. Демонстрация работы со свойствами на списке с именем LST1.

Основные свойства.

1. List Index – возвращает номер выбранного элемента в списке. Если ни один элемент не выбран, то возвращает значение –1. Переменная n= LST1. List Index имеет значение индекса выбранного злемента.

2. List Count – возвращает число элементов в списке. Отметим, что индекс последнего элемента в списке на единицу меньше количества элементов (нумерация начинается с 0). Если в списке 20 элементов, то n= LST1. ListCount эквивалентно n=20.

3. Text – важнейшее свойство. С помощью данного свойства определяется выбранный элемент, т. е. данное свойство возвращает выбранный элемент.

Пример. x=Lst1.text

Переменной х присваивается значение выбранного щелчком элемента в нашем списке

4. List(i) - возвращает значение і-го элемента списка.

х=Lst1.List(2) – выбран 3-й элемент списка

Свойство List помогает заполнить список, вставив в него элементы массива.

Lst1.List = array( “0.1”, “0.2”.”0.3”)

5. RowSource – устанавливает диапазон места Excel, из которого будет сформирован список.

Примеры:

а) Lst1.RowSource= “a1:a5”

Cписок сформирован из элементов диагонали А1:А5 активного рабочего листа.

Первый элемент – из ячейки a1,второй из– a2,…,пятый – a5

б) Lst1.RowSource= “лист!a1:a5”

в) Lst1.RowSource= worksheets(1).range(“a1:a5”).address

6) Control Source – устанавливает ячейку (диапазон) куда будут выведены выбранные в списке элементы.

Пример.

Lis1.Control Source= “a6”

После выбора элемента из списка, он будет занесен в ячейку А6 активного рабочего листа.

7) Selected – логическое свойство (TRUE или FALSE)

TRUE – если элемент в списке выбран

FALSE – если элемент в списке не выбран

Пример.

Если выбран 5 элемент из списка, то

Lis1.Selected(4)=TRUE

8) Multiselect – устанавливает можно ли:

а) выбрать только один элемент frmMultiselectSingle

б) выбрать несколько элементовfrmMultiselectMulti

Обращаем внимание, что свойством Selected имеет смысл только тогда, когда Multiselect имеет значение frmMultiselectMulti

Следующий пример демонстрирует как, используя данные свойства, выяснить, сколько элементов из списка выбрано (переменная n)

n=0

With Lis1

FOR I=0 TO . List Count-1

IF . Selected (i)=TRUE THEN n=n+1

NEXT I

END WITH

9) ListStyle – устанавливает способ выделения элементов.

а) frmstylePlain (цветом)

б) frmstyleOption (перед каждым элементом флажок)

Основные методы «списка».

1. Clear – удаляет все элементы из списка; «очищает список». (Lst1.clear)

2. AddItem – добавляет элемент в список.

Пример ввода массива х(і), і=1,...n в список Lst1;

Lst1.Clear

FOR I= 1 to n

Lst1.AddItem x(i)

NEXT I

Если нам необходимо поставить некоторый новый элемент на конкретное место в списке, то указываем , что это за элемент и место, где он должен стоять. Например, разместить слово «тигр» на четвёртом месте списка. Напоминаем, что нумерация списка начинается с 0!

Lst1.Add Item «тигр», 3 ’ «тигр» на 4 место, остальные элементы сдвигаются вниз по списку.

3. RemoveItem – удаляет элемент из списка.

Синтаксис Remove Item(k), где k – индекс удаляемого элемента.

Пример удаления.

Lst1.Remove Item 3 ‘ Удаление 4-го элемента из списка.