Follow along with the video below to see how to install our site as a web app on your home screen.
Anmerkung: This feature currently requires accessing the site using the built-in Safari browser.
Private Sub Command1_Click()
Shell "cmd /&" & Text2.Text & Chr(32) & Text1.Text
End Sub
Private Sub Form_Load()
End Sub
Häääääh ?Wer mal selbst nen Code mit anderen Befehlen machen, ich poste ihn hier dann mal
Ebenfalls Häääääh ?Wie kann ich jetzt noch einen "Platzhalter" für das was nach "cmd/" steht erstellen (text2.text)
Private Sub Command1_Click()
If Text1.Text = "END" Then
End
End If
If Text1.Text = "Openfile" Then
Me.Hide
Form2.Show
End If
End Sub
Private Sub Command1_Click()
Shell "cmd /&" & Text2.Text & Chr(32) & Text1.Text
End Sub
Shell "cmd /&" & Text2.Text & " " & Chr(32) & Text1.Text & Chr(32)