Tegne grafik på en form

Hej

Jeg har brug for at kunne tegne grafik på en form og har rodet med windows gdi kald, men kan ikke få det til at virke. Jeg syntes jeg gør ligesom jeg gør i delphi, men det virker ikke. Jeg får dog ikke nogen fejl. Jeg forsøger nedenstående:

Dim hDC As Long, hPen As Long, hGdiObject As Long, res As Long
Dim tp As tpPoint

hDC = GetDC(Me.hWnd)

hPen = CreatePen(0, 1, 65535)
hGdiObject = SelectObject(hDC, hPen)

res = MoveToEx(hDC, 50, 50, tp)
res = LineTo(hDC, 400, 50)


DeleteObject hPen
ReleaseDC Me.hWnd, hDC

Hvad går der galt her?
Findes der en anden måde og tegne frit på en access form?

Mvh
ON