Dim Poi() As Point = {New Point(650, ScreenH - 20), New Point(675, ScreenH - _
  70), New Point(700, ScreenH - 20)}
e.Graphics.FillPolygon(Brushes.Gray, Poi)

_________________________________________________
VB.Net Einsteiger mit fortgeschrittenem Unwissen.