Свойство можно создать с помощью объявления общедоступной переменной в разделе
объявлений модуля класса. В приведенном ниже примере создается свойство UserType объекта cUser:
Public Name as String
Public UserType as String
После этого несложного объявления пользователи могут устанавливать и получать значения свойства. Для установки значения свойства применяется следующий программный код:
cUser.Name = "Steve"
cUser.UserType = "Management"
Для выборки значения свойства используется следующий программный код (рис. 4);
MagBox cUser.Name