- Код: Выделить всё
Private Sub Class_Initialize()
NumClas = NumClas + 1
NomCl = NumClas
Set frmMain = New frmMain1
frmMain.NomCl = NumClas
End Sub
NumClas - глобальная переменная из модуля
NomCl - переменная класса
frmMain - форма, объявленная на уровне класса
frmMain.NomCl - переменная на уровне формы
При создании нескольких экземпляров этого класса переменные NumClas и NomCl под отладчиком увеличиваются, а в скомпилированном проекте всегда равны 1(похоже в этом моя проблема данные разных по сути форм перемешиваются). Почему? Может не проставил какое нибудь свойство публичного класса? Может дело в активикс ехе?