笔者在教小朋友认识红绿灯时,曾用VB编过一个小程序来说明红绿灯的作用,当红灯时程序中的小孩为静止的,当为绿灯时小孩就不停的走了起来。用后感觉效果不错,家中有小朋友的赶快来试一下吧。 timer1的interval属性设为3000,用来控制红绿灯转换。
第一步设计用户界面如下:
-width="100">
timer2的interval属性设为200,用来控制小孩走动。
shape1的shape属性为3-circle
fillcolor为红色
fillstyle为0-solid
image2---image5:用来存放四幅小孩的图片,其visible属性为false。
image1:用来显示动态的小孩。
PrivateSubForm_Load()
Shap...[ 查看全文 ]