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.
Public Sub BtnSave_Click(ByVal sender As Object, ByVal e As EventArgs) _
Handles BtnSave.Click
Dim sf As New SaveFileDialog
sf.Filter = "XML Dateien (*.xml)|*.xml"
If (sf.DialogResult = DialogResult.Ok) Then
'Hier kommt der SaveDialog zum Einsatz
ds.WriteXml(sf.Filename)
End If
End Sub