Dim areaRect As Rect
areaRect.Initialize(panelana.left,panelana.top,panelana.Width, panelana.Height)
c.drawRect(areaRect, Colors.Transparent, True, 0)
For i=1 To toplamtrafik
c.DrawCircle(ucak(i).left,ucak(i).Top-10dip,5dip,Colors.White,True,1dip)
Next
panelana.Invalidate