Schon mal danke. Aber das gibt leider nicht das gewünschtre ergebniss.
Wenn ich dein ersten FVorschlag nehme
Function Get_Path() As String
Dim Directory As String = My.Application.Info.Dire ctoryPath
Dim Dateiname As String = "test.exe"
Dim result As String = Directory & "\" & Dateiname
Return result
End Function
Dan sagt mir vb, dass Get_Path eine end_of anweisung braucht.
und dann kennt er Directory nicht. Ich muss wohl Directore zuordnen. Aber ich habe es dann nur halbherzig versucht, da ich eine leichtere Lösung gefunden hab.
Dann habe ich mal noch in meinen Schulordner Das gefunden:
Dim winPath As String
Private Sub GameCalvin_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GameCalvin.Click
Shell("""" & winPath & "spiel gut.exe" & """")
End Sub
End Class
Und es hat geklappt. Danke für die Hilfe.
Alles gut, Pogramm gut.