Выполнение программы и анализ полученных результатов

Цехом получен заказ на изготовление 100000 канцелярских скрепок, который нужно выполнить за неделю.

Для составления календарного плана работы цеха использовалась разработанная программа. Было рассмотрено ряд вариантов плана. На рис. 8.3. представлен один из них.

Рис. 8.3. Вариант календарного плана

При работе по этому плану предусматривается один выходной – воскресенье. План составлен с незначительным запасом 5000 шт. с учетом того, что может быть допущен небольшой брак в пределах 5% от заказа.

Пользовательский тип данных

Определение и обращение

Пользовательский тип данных (user-defined types) представляет собой объединение фиксированного числа элементов, которые называются полями.

В отличие от массивов поля могут иметь разные типы. Кроме того, доступ к ним осуществляется не по индексу, а по имени.

Каждое поле в пользовательском типе определяется именем и типом. С помощью имени поля указывается нужный элемент.

Определение пользовательского типа данных производится с помощью ключевого слова Type следующим образом

Type Имя_типа

Элемент1 [([Размерность])] As Тип

[Элемент2 [(Размерность])] As Тип

…

End Type

Переменная пользовательского типа описывается, как обычно, в операторе Dim.

Пример определения пользовательского типа.

Type Место

strСтрана As String*10

strГород As String*15

End Type

Type Товар

strНаименование As String*20

udtПроизводитель As Место

curЦена As Currency

intКоличество As Integer

End Type

Dim udtМебель As Товар

В примере пользовательской тип Товар содержит в качестве элемента другой пользовательский тип Место.

Примечания.

1. Поля строкового типа в пользовательском типе могут быть только фиксированной длины (например, String*10 состоит из десяти символов)

2. В именах переменных пользовательского типа используется префикс udt (иногда usr).

3. Тип, используемый в качестве элемента в другом более сложном типе, должен быть описан до его использования.

Поля переменной пользовательского типа могут использоваться в различных операторах кода также как и простые переменные. Обращение к ним осуществляется подобно свойствам объектов с использованием точки после имени переменной.

Пример использования полей переменной пользовательского типа:

udtМебель.strНаименование = "Стол"

udtМебель.udtПроизводитель.strГород = "Харьков"

curСтоимость = udtМебель.curЦена * udtМебель.intКоличество