在VB中如何創(chuàng)建閃爍(標(biāo)語)屏

字號(hào):

大型應(yīng)用系統(tǒng)啟動(dòng)運(yùn)行的時(shí)間需要很長時(shí)間,其時(shí)間會(huì)根據(jù)需要初始化的數(shù)量和用戶系統(tǒng)的速度變化,因此在主窗口顯示前,應(yīng)顯示一個(gè)初始化窗口,使應(yīng)用程序看起來更具吸引力,因?yàn)楫?dāng)裝載程序時(shí)不斷可以向用戶顯示一些信息,而且可產(chǎn)生美觀的視覺效果。例如vb、delphi在啟動(dòng)時(shí)均在主界面前顯示一splash窗口.
    ----1.下面是顯示閃爍(標(biāo)語)屏splash的一種簡單方法:
    optionexplicit
    privatesubform_load()
    '顯示主窗口
    me.show
    '顯示splash窗口
    frmsplash.show
    doevents
    '執(zhí)行應(yīng)用程序初始化
    initialize
    '關(guān)閉splash窗口
    unloadspalsh
    endsub
    ----該過程代碼應(yīng)放在應(yīng)用程序的啟動(dòng)窗體中。第一個(gè)show方法可使windows在屏幕上顯示主窗體,下一個(gè)show方法顯示閃爍屏,它是你設(shè)計(jì)的名為frmsplash的窗體.在利用show方法之后,再利用Doevents函數(shù),以確保閃爍屏窗體的所有元數(shù)立即繪制完。Initialize函數(shù)執(zhí)行應(yīng)用程序在啟動(dòng)時(shí)需要執(zhí)行的費(fèi)時(shí)任務(wù),例如,從文件中裝載數(shù)據(jù),將窗體裝入內(nèi)存等等。這時(shí)一切都準(zhǔn)備就緒.