Dim strFileName As String

 strFileName = OpenFileDialog1.FileName

Dim fs As System.IO.FileStream

            fs = New System.IO.FileStream(strFileName, IO.FileMode.Open, IO.FileAccess.Read)
           Dim myImage as image

            myImage = System.Drawing.Image.FromStream(fs)
            fs.Close()
            Me.Refresh()