PDA

View Full Version : ارسال و خوندن یک آرایه به یک کلاس



Nabi
شنبه 13 آبان 1385, 08:10 صبح
سلام ،

در ویژوال بیسیک اگر این کلاس رو داشته باشیم:


Dim X As Single

Property Get pt_X() As Single
pt_X = X
End Property

Property Let pt_X(tx As Single)
X = tx
End Property


براحتی میشه بدین ترتیب :


Dim myClass As Class1
Set myClass = New Class1

myClass.pt_X = 1
MsgBox myClass.pt_X


میشه متغییر X رو در سطح کلاس مقدار دهی کرد و مقادرش رو خوند.
حالا اگر X به صورت آرایه باشه چطور میشه اون رو در سطح کلاس مقدار دهی کرد .
به عبارتی یه آرایه رو به یه Property از کلاس نسبت داد و یا اون رو خوند ؟


تشکر
نبی