[أسامة]

(30-06-16, 02:32 AM)Deya R Ataya كتب : مع أن هذا الكود صحيح 100 % ولكن يعطيني أنه في مشكلة
مع انه يوجد مثل هذا الاداة في فورم اخر ولا يعطي مشكلة ؟؟

جرب استخدام هذه الطريقة

كود :

     Dim OpenFileDialog1 As New OpenFileDialog
       Try
           OpenFileDialog1.FileName = String.Empty
           OpenFileDialog1.Filter = "Image File (*.jpg;*bmp;*.gif;*.png;*.jpeg;)|*.jpg;*bmp;*.gif;*.png;*.jpeg;"
           OpenFileDialog1.ShowDialog()
           If Not OpenFileDialog1.FileName = String.Empty Then
               PictureBox1.Image = Image.FromFile(OpenFileDialog1.FileName)
           End If


       Catch ex As Exception

       End Try