您好,登錄后才能下訂單哦!
這篇文章主要講解了“制作VB.NET封面的方法”,文中的講解內容簡單清晰,易于學習與理解,下面請大家跟著小編的思路慢慢深入,一起來研究和學習“制作VB.NET封面的方法”吧!
在學校就是學軟件開發的很自然的對于編程方面的語言都稍微的略之一二,對于VB.NET這門語言這種易學、易懂、界面友好漂亮的語言打上了交道。在編寫的過程中當然遇到了許多的問題,這里將一些簡單的小程序寫下來與喜愛編程的朋友們分享。
VB.NET封面的設計是這樣的,先出現一窗體,上面為你喜歡的圖案。然后出現一艘從左向右行駛著的船。屏幕上方從兩側分別移動出“歡迎”兩個字。具體的制作方法是:把預先選好的背景圖案裝入封面窗體中,窗體命名為CAI。再分別在三個圖像控件(image)中裝入預先制作好的位圖“歡”、“迎”和船型圖案。然后把三個image放置在初始位置(即 圖案剛在窗體出現時的位置),并把它們的可視屬性都設置為“false”。VB.NET封面程序如下:
Sub Form_load() cai.Show ′顯示封面窗體 Dim i ′定義變量 image3.visible=True ′船型圖像控件出現 a1: If image3.Left < 6120 Then ′6120為船移動到屏幕右邊的坐標,此值可以隨需要選取 image3.Move image3.Left+50 ′移動此圖像控件如嫌移動慢,可改變移動值 Goto a1 End If image1.visible=True ′“歡”字出現 a2: If image1.Left < 2120 Then ′2120為“歡”字移動到屏幕中間的位置 image1.Move image1.Left+50 ′移動此圖像控件 Goto a2 End If image2.visible=True ′“迎”字出現 a3: If image2.Left > 5420 Then ′5420為“迎”字移動到屏幕中間的位置 image2.Move image2.Left-50 ′移動此圖像控件 Goto a3 End If For i=1 To 10000 ′使窗體暫停一段時間時間長短可通過改變循環次數實現 Next i menul.Show ′顯示程序主窗體 Unload cai ′卸載封面窗體 End Sub
以上就是一個關于VB.NET封面實現的程序,大家可以在機器上跑跑。
感謝各位的閱讀,以上就是“制作VB.NET封面的方法”的內容了,經過本文的學習后,相信大家對制作VB.NET封面的方法這一問題有了更深刻的體會,具體使用情況還需要大家實踐驗證。這里是億速云,小編將為大家推送更多相關知識點的文章,歡迎關注!
免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。