تغیر رنگ باتن هنگام انتخاب باتن

[AMiR 18]

با سلام

 

با مولتی پنل یه منویی درست کردم که بطور مثال 5 تا گزینه ساخته شده، حالا میخوام هر گزینه رو انتخاب میکنم ، همون گزینه رنگش عوض بشه و وقتی بطور مثال گزینه 2 انتخاب میکنم ، رنگ گزینه 2 عوض بشه

در کل رو هر گزینه ای کلیک میکنم رنگش عوض بشه در حالی که رنگ بقیه برگرده به حالت قبلش!

 

با تگ یه کدایی نوشتم ولی جواب نداد، هر چقد فکر میکنم راهی براش پیدا نمیکنم

 

دوستانی که تجربه ش رو دارن یا راهی برای این موضوع سراغ دارن، راهنمایی کنن ممنون میشم

[arash127 488]

Sub panel1_Click

Dim tags As Panel

tags = Sender

Dim tag1 As String = tags.tag

For Each v As View In Activity

If v Is Panel Then

If v.tag = tag1 Then

v.Color = Colors.Red

Else

v.Color = Colors.Green

End If

End If

Next

End Sub

[AMiR 18]

Sub panel1_Click
	Dim tags As Panel
	tags = Sender
	Dim tag1 As String = tags.tag
	
	For Each v As View In Activity   
	   	If v Is Panel Then
	    	If v.tag = tag1 Then
		  		v.Color = Colors.Red
	   		Else
				v.Color = Colors.Green
			End If
	 	End If
	Next
	
End Sub

 

 

تشکر

 

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

 

چون داخل حلقه For یکم برام نا آشنا بود خودم نتونستم کاری کنم! Each کارش چیه؟