В прошлом шаге мы посмотрели какие бывают свойства и как их выбирать и создавать. Давайте создадим свойства для нашего класса. Первое - создадим две закрытые переменные для хранения имени и содержимого счета.

Private ChetName As String
Private ChetBalance As Integer

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

Private ChetName As String
Private ChetBalance As Integer

Public Property Get Name() As String
	Name = ChetName
End Property
Public Property Let Name(Name As String)
	ChetName = Name
End Property

Public Property Get Balance() As Integer
	Balance = ChetBalance
End Property
Public Property Let Balance(balanc As Integer)
	ChetBalance = balanc
End Property

В окне Object Browser мы можем посмотреть наш класс и его элементы. Обратите внимание, что свойство одно. И у него есть тип:

Вот вроде как все готово. Теперь мы можем создать DLL. В меню File должен быть пункт меню Make chet.Dll:

Выберите его. У Вас спросят местоположение файла и начнется процесс создания DLL. Через некоторое время, в зависимости от мощности вашего ПК, в указанном каталоге Вы найдете новый DLL файл.