Ok here's my dilema,

I need to draw a series of 20 parrallel lines in a picture box at a spacing of 30 twips on form load.

Here's the code I have but it ain't drawing a single
line...

Dim sngX As Single, sngY As Single

Private Sub Form_Load()
sngX = 0
sngY = 0
For i = (1) To (20)
picMap.Line (sngX, sngY)-(sngX + 30, sngY)
intX = intX + 30
intY = intY + 30
Next i
End Sub