Follow along with the video below to see how to install our site as a web app on your home screen.
Anmerkung: This feature currently requires accessing the site using the built-in Safari browser.
Sub test()
MsgBox("Button1 wurde gedrückt")
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
test()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
MsgBox("Button 2 wurde gedrückt, hier nach wird der Code aus Button1 ausgeführt!")
test()
End Sub
Private Sub Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click, Button2.Click
Select Case CType(sender,Button).Name
Case "Button1"
MessageBox.Show("Button1 wurde gedrückt")
Case "Button2"
MessageBox.Show("Button2 wurde gedrückt")
End Select
End Sub