溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

VB.NET多窗體實現(xiàn)封面場所的方法

發(fā)布時間:2021-06-17 17:00:07 來源:億速云 閱讀:182 作者:chen 欄目:編程語言

這篇文章主要介紹“VB.NET多窗體實現(xiàn)封面場所的方法”,在日常操作中,相信很多人在VB.NET多窗體實現(xiàn)封面場所的方法問題上存在疑惑,小編查閱了各式資料,整理出簡單好用的操作方法,希望對大家解答”VB.NET多窗體實現(xiàn)封面場所的方法”的疑惑有所幫助!接下來,請跟著小編一起來學習吧!

對于VB.NET這門開發(fā)語言我十分的喜歡,因為幾句代碼就可以實現(xiàn)一個功能,運用起來簡單靈活,這里就給大家介紹一個關于VB.NET多窗體編程方法制作單獨程序封面。這里所謂的單獨封面,是只獨立應用程序窗口本身的一個窗口,這個窗口在程序運行時首先彈出屏幕,用于裝飾程序本身,或簡單的演示一下程序的優(yōu)越性。這樣的封面在很多專業(yè)的WINDOWS程序中均存在,在VB中可有兩種簡單的方法實現(xiàn)這一功能。此方法是通常采用的方法,即在程序中創(chuàng)建兩個或兩個以上的Form窗體,把其中的一個作為專門的程序封面制作場所,VB.NET多窗體具體方法:

1、創(chuàng)建一個新項目Form1,并在此窗體內安放Command1命令按鈕,在Command1-Click()事件中輸入結束程序代碼“END”。

2、單擊菜單的“Insert"項目,加入一個新窗體Form1。

3、雙擊Form1窗體空白處,在Form1-Load()事件中輸入如下代碼,用于隱藏主窗體Form1,置第二窗體為***模式,并在運行程序首先顯示和二窗體:

Private Sub Form-Load () ’隱藏主窗口  Form1.Visible = 0 ’窗口2***模式  Form2.WindowState =2 ’顯示窗口2  Form2.Show  End Sub

4、 在窗體Form2中定義全程變量:

Dim strr1 As String  Dim i As Integer

5、在窗體Form2中放入一個時間控件Timer1。

6、在窗體Form2中的Form-Load ()事件中輸入以下代碼,用于在窗體2中顯示圖像,并置時間控件頻率:

Private Sub Form-Load ()  Form2.Picture = LoadPicture("c:\windows\setup.bmp")  Timer1.Interval = 10 i =0 End Sub

7、在時間控件Timer1- Timer1()事件中進行程序封面的制作工作,演示簡單的動畫,并控制此動畫運行一段時間后自動停止,關閉程序封面,返回程序主窗口;下面的代碼實現(xiàn)在一個圖片上隨機顯示字符串,顯示30次字符串后自動退出。

Private Sub Timer1-Timer ()  Strr1 = "程序封面演示“  With Form2  .Font.Transparent =True ’透明顯示字符  .Font.Size = Rnd *30+10 ’隨機變化字號  .Font.Italic =True ’斜體有效  .ForeColor=RGB(Rnd*256,Rnd*256,Rnd*256) ’隨機變化前景  .FontName =Screen.Fonts (Rnd*7+14) ’隨機變化字體  End With  hh=Form2.TextHehght (strr1) ’取字符串高度  ww= Form2.TextWidth (strr1) ’取字符串寬度  x=Rnd * ( Form2.ScaleWidth-ww) ’隨機改變坐標  y=Rnd *( Form2.ScaleHeight-hh)  Form2.Current X=x Form2.Current Y=y Form2.Print strr1 ’顯示字符  ii = i +1 ’計數(shù)  If i >30 Then  Unload Me ’關閉封面  Form1.Show ’調入主窗口  Timer1.Enabled =False ’關閉時間控件  End If  End Sub

8、為了能夠人為地控制程序封面的停留時間,可在窗體Form2鼠標單擊事件中安放退出封面代碼:

Private Sub Form-Click ()  Unload Me  Form1.Show  Timer1.Enabled =False ’關閉時間控件  End If  End Sub

至此工作全部完成,當運行程序時,首先彈出程序封面,封面上顯示一幅·BMP圖像,之后在此圖像上進行隨機字符串的顯示,字符串的位置、字體、字號、前景色等值都是隨機變化的,顯示30次后自動關閉封面返回主窗口,演示過程中用鼠標單擊窗口也會返回主窗口,在主窗口中按下結束按鈕退出程序。具體操作時還有很多其它技巧,比如可以置第二個窗體為主窗體,這樣運行時可自動先彈出程序封面,可省略隱藏窗體和調入窗體的過程,另外第二窗體也可以在程序運行時由代碼動態(tài)生成,這樣編程時復雜一些,但有利于程序代碼的管理;程序封面的具體制作過程,有許多動態(tài)圖像控制方法可以使用,只要靈活動用VB.NET多窗體作圖方法,再加上一些必要的API函數(shù)的配合,會制作出理想的程序封面。

到此,關于“VB.NET多窗體實現(xiàn)封面場所的方法”的學習就結束了,希望能夠解決大家的疑惑。理論與實踐的搭配能更好的幫助大家學習,快去試試吧!若想繼續(xù)學習更多相關知識,請繼續(xù)關注億速云網(wǎng)站,小編會繼續(xù)努力為大家?guī)砀鄬嵱玫奈恼拢?/p>

向AI問一下細節(jié)

免責聲明:本站發(fā)布的內容(圖片、視頻和文字)以原創(chuàng)、轉載和分享為主,文章觀點不代表本網(wǎng)站立場,如果涉及侵權請聯(lián)系站長郵箱:is@yisu.com進行舉報,并提供相關證據(jù),一經(jīng)查實,將立刻刪除涉嫌侵權內容。

AI