Question

VB 编程：1.窗体上放置一个标签和一个计时器控件。 2.标签的caption属性设置为“★”。 3.计时器的时间间隔

Answer 1

其实我觉得让字号也随机变化起来能带来更好的视觉效果，你觉得呢？不过按照你的意思，如果每隔100毫秒星的字号随机地增2或减2的话，下面的这个代码应该不错：(代码在Timer1的Timer中)
Select Case Label1.Font.Size
Case 80
a = -1
Case 5
a = 1
Case Else
a = (Int(2 * Rnd) + 1) * 2 - 3
End Select
Label1.Font.Size = Label1.Font.Size + 2 * a
Label1.ForeColor = RGB(Int(256 * Rnd), Int(256 * Rnd), Int(256 * Rnd))

Answer 2

问题没发全

追问

五星
1.窗体上放置一个标签和一个计时器控件。
2.标签的caption属性设置为“★”。
3.计时器的时间间隔设置为100。
4.标签字体最大为80，最小为5，变化一次增加2或减少2，实现颜色随机。