耶 - 仿造仿造 .

Siner

我反复用我的两台机子测试
一个是AMD3000+ 一个是P4 1.6
发现影响速度原因好像是星星不停的闪，如果不让星星闪就不会卡了

wangh

Private Type stars              '定义星星的结构体
    X As Long                   '星星的横坐标
    Y As Long                   '星星的纵坐标
    light As Integer            '星星的亮度
End Type

这里改成

Private Type stars              '定义星星的结构体
    X As Long                   '星星的横坐标
    Y As Long                   '星星的纵坐标
    light As Integer            '星星的亮度
    Speed As Single
End Type


MyStar(i).X = MyStar(i).X - 3

这里改成

MyStar(i).X = MyStar(i).X -  MyStar(i).Speed


这样只要一个数组就够了,每个星的速度都可以不同