Sub Beep
Dim jo As JavaObject
jo.InitializeStatic("java.awt.Toolkit")
Dim toolkit As JavaObject = jo.RunMethod("getDefaultToolkit", Null)
toolkit.RunMethod("beep", Null)
End Sub
Private Sub Button1_Click
Beep
End Sub
Sub Beep
Dim jo As JavaObject = Me
jo.RunMethod("beep", Null)
End Sub
#if Java
public static void beep() {
java.awt.Toolkit.getDefaultToolkit().beep();
}
#End If
Sub Beep
Dim jo As JavaObject
jo.InitializeStatic("java.awt.Toolkit")
Dim toolkit As JavaObject = jo.RunMethod("getDefaultToolkit", Null)
toolkit.RunMethod("beep", Null)
End Sub
Hello to you all, I decided to recreate this simple but effective game example, the game is based on the B4XPages library. The game is designed for hand, eye and memory coordination, so I called it 'Erel Says' ;) I've tried to make the code as simple as possible to follow for new to B4X...