مشکل نشان ندادن محتویات اسکرول ویو از بالا در لود دوباره

[mahdig502 27]

سلام دوستان

مشکلم با اسکرول ویویی که توی تب 1 15 تا پنل داره و وقتی به سمت پایین اسکرولش میکنم و انوقت تب 2 را میزنم  اسکرول ویو پنا های تب 2 را از بالا (اولش) لود نمیکنه و از همون پایین این کارا میکنه

اینم فیلمش اگر متوجه نشدید

http://s6.picofile.com/file/8250724268/Rec_023.mp4.html

 

 

اینم کد مولتی پنل  

'''''''''''''''''''''''''''''''''''''''''''''''''''''''''' مولتی پنل
		Dim left1 , top1 As Int
		left1 =4.3%x
		top1 = 3%x
		
		Dim tasvir As BitmapDrawable
		For i = 1 To 15
			
			tasvir.Initialize(LoadBitmap(File.DirAssets,"m"&i&".png")) 
			p(i).Initialize("p")
			p(i).Background=tasvir 
			scr.Panel.AddView(p(i),left1,top1,30%x,20%y)
			scr.SendToBack
			left1 = left1 + 31%x
			p(i).Tag = i
	
				If i Mod 3 = 0 Then
			top1 = top1 + 24%y
			scr.Panel.Height = top1 + 31%y
			scr.Height=top1-22%y
			left1 = 4.3%x
				End If
		Next

و اینم کد کلیک تب ها

Sub b_Click
	Dim myb As Button = Sender
	st = myb.Tag
	If st = 1 Then 
	For i=1 To 15
	   mbi.Initialize(LoadBitmap(File.DirAssets,"m"&i&".png"))
	   p(i).Background=mbi
	  Next
	End If
	
	If st = 2 Then 
	For i=1 To 5  
	   sbi.Initialize(LoadBitmap(File.DirAssets,"s"&i&".png"))
	   p(i).Background=sbi
	  Next
	  	For i=6 To 15
	   sbi.Initialize(LoadBitmap(File.DirAssets,"mm.png"))
	   p(i).Background=sbi
	  Next
	End If
	
			If st = 3 Then 
	For i=1 To 8
	   fbi.Initialize(LoadBitmap(File.DirAssets,"f"&i&".png"))
	   p(i).Background=fbi
	  Next
	  	  	For i=9 To 15
	   sbi.Initialize(LoadBitmap(File.DirAssets,"mm.png"))
	   p(i).Background=sbi
	  Next
	End If
	
	For i= 1 To cunt
		If i = st Then
			back.Initialize(LoadBitmap(File.DirAssets,"p"&myb.Tag&".png"))
			myb.Background = back
		Else
			back.Initialize(LoadBitmap(File.DirAssets,i&".png"))
			b(i).Background = back
		End If
	Next
End Sub

[مهدی ایزدی 9,203]

درود

sc.ScrollPosition = 0 کنید توی رویداد tab changed ببینید مشکل برطرف میشه؟