Om jag vill att under Private Sub Form_Load()
så ska datorn dra en linje mellan 100,100 till 500,500 dens bordercolor ska vara röd och dens borderwidth ska vara 2.
Hur skriver jag då?

Såhär kan man göra:

<code>
Private Sub Form_Load()
PrintLine1
End Sub

Private Sub PrintLine1()
Line1.X1 = 100
Line1.Y1 = 100
Line1.X2 = 500
Line1.Y2 = 500
Line1.BorderColor = vbRed
Line1.BorderWidth = 2
End Sub
</code>

Om du ska rita i Form_Load måste du sätta AutoRedraw i design läge eller i designläge.
<code>
Private Sub Form_Load()
Me.AutoRedraw = True
Me.DrawWidth = 2
Me.Line (100, 100)-(400, 400), vbRed
End Sub
</code>

Tack! Det funkade bra.

>Om du ska rita i Form_Load måste du sätta AutoRedraw i design läge eller i designläge.

Jaha ,där ser man skall man särskriva eller inte ????

Jag ville gör sär skrivare och icke särskrivare tillags. Något fel med det? ;o)
Whooops ,jag fattade inte skämtet :-),du måste vara Göteborgare