VB5.0中實現(xiàn)字體閃爍效果

用VisualBasic我們可設(shè)計出形形色色符合用戶要求的應(yīng)用程序，它確實是一種很好的用戶程序開發(fā)工具，可VB提供的基本控件中都沒有閃爍屬性設(shè)置，使應(yīng)用程序界面缺乏“活性”，近期筆者設(shè)計軟件封面時，就要求字體不斷地閃爍，為此，經(jīng)反復(fù)分析、實踐，最后終于成功地實現(xiàn)字體閃爍效果，現(xiàn)將設(shè)計過程說明如下：
     (1)創(chuàng)建一個新目標(biāo)文件(project1)，并建立一個窗體Form1。
     (2)在Form1上配置一個計時器控制Timer1、標(biāo)簽控件Label1、命令控件Command1。
     (3)各控件屬性設(shè)置：
     Timer1的Enabled設(shè)置為True;
     Label1的Caption設(shè)置為需閃爍的字體：“江西省黎川縣職業(yè)中專電腦室設(shè)計”、
     Font設(shè)置字體及大小、Backstyle設(shè)置為“0－Transparent”；
     Command1中的Caption設(shè)置為“退出”。
     (4)程序代碼清單：
     OptionExplicit
     PrivateSubForm_Load()
     Label1.Top=850　　
     ′設(shè)置閃爍字體的顯示位置
     Label1.Left=750
     Timer1.Interval=555　　
     ′設(shè)置字體閃爍間隔時間
     Form1.Windowstate=2
     EndSub