Folge dem Video um zu sehen, wie unsere Website als Web-App auf dem Startbildschirm installiert werden kann.
Anmerkung: Diese Funktion ist in einigen Browsern möglicherweise nicht verfügbar.
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)