VB.net 如何快速加載顯示較大圖片

1,不要將這些代碼放在Form.Load事件里,最好放在構(gòu)造函數(shù)中!

目前創(chuàng)新互聯(lián)公司已為上千余家的企業(yè)提供了網(wǎng)站建設(shè)、域名、虛擬主機、綿陽服務(wù)器托管、企業(yè)網(wǎng)站設(shè)計、績溪網(wǎng)站維護等服務(wù)，公司將堅持客戶導(dǎo)向、應(yīng)用為本的策略，正道將秉承"和諧、參與、激情"的文化，與客戶和合作伙伴齊心協(xié)力一起成長，共同發(fā)展。

2,加上:

me.SuspendLayout()'如果按鈕在其它容器中(如GroupBox):me.grp.SuspendLayout();

'...Loading Images

me.ResumeLayout();

圖形繪制最快的是Panel控件，用Panel速度蠻快

VB.NET加載圖片問題

'先建立一個bitmap對象，指向圖像文件

Dim pic As Bitmap = New Bitmap("e:\1.jpg")

'定義一個圖片框的graphics對象

Dim g As Graphics = PictureBox1.CreateGraphics()

'在圖片框上繪圖

g.DrawImage(pic, 0, 0, pic.Width, pic.Height)

'釋放bitmap對象

pic.Dispose()

'現(xiàn)在即可對文件進行操作

如何在VB.Net里預(yù)加載圖片，音樂？ 用picturebox和mediaplayer控件加載圖片

先用image對象在后臺加載。完了后賦給picturebox.image. 音樂文件類似用filestream

VB.net加載圖片某一位置

你要確定每個狀態(tài)的大小是一樣的才可以：

Public Bitmap CutImage(ByVal start As Point, ByVal end As Point, ByVal b As Bitmap)

Dim f As New Bitmap(end.X - start.X + 1, end.Y - start.Y + 1)

For i As Integer = start.X To end.X + 1

For j As Integer = start.Y To end.Y + 1

Dim c As Color = b.GetPixel(i, j)

f.SetPixel(i - start.X, j - start.Y, c)

Next

Next

Return f

End Sub

這個函數(shù)就可以用于裁剪圖像，返回裁剪后的圖像，start是開始裁剪的位置，end是結(jié)束裁剪的位置，b是要裁剪的圖像，假如你的這些按鈕每個寬30，高20，你就可以用

PictureBox1.Image = CutImage(New Point(第n - 1個按鈕 * 30, 0), New Point(第n個按鈕 * 30, 20), 按鈕存在的位圖)