Nierozpoznawalny import ?

[kamiljabłko]

W tym kodzie visual nie rozpoznaje importu "Imports fLaSh.Dissembler"

Bez tego nie działają "IconFile" i "GroupIconResource" (w button3)

Dlaczego?

Imports System.IO
Imports fLaSh.Dissembler
Public Class Form1
    Private Sub Form_Unload(ByVal Cancel As Integer)
        Dim deletefile As String
        deletefile = "dissembler LIB.dll"
        If System.IO.File.Exists(deletefile) = True Then
            System.IO.File.Delete(deletefile)
        End If
    End Sub


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Quote:  OpenFileDialog1.DefaultExt = "exe"
        OpenFileDialog1.Filter = "exe files (*.exe)|*.exe"
        OpenFileDialog1.FilterIndex = 1
        If OpenFileDialog1.ShowDialog(Me) = DialogResult.OK Then
            TextBox1.Text = String.Empty
            TextBox1.Text = OpenFileDialog1.FileName
            PictureBox2.BackgroundImage = Image.FromFile(TextBox1.Text)
        End If
    End Sub
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        OpenFileDialog1.DefaultExt = "ico"
        OpenFileDialog1.Filter = "icon files (*.ico)|*.ico"
        OpenFileDialog1.FilterIndex = 1
        If OpenFileDialog1.ShowDialog(Me) = DialogResult.OK Then
            TextBox2.Text = String.Empty
            TextBox2.Text = OpenFileDialog1.FileName
            PictureBox1.BackgroundImage = System.Drawing.Image.FromFile(OpenFileDialog1.FileName)
        End If
    End Sub
    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        If TextBox1.Text = "" Then
            MsgBox("Please Pick A File/Executable", MsgBoxStyle.Critical, "Error Changing The Icon")
        End If
        If TextBox2.Text = "" Then
            MsgBox("Please Pick A Icon Format File", MsgBoxStyle.Critical, "Error Changing The Icon")
        End If
        If TextBox1.Text = "" Then Exit Sub
        If TextBox2.Text = "" Then Exit Sub
        Dim oIconFilenathu As New IconFile(TextBox2.Text)
        Dim groupIconResource As GroupIconResource = oIconFilenathu.ConvertToGroupIconResource()
        groupIconResource.SaveTo(TextBox1.Text)
        MsgBox("Icon Changed Successfully!", MsgBoxStyle.Information, "Success")
    End Sub


    Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
        Me.Close()
    End Sub
End Class

[Crossiik]

Prawdopodobnie nie wgrałeś owej bibliotki. Poczytaj na googlach jak się to robi.vb

[kamiljabłko]

Za każdym razem kiedy wpisuje Dissembler google chce mi to poprawić a także nie ma żadnych dobrych wyników.

Jak to zrobić?

 

                                                    Happy New Year

[kamiljabłko]

W jaki sposób mam to wyszukać?

[Crossiik]

Project > Add Reference. Odrobinkę wysiłku kolego, proponuję przeczytać jakiś podstawowy poradnik najpierw dotyczący vb net

[kamiljabłko]

Dobra mam już to co chciałem.

Dzięki za wszystko