1. Расположите объекты на форме в соответствии с рис. 10.2.
2. Значения свойств объектов, которые определяют внешний вид приложения, установите по своему усмотрению.
3. Значения свойств Caption формы, меток, кнопок установите в соответствии с рис.10.2.
Рис.10.2
4. Установите значения свойств объектов в соответствии с табл. 10.2.
Табл. 10.2
Объект | Свойство | Значение свойства |
Текстовое поле | Name | txtИсходный |
MultiLine | Тгuе | |
ScrollBars | 1— Horizontal | |
Текстовое поле | Name | txtЭлемент |
Текстовое поле | Name | txtПозиция |
Текстовое поле | Name | tхtРезультат |
MultiLine | Тгuе | |
ScrollBars | 1— Horizontal | |
Командная кнопка | Name | сmdЗаполнить |
Командная кнопка | Name | сmdВключить |
5. Проанализируйте приведенный ниже программный код, затем наберите его.
Option Explicit
Dim n As Integer ‘количество элементов в исходном массиве
Dim a() As Integer
Dim i As Integer, j As Integer, k As Integer
Dim Элемент As Integer ' Элемент, который включается в массив
Dim Позиция As Integer ' Позиция включения