91超碰碰碰碰久久久久久综合_超碰av人澡人澡人澡人澡人掠_国产黄大片在线观看画质优化_txt小说免费全本

溫馨提示×

溫馨提示×

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

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

VB.NET多窗體實現封面場所的方法

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

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

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

1、創建一個新項目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()事件中進行程序封面的制作工作,演示簡單的動畫,并控制此動畫運行一段時間后自動停止,關閉程序封面,返回程序主窗口;下面的代碼實現在一個圖片上隨機顯示字符串,顯示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 ’計數  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次后自動關閉封面返回主窗口,演示過程中用鼠標單擊窗口也會返回主窗口,在主窗口中按下結束按鈕退出程序。具體操作時還有很多其它技巧,比如可以置第二個窗體為主窗體,這樣運行時可自動先彈出程序封面,可省略隱藏窗體和調入窗體的過程,另外第二窗體也可以在程序運行時由代碼動態生成,這樣編程時復雜一些,但有利于程序代碼的管理;程序封面的具體制作過程,有許多動態圖像控制方法可以使用,只要靈活動用VB.NET多窗體作圖方法,再加上一些必要的API函數的配合,會制作出理想的程序封面。

到此,關于“VB.NET多窗體實現封面場所的方法”的學習就結束了,希望能夠解決大家的疑惑。理論與實踐的搭配能更好的幫助大家學習,快去試試吧!若想繼續學習更多相關知識,請繼續關注億速云網站,小編會繼續努力為大家帶來更多實用的文章!

向AI問一下細節

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

AI

咸宁市| 库尔勒市| 会同县| 长宁区| 临漳县| 香格里拉县| 河间市| 许昌县| 桑日县| 龙江县| 利津县| 新建县| 仁化县| 高州市| 和硕县| 台湾省| 镇安县| 时尚| 奉贤区| 抚远县| 邹平县| 上杭县| 莆田市| 额尔古纳市| 大宁县| 马关县| 梁山县| 繁峙县| 大渡口区| 孝感市| 溧水县| 汶川县| 兴城市| 榆中县| 中江县| 太和县| 古蔺县| 花莲市| 金华市| 平度市| 湘乡市|