اجرا نشدن تمام دستورات در متد set

[DexterFstone 387]

سلام و درود

یک کاستوم ویو ساختم و مقداری زیر براش در نظر گرفتم

Dim Expand As Boolean = True

Public Sub setExpand (Value as Boolean)
	Log(Value)
	Expand = Value
End Sub

Public Sub getExpand as Boolean
	Return Expand
End Sub

حالا وقتی یک مقداری بش اعمال کنم ست میشه ولی متد لاگ یا هرچیزه دیگه اگه نوشته بشه اجرا نمیشه

Dim cv As CustomView

log(cv.Expand) ' True
cv.Expand = False
log(cv.Expand) ' False

لاگی که داخل متد ست قرار دادم چاپ نمیشه ولی مقدارها به درستی جایگزین میشن دلیلش چیه که دستورات بجز Expand = Value اجرا نمیشن درصورتی که من توی زبان برنامه نویسی دیگه ای چنین مشکلی ندارم

[محمدرضا شاهپیری 5,492]

1 ساعت قبل، DexterFstone گفته است:

سلام و درود

یک کاستوم ویو ساختم و مقداری زیر براش در نظر گرفتم

Dim Expand As Boolean = True

Public Sub setExpand (Value as Boolean)
	Log(Value)
	Expand = Value
End Sub

Public Sub getExpand as Boolean
	Return Expand
End Sub

حالا وقتی یک مقداری بش اعمال کنم ست میشه ولی متد لاگ یا هرچیزه دیگه اگه نوشته بشه اجرا نمیشه

Dim cv As CustomView

log(cv.Expand) ' True
cv.Expand = False
log(cv.Expand) ' False

لاگی که داخل متد ست قرار دادم چاپ نمیشه ولی مقدارها به درستی جایگزین میشن دلیلش چیه که دستورات بجز Expand = Value اجرا نمیشن درصورتی که من توی زبان برنامه نویسی دیگه ای چنین مشکلی ندارم

متد setExpand رو با s بزرگ بنویسید