اختصاص عکس به هر پنل

[parham01 82]

سلام سورسی دارم دارای پنل و باتم

میخوام برای هر یک از  پنل هام یک عکس

و برای هر باتم یک متن خواص قرار بدم

For i=0 To 29
Dim p As Panel
p.Initialize("p")
p.LoadLayout("pnl")
HorizontalScrollView1.Panel.AddView(p,left,0,100%x,100%y)
Label1.Text="Panel "&(i+1)
Button1.Text="پنل "&(i+1)
Button1.Tag=i+1
left=left+Panel1.Width+10dip   'afzayeze meqdare left baraye ezafe nashodane panel ha ruye ham
HorizontalScrollView1.Panel.Width=left 'afzayeshe  tule panele dakhelie scrollview hamrah ba ezafe shodane panelha
Next

 

[parham01 82]

up