I have created a hangman type game where you guess letters which make up a
word.

This has some basic animation in the form of a bear whose eyes follow the
mouse and who blinks randomly.
The blinking is done by increasing the height of a label and reducing it
again using a loop
eg
dim i as double
for i = 0 to 9 step 0.5
labelblink.height = i
doevents
next

Is there anyway of making the speed of this independent of the processor
speed, as currently it is painfully slow on some PC's and far too fast on
others?

Many thanks
Libby