sayana
جمعه 17 بهمن 1382, 00:11 صبح
من یه آرایه تعریف کردم برای اینکه بتونم متغیرهای زیر رو تعریف کنم
10 تا شعبه و به ازای هر شعبه هم 20 تا کارمند
و یه رکورد هم برای کارمندا که مشخصاتی مثل نام و فامیلی و .. رو ذخیره کنه
من کد رو به اینصورت نوشتم :
Type Employee
name As String
family As String
Base_Salary As Long
code As Long
Salary As Long
End Type
Dim Company(9, 19) As Employee
Dim sum(9) As Long
اما وقتی در اعلان عمومی ( اول code window ) و به عنوان متغیر سراسری تعریفش میکنم موقع اجرای برنامه این error رو میده :
can not define a public user-defined type within a private object module
اگر هم در یک procedure تعریف کنم این error رو میده :
invalid inside procedure
10 تا شعبه و به ازای هر شعبه هم 20 تا کارمند
و یه رکورد هم برای کارمندا که مشخصاتی مثل نام و فامیلی و .. رو ذخیره کنه
من کد رو به اینصورت نوشتم :
Type Employee
name As String
family As String
Base_Salary As Long
code As Long
Salary As Long
End Type
Dim Company(9, 19) As Employee
Dim sum(9) As Long
اما وقتی در اعلان عمومی ( اول code window ) و به عنوان متغیر سراسری تعریفش میکنم موقع اجرای برنامه این error رو میده :
can not define a public user-defined type within a private object module
اگر هم در یک procedure تعریف کنم این error رو میده :
invalid inside procedure