codice:
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim a As System.Drawing.Image
        a.FromFile(Application.StartupPath + "\icona.ico")
        PictureBox1.Image = a
    End Sub
non capisco perché non nel picturebox non si vede l'immagine