دو ردیف باتن در یک حلقه فور

[ghojamaz 1]

سلام وقت بخیر

من دو ردیف باتن در یک حلقه فور دارم

میخوام وقتی روی باتن شماره 1 ردیف راست رو بزنم باتن شماره 1 ردیف چپ رنگش تغییر کند. و بقیه باتن ها هم به همین صورت تغییر رنگ بدن

dim active as int	
For active=0 To 10
		bt1.Initialize("bt1")
		bt.Initialize("bt")
		Activity.AddView(bt1,10%x,active*6%y,10%x,5%y)
		Activity.AddView(bt,bt1.Left+20%x,active*6%y,bt1.Width,bt1.Height)
Next