ولی وقتی میخوام به هر یکی از لیبل ها متن جداگانه ای بدم , متن همه لیبل ها یکی میشه.
اینم کدی که من استفاده کردم:
Dim p As Panel
Private lrecv1 As Label
Private lrecv2 As Label
Dim labelview,labelview1 As Label
-----------------------------------------------------------------------------------------------------------------------
For Each view1 As View In p.GetAllViewsRecursive
If GetType(view1)=GetType(lrecv1) Then
labelview=view1
labelview.Text=Items.Get(Position)&" "&items1.Get(Position)
else If GetType(view1)=GetType(lrecv2) Then
labelview1=view1
labelview1.Text=items2.Get(Position)
End If
سوال
moh3n 16
سلام
من از چندتا لیبل توی ریسایکلر ویو استفاده میکنم.
ولی وقتی میخوام به هر یکی از لیبل ها متن جداگانه ای بدم , متن همه لیبل ها یکی میشه.
اینم کدی که من استفاده کردم:
Dim p As Panel Private lrecv1 As Label Private lrecv2 As Label Dim labelview,labelview1 As Label ----------------------------------------------------------------------------------------------------------------------- For Each view1 As View In p.GetAllViewsRecursive If GetType(view1)=GetType(lrecv1) Then labelview=view1 labelview.Text=Items.Get(Position)&" "&items1.Get(Position) else If GetType(view1)=GetType(lrecv2) Then labelview1=view1 labelview1.Text=items2.Get(Position) End Ifلینک ارسال
به اشتراک گذاری در سایت های دیگر
6 پاسخ به این سوال تاکنون داده شده است
ارسال‌های توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.