เพิ่มไฟล์ exe ใน vb แล้วรันไม่ได้

เพิ่มไฟล์ exe  ใน vb แล้วรันไม่ได้ครับ ใครมีวิธีบ้างครับ
เช่นกด button1 แล้วเปิดexeมาเลย โดยฝัง exe ไว้ใน resoure เพราะไม่อยากให้ user รู้ว่าฝังอะไรไว้ครับ

------------
อัพเดท ทำได้แล้ว

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim dir As String = My.Computer.FileSystem.SpecialDirectories.Temp
        Dim filename As String = dir + "ชื่อไฟล์.exe"
        IO.File.WriteAllBytes(filename, My.Resources.ชื่อไฟล์)
        Process.Start(filename)