Attribute VB_Name = "Module1"
Declare Function Chord Lib "gdi32" (ByVal hdc As Long, _
ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, _
ByVal Y2 As Long, ByVal X3 As Long, ByVal Y3 As Long, _
ByVal X4 As Long, ByVal Y4 As Long) As Long


