啟動時顯示以及關閉splash窗體

自動出現乙個啟動窗體，其實可以在專案屬性那裡初始螢幕中選擇乙個窗體，然後加個定時器讓它關閉：

主窗體：包含乙個label和乙個timer

splash窗體：包含乙個label和乙個progressbar。窗體的topmost屬性為true，確保splash窗體顯示在主窗體上面，同時由於無法準確獲知主窗體載入資料的時間，所以設定progressbar 的style屬性為marquee

模組中的**：

public mainformstate as integer

主窗體**：

public class form1 private sub form1_load(sender as object, e as eventargs) handles mybase.load mainformstate = 0 dim frm2 as new form2 frm2.show()

timer1.start() end sub

private sub timer1_tick(sender as object, e as eventargs) handles timer1.tick timer1.stop() label1.text = "啟動中……"

console.writeline("狀態：" & mainformstate)

mainformstate = 2 label1.text = "啟動完成" console.writeline("狀態：" & mainformstate) end sub end class

splash窗體**：

public class form2
private sub form2_load(sender as object, e as eventargs) handles mybase.load
me.checkforillegalcrossthreadcalls = false
dim thrcheckstate as new threading.thread(addressof checkstate)
thrcheckstate.start()
end sub
sub checkstate()
dim blloaded as boolean = false
do while (blloaded = false)
select case mainformstate
case 0
label1.text = "啟動中……"
blloaded = false
case 1
label1.text = "正在匯入資料"
blloaded = false
case else
label1.text = "啟動完成"
blloaded = true
end select
loop
me.close()
end sub
end class

執行時：

為什麼主窗體要加入timer，然後再timer中載入資料?大家可以嘗試把載入資料的**修改到form_load 中試一下。

由於.net平台下c#和vb.net很相似，本文也可以為c#愛好者提供參考。

學習更多vb.net知識，請參看vb.net 教程目錄

啟動時顯示以及關閉splash窗體

系統啟動時顯示Recovery Menu

Splash頁面跳轉時關閉全屏

關閉Centos啟動時的進度條顯示詳細資訊

啟動時顯示以及關閉splash窗體

系統啟動時顯示Recovery Menu

Splash頁面跳轉時關閉全屏

關閉Centos啟動時的進度條 顯示詳細資訊

相關推薦

關閉Centos啟動時的進度條顯示詳細資訊