|
|
|
|
|
|
|
|
|
|
Worm
Programming – Initialization
|
|
|
|
|
|
|
v |
Initialize
the worm on Form load:
|
|
|
|
|
|
|
|
|
|
Private Sub
Form_Load()
|
|
FillColor = vbGreen
|
|
FillStyle = 0
|
|
Call initializeWorm(inchwormX(),
inchwormY())
|
Call drawWorm(inchwormX(), inchwormY())
|
|
End Sub
|
|
|
|
|
|
|
(small) new
concept: using a color constant vbGreen
|
instead of rgb(0,255,0)
|
|
|
|
|