ecco qui la funzione immagini

Public Function immagini(ByVal height As Integer, ByVal width As Integer)

Dim Bmp As New Bitmap(PictureBox1.Image, width, height)
PictureBox1.Image.Dispose()
PictureBox1.Image = Bmp

End Function


quando creo una funzione mi dà sempre quell'errore, credo che sia un errore di impostazione che faccio io...anche in questa idem:

Public Function immaginimenù(ByVal height As Integer, ByVal width As Integer, ByVal x As Integer, ByVal y As Integer)
Dim image As Image = System.Drawing.Image.FromFile(Application.StartupP ath & "\Immagine.bmp")
Dim image2 As Image = System.Drawing.Image.FromFile(OpenFileDialog1.File Name)
Dim NewBMP As New Bitmap(image2, image.Width, image.Height)
Dim iconafissa As New Bitmap(image2, width, height)
Dim D As Graphics = Graphics.FromImage(iconafissa)
Dim G As Graphics = Graphics.FromImage(NewBMP)
D.DrawImage(image2, 0, 0, width, height)
PictureBox3.Image = iconafissa
G.DrawImage(image, 0, 0)
G.DrawImage(PictureBox2.Image, x, y, width, height)
G.DrawImage(image2, x, y, width, height)
PictureBox1.Image = NewBMP
image2.Dispose()
image.Dispose()
G.Dispose()

End Function


Avviso 2 La funzione 'immaginimenù' non restituisce un valore in tutti i percorsi del codice. È possibile che venga restituita un'eccezione dovuta a un riferimento con valore null in fase di esecuzione quando viene utilizzato il risultato. C:\Documents and Settings\S\Documenti\Visual Studio 2005\Projects\my thm z560v\my thm z560v\Form1.vb 114 5 my thm z560v


che ne pensate?