home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Programming Tool Box
/
SIMS_2.iso
/
vb_code2
/
waldo
/
waldo_f.frm
(
.txt
)
next >
Wrap
Visual Basic Form
|
1995-02-27
|
60KB
|
62 lines
WALDO_F
WHERE'S WALDO?
Form1%
Picture4
Picture3
wwwwwwww
qwwwq
wwwwwwww
|wwww|ww
wwwwwwwwwww
wwwww
Picture2
wqwqq
wwwwqww
|wwqww
wwwwwwwwwwww
wwwwww
Picture1
wwwwwwww
wwwwwwww
wwwwqw
wwwwwwwwwww
wwwww
Timer1
Form_Click
picture1
Visible
Picture4
Picture
picture2
picture3
Picture4_Click
Waldo
Form1
Timer1_Timer
WALDO_F
Picture1_Click
Timer1_Timer
Show the main form after small pause
Run WALDO sub routine of animation
End of program
Waldo
This Sub uses three pictures of Waldo and one empty picture boxg
Set all picture boxes Resize property to True with no bordersr
Make sure that your Form Background color matches the background of your artwork
Declaration of animation section
Runs this loop 6 times
Shows picture #4
put Pic1 in Pic4
Move Pic4 to the right to simulate walking
Show #2
Move again
Show #3o
Show #2 Againa
Show #1o
Repeat
Hide Pic4 when finishedi
Reset Pic4 to Far Left of Form
Close the Form
End the Programs
To increase speed of animation, change 400 to 600 etc.