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.
Anzahl as long
private sub command1_click()
form1.hide
End sub
Private sub form_keydown(shift as integer, keycode as integer)
Anzahl = Anzahl + 1
End Sub
'1.
'2.
'3.
Private Sub command1_click()
'4.
Form1.Hide
'5.
End Sub
'6.
'7.
Private Sub form_keydown(shift As Integer, keycode As Integer)
'8.
MsgBox ("servus")
'9.
End Sub