Skip Error

You can do like this:

B4X:
Expand Collapse Copy
Sub Activity_Create(FirstTime As Boolean)
   Try
      Dim i,j
      j=i/0 'this will raise division by zero error
   Catch
      'put the statements here that will fix the error
      'if you can't fix it, simply leave this area blank
      'that is equivalent to On Error Resume Next in VB
   End Try
End Sub
 
Upvote 0
Back
Top