建站
咨詢
售后
建站咨詢
新聞中心
在學(xué)校就是學(xué)軟件開(kāi)發(fā)的很自然的對(duì)于編程方面的語(yǔ)言都稍微的略之一二，對(duì)于VB.NET這門(mén)語(yǔ)言這種易學(xué)、易懂、界面友好漂亮的語(yǔ)言打上了交道。在編寫(xiě)的過(guò)程中當(dāng)然遇到了許多的問(wèn)題，這里將一些簡(jiǎn)單的小程序?qū)懴聛?lái)與喜愛(ài)編程的朋友們分享。
創(chuàng)新互聯(lián)是一家專注于網(wǎng)站建設(shè)、網(wǎng)站設(shè)計(jì)與策劃設(shè)計(jì),黑龍江網(wǎng)站建設(shè)哪家好?創(chuàng)新互聯(lián)做網(wǎng)站,專注于網(wǎng)站建設(shè)十年,網(wǎng)設(shè)計(jì)領(lǐng)域的專業(yè)建站公司;建站業(yè)務(wù)涵蓋:黑龍江等地區(qū)。黑龍江做網(wǎng)站價(jià)格咨詢:13518219792
#T#VB.NET封面的設(shè)計(jì)是這樣的，先出現(xiàn)一窗體，上面為你喜歡的圖案。然后出現(xiàn)一艘從左向右行駛著的船。屏幕上方從兩側(cè)分別移動(dòng)出“歡迎”兩個(gè)字。具體的制作方法是：把預(yù)先選好的背景圖案裝入封面窗體中，窗體命名為CAI。再分別在三個(gè)圖像控件(image)中裝入預(yù)先制作好的位圖“歡”、“迎”和船型圖案。然后把三個(gè)image放置在初始位置(即 圖案剛在窗體出現(xiàn)時(shí)的位置)，并把它們的可視屬性都設(shè)置為“false”。VB.NET封面程序如下：
- Sub Form_load()
- cai.Show ′顯示封面窗體
- Dim i ′定義變量
- image3.visible=True ′船型圖像控件出現(xiàn)
- a1: If image3.Left < 6120 Then
- ′6120為船移動(dòng)到屏幕右邊的坐標(biāo),此值可以隨需要選取
- image3.Move image3.Left＋50
- ′移動(dòng)此圖像控件如嫌移動(dòng)慢,可改變移動(dòng)值
- Goto a1
- End If
- image1.visible=True ′“歡”字出現(xiàn)
- a2: If image1.Left < 2120 Then
- ′2120為“歡”字移動(dòng)到屏幕中間的位置
- image1.Move image1.Left＋50 ′移動(dòng)此圖像控件
- Goto a2
- End If
- image2.visible=True ′“迎”字出現(xiàn)
- a3: If image2.Left > 5420 Then
- ′5420為“迎”字移動(dòng)到屏幕中間的位置
- image2.Move image2.Left－50 ′移動(dòng)此圖像控件
- Goto a3
- End If
- For i=1 To 10000
- ′使窗體暫停一段時(shí)間時(shí)間長(zhǎng)短可通過(guò)改變循環(huán)次數(shù)實(shí)現(xiàn)
- Next i
- menul.Show ′顯示程序主窗體
- Unload cai ′卸載封面窗體
- End Sub
以上就是一個(gè)關(guān)于VB.NET封面實(shí)現(xiàn)的程序，大家可以在機(jī)器上跑跑。
標(biāo)題名稱：教你如何制作VB.NET封面
文章源于：http://www.dlmjj.cn/article/ccidocp.html
