B4X:
Sub PlayBeep
Dim NativeMe As NativeObject = Me
NativeMe.RunMethod("beep", Null)
End Sub
#If ObjC
#import <AVFoundation/AVAudioPlayer.h>
- (void) beep {
AudioServicesPlaySystemSound(1302);
}
#End If
You can change the value of 1302 above to other sound ID.
List of SystemSoundIDs
https://github.com/TUNER88/iOSSystemSoundsLibrary