VB.net 加載窗體 form2.show() 卸載窗體 me.close()加載窗體和VB沒啥區(qū)別,而卸載就截然不同了。附:VB 加載窗體 form2.show 卸載窗體 unload me
專業(yè)領(lǐng)域包括網(wǎng)站設(shè)計、網(wǎng)站制作、商城網(wǎng)站開發(fā)、微信營銷、系統(tǒng)平臺開發(fā), 與其他網(wǎng)站設(shè)計及系統(tǒng)開發(fā)公司不同,創(chuàng)新互聯(lián)建站的整合解決方案結(jié)合了幫做網(wǎng)絡(luò)品牌建設(shè)經(jīng)驗和互聯(lián)網(wǎng)整合營銷的理念,并將策略和執(zhí)行緊密結(jié)合,為客戶提供全網(wǎng)互聯(lián)網(wǎng)整合方案。
網(wǎng)絡(luò)原因。通過查詢vb官網(wǎng)了解顯示得知,vb.net正在加載圖標(biāo)是網(wǎng)絡(luò)原因?qū)е碌?,VB.NET是一種簡單,現(xiàn)代,,它由微軟開發(fā),將NET Framework和公共語言運行庫的強大功能相結(jié)合。
把啟動窗體先顯示出來,然后,過一段時間再把這個窗體隱藏起來就行了。在其他窗體中加一句form1.visible=false
然后啟動窗體把標(biāo)題欄什么的設(shè)置一下,做個圖片背景什么的,就行了。
新建一個Sub : Main
Private Sub Main()
xxx.show 'xxx指啟動窗體
'載入圖片、數(shù)據(jù)庫之類的
Unload xxx
{from}.show '{from}指主界面
End Sub
然后在工程-屬性將"Main"作為啟動對象
Dim i As Integer
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
i = i + 1
If i 3 Then Timer1.Enabled = False : Exit Sub
PictureBox1.ImageLocation = "z:\" i ".png"
End Sub
'先建立一個bitmap對象,指向圖像文件
Dim pic As Bitmap = New Bitmap("e:\1.jpg")
'定義一個圖片框的graphics對象
Dim g As Graphics = PictureBox1.CreateGraphics()
'在圖片框上繪圖
g.DrawImage(pic, 0, 0, pic.Width, pic.Height)
'釋放bitmap對象
pic.Dispose()
'現(xiàn)在即可對文件進行操作
當(dāng)前題目:vbnet程序加載畫面 vbnet計算器程序
標(biāo)題URL:http://muchs.cn/article4/hjshie.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供手機網(wǎng)站建設(shè)、品牌網(wǎng)站設(shè)計、網(wǎng)頁設(shè)計公司、品牌網(wǎng)站制作、電子商務(wù)、移動網(wǎng)站建設(shè)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)