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()
On Error GoTo Fehler
CommonDialog1.CancelError = True
CommonDialog1.ShowOpen
' Dein Verarbeitungscode
Exit Sub
Fehler:
If Err.Number <> 32755 Then MsgBox Err.Description
Exit Sub
End Sub