vb程序設(shè)計(jì)軟件 VB中的shape控件怎么畫一個(gè)不停隨機(jī)變換顏色的球???
VB中的shape控件怎么畫一個(gè)不停隨機(jī)變換顏色的球?。俊澳枰褂脮r(shí)間控件。代碼如下:private sub formuload()Shape1.BackStyle=1 Shape1.Shape=3
VB中的shape控件怎么畫一個(gè)不停隨機(jī)變換顏色的球啊?
“您需要使用時(shí)間控件。代碼如下:private sub formuload()Shape1.BackStyle=1 Shape1.Shape=3 Timer1.Interval=500 Timer1.Enabled=TrueEnd SubPrivate sub Timer1utimer()Shape1.BackColor=RGB(Int(255*Rnd)、Int(255*Rnd)、Int(255*Rnd))End sub