ausführen von VB-Art exe-Datei aus VB.NET aus Projekt

ich bereits getestet, und es laufen in meinem lokalen pc.
Stellen Sie sicher, richtigen Pfad für die exe-Datei.

Process.Start("FolderPath\MyProgram.exe")

bitte überprüfen Sie diese Website, um download-code-Beispiel für diese.
Beispiel-Code

Ist nicht klar für mich, was Sie wirklich brauchen, wenn Sie ausführen, eine Ressource oder führen Sie eine vorhandene ausführbare Datei.

Zum starten einer exe-Datei, die in Ihre Ressourcen, die Sie können laden Sie es auf der Festplatte wie diese:

' Load Resource To Disk
' ( By Elektro )
'
' Usage Examples:
' LoadResourceToDisk(My.Resources.Program, "C:\Program.exe")
' Process.Start("C:\Program.exe")
'
''' <summary>
''' Loads a resource to disk.
''' </summary>
''' <param name="Resource">
''' Indicates the resource to load.
''' </param>
''' <param name="TargetFile">
''' Indicates the target file to save the resource.
''' The target file is overwritten.
''' </param>
''' <returns>
''' <c>true</c> if operation succeeds, <c>false</c> otherwise.
''' </returns>
''' <exception cref="Exception"></exception>
Private Function LoadResourceToDisk(ByVal Resource As Byte(),
                                    ByVal TargetFile As String) As Boolean

    Try
        Dim BufferFileStream As New IO.FileStream(TargetFile, IO.FileMode.Create, IO.FileAccess.Write)
        BufferFileStream.Write(Resource, 0, Resource.Length)
        BufferFileStream.Close()
        Return True

    Catch ex As Exception
        Throw New Exception(ex.Message, ex.InnerException)
        Return False

    End Try

End Function

Verwendung:

  LoadResourceToDisk(My.Resources.Program, "C:\Program.exe")
  Process.Start("C:\Program.exe")

Und starten Sie eine vorhandene Datei, die Sie tun können:

Private Sub Test() Handles Button1.Click

    Dim ExePath As String =
    IO.Path.Combine(My.Computer.FileSystem.SpecialDirectories.Desktop, "Screen.exe")

    Dim Result As Integer

    Using p As New Process()

        With p.StartInfo
            .FileName = ExePath
            .Arguments = ""
        End With

        p.Start()
        p.WaitForExit()

        Result = p.ExitCode

    End Using

    MsgBox(String.Format("ExitCode: {0}", Result))

End Sub