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 txtName_GotFocus(Index As Integer)
txtName(Index).SelStart = 0
txtName(Index).SelLength = Len(txtName(Index).text)
End Sub