Dim l_din_redondeocolor(2) As Int
l_din_redondeocolor(0)=Colors.Transparent
l_din_redondeocolor(1)=Colors.Transparent
Dim din_redondeo As GradientDrawable
din_redondeo.Initialize("TL_BR",l_din_redondeocolor)
din_redondeo.CornerRadius = 100dip
MyLabel.Background=din_redondeo