VB.NET Label旋轉(zhuǎn)及淡入

VB.net可以做，，繪制的不是圖片，還是控件，這就有點(diǎn)難了。

讓客戶滿意是我們工作的目標(biāo)，不斷超越客戶的期望值來(lái)自于我們對(duì)這個(gè)行業(yè)的熱愛(ài)。我們立志把好的技術(shù)通過(guò)有效、簡(jiǎn)單的方式提供給客戶，將通過(guò)不懈努力成為客戶在信息化領(lǐng)域值得信任、有價(jià)值的長(zhǎng)期合作伙伴，公司提供的服務(wù)項(xiàng)目有：域名申請(qǐng)、網(wǎng)絡(luò)空間、營(yíng)銷軟件、網(wǎng)站建設(shè)、內(nèi)蒙古網(wǎng)站維護(hù)、網(wǎng)站推廣。

建議你還是先把文字畫到一張圖片上，然后再對(duì)圖片旋轉(zhuǎn)，淡入淡出都好做。

我可以幫你，但暫時(shí)沒(méi)有時(shí)間。如果你會(huì)vb，那么你自己看Help Library學(xué)下其中的函數(shù)怎么用就行了。

VB.net 旋轉(zhuǎn)圖像時(shí)，如何指定填充色

繪制線條采用Draw開(kāi)頭的方法，顏色參數(shù)用Pen類；

繪制有填充色的封閉圖形采用Fill開(kāi)頭的方法，顏色參數(shù)用Brush類；

例如：

'繪制一個(gè)實(shí)心圓，該圓在：直線x=200，y=200，x=200+100，y=200+100所劃矩形區(qū)域內(nèi)

Me.CreateGraphics.FillEllipse(New SolidBrush(Color.Orange), 200, 200, 100, 100)

'繪制一個(gè)空心圓，該圓在：直線x=200，y=200，x=200+100，y=200+100所劃矩形區(qū)域內(nèi)

Me.CreateGraphics.DrawEllipse(New Pen(Color.Black), 200, 200, 100, 100)

vb中，怎么可以把一張圖片旋轉(zhuǎn)起來(lái)

這個(gè)問(wèn)題不是小問(wèn)題。如果只是90度轉(zhuǎn)，vb.net的picture控件有RotateFlip方法。

任意角度，可以參考這個(gè)

;cs-lang=csharp

圖片的變換涉及坐標(biāo)處理，要自己算。

還有可以用Windows Presentation Foundation (WPF) 編程，里面的image控件好像也能旋轉(zhuǎn)圖片。

如果是VB6，恐怕只能用API函數(shù)了，百度一下“vb 旋轉(zhuǎn)圖片” “VB api函數(shù)”了解一下

用vb.net如何編寫圖片瀏覽器的基本步驟功能是：圖片的打開(kāi)、顯示、縮放、旋轉(zhuǎn)。

窗體上放一個(gè)PictureBox，兩個(gè)CommandButton，一個(gè)FileListBox

Private Sub Command1_Click()

If File1.ListIndex = 0 Then

ShowPic File1.ListCount - 1

Else

ShowPic File1.ListIndex - 1

End If

End Sub

Private Sub Command2_Click()

If File1.ListIndex = File1.ListCount - 1 Then

ShowPic 0

Else

ShowPic File1.ListIndex + 1

End If

End Sub

Private Sub Form_Load()

File1.Visible = False

File1.Pattern = "*.jpg;*.gif" '可以瀏覽的文件類型，使用分號(hào)隔開(kāi)

File1.Path = App.Path '改成你需要瀏覽的目錄，比如"C:\Pic"

If File1.ListCount 1 Then '目錄中圖片在兩張以上可以瀏覽

ShowPic 0

Exit Sub

ElseIf File1.ListCount = 1 Then '目錄中只有一張圖片時(shí)只顯示這一張

ShowPic 0

End If

Command1.Enabled = False

Command2.Enabled = False

End Sub

Private Sub ShowPic(Index As Long)

File1.ListIndex = Index

Picture1.Picture = LoadPicture(File1.Path "\" File1.List(Index))

End Sub

如果對(duì)您有幫助，請(qǐng)記得采納為滿意答案，謝謝！祝您生活愉快！

vaela

VB 如何一個(gè)正方形picturebox中的圖片旋轉(zhuǎn)，要求不改變picturebox的名稱，只是針對(duì)圖片，求大神指教

Private Sub Command1_Click() '正常貼圖

Picture1.PaintPicture Picture2.Picture, 0, 0, Picture1.Width, Picture1.Height

End Sub

Private Sub Command2_Click() '上下加水平翻轉(zhuǎn)

Picture1.PaintPicture Picture2.Picture, Picture1.Width, Picture1.Height, 0 - Picture1.Width, 0 - Picture1.Height

End Sub

Private Sub Command3_Click() '水平翻轉(zhuǎn)

Picture1.PaintPicture Picture2.Picture, Picture1.Width, 0, 0 - Picture1.Width, Picture1.Height

End Sub

Private Sub Command4_Click() '上下翻轉(zhuǎn)

Picture1.PaintPicture Picture2.Picture, 0, Picture1.Height, Picture1.Width, 0 - Picture1.Height

End Sub

我只有這樣的，不知道可適合你。