我有一个问题
Private Sub form_load()
Dim i As Long
Randomize
For i = LBound(stars) To UBound(stars)
stars(i).x = Me.ScaleWidth * Rnd + 1
stars(i).y = Me.ScaleHeight * Rnd + 1
stars(i).size = maxsize * Rnd + 1
stars(i).speed = maxspeed * Rnd + 1
stars(i).color = RGB(Rnd * 255 + 1, Rnd * 255 + 1, Rnd * 255 + 1)
Next i
End Sub
为什么在编译时,报无效限定符的错误?谢谢!