[HELP] Vb.Net Icon Code.

[HmanDude]

Code:

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim ofd As New OpenFileDialog
        ofd.Filter = "Exe Files|*.exe"
        ofd.ShowDialog()
        TextBox1.Text = String.Empty
        TextBox1.Text = ofd.FileName
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim ofd As New OpenFileDialog
        ofd.Filter = "ico Files|*.ico"
        ofd.ShowDialog()
        TextBox2.Text = String.Empty
        TextBox2.Text = ofd.FileName
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        If TextBox1.Text = "" Then
            MsgBox("Choose your .exe", 49, "Error")
        End If
        If TextBox2.Text = "" Then
            MsgBox("Choose your icon", 49, "Error")
        End If



        MsgBox("Icon Changed Successfully!")

    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        MsgBox("HmanDude")
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.Refresh()
        Threading.Thread.Sleep(100)
        Dim Location As String = "dissembler LIB.dll"
        My.Computer.FileSystem.WriteAllBytes(Location, My.Resources.dissembler_LIB, False)
    End Sub
End Class

This is my code. Currently, I want to fit something inbetween


"End If"

and

MsgBox("Icon Changed Successfully!")


Thanks.

[Digital-Punk]

what are you trying to inbetween this MsgBox("Icon Changed Successfully!")
i dont understand?

[HmanDude]

To make it that when they click the button, It changes the icon.

[Revenger]

Well that's pretty much like asking for the whole code to run your program.

I did some research, and it's not getting me anywhere. Try learning how to bind exe files or something of that nature. There has to be information on setting an icon.