vb页面上有个label标签，我想让窗体打开时上面的字闪烁几下，该怎么弄

Question

是在页面上加timer么，具体该怎么写啊

Answer 1

sub Timer1_timer()
   static a as boolean
   label1.backcolor=iif(a,qbcolor(*白色*),qbcolor(*黑色*))
end sub

Answer 2

Dim i As Boolean
Private Sub Form_Load()
i = True
End SubPrivate Sub Timer1_Timer()
If i = True Then
    Label1.ForeColor = vbRed
    i = False
Else
    Label1.ForeColor = vbBlue
    i = True
End If
End Sub
你可以想停止闪烁的话就加上这行代码:Timer1.Enabled=False