[أسامة]

الكود الاول كامل

كود :

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Try
            Dim i As Object
            Dim b As System.Reflection.Assembly = System.Reflection.Assembly.LoadFrom("C:\Users\osama\Desktop\WindowsApplication1\WindowsApplication1\bin\Debug\s.dll")
            i = b.CreateInstance("ClassLibrary1.Class1")
        Catch ex As Exception

        End Try
    End Sub

هذا الكود لى استراد ملف dll
الكود الثانى يحتاج الى تعديل

كود :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        PictureBox1.Image = s.dll.My.Resources.close_0
    End Sub

المشكله لن ينفع استغدم اسم الداله لان الكود الاول يسترد الداله من الخارج و ليس من Reference
فه يمكن ودع اسم الداله فى اداه ليتم تشغيل الكود حاولت اضعه فى ListBox اصبح الكود كالتالى PictureBox1.Image = ListBox1.SelectedItem.My.Resources.close_0 ولاكن يعتينى Error عند الضغط على الزر فهل من طريقه؟