dotNETportal.cz

Na to tam byla nějaká taková úchylná syntaxe, něco jako tohle:

Me.Line (0, 0)-(100, 100), barva, B     'obdélník
Me.Line (0, 0)-(100, 100), barva, BF    'vybarvený obdélník

Já to kdysi dělal pomocí API. už je to docela dávno, tak snad jen dvě API funkce, které budeš potřebovat.

Mnohoúhelník se kreslil přes

Public Declare Function Polygon Lib "gdi32" Alias "Polygon" (ByVal hdc As Long, lpPoint As POINTAPI, ByVal nCount As Long) As Long

no a pak výplň se řešila přes funkci

Public Declare Function FillRect Lib "user32" Alias "FillRect" (ByVal hdc As Long, lpRect As RECT, ByVal hBrush As Long) As Long

Strýček google ti jistě rád poradí. Jinou cestou to však nešlo.