'result arrives here
Sub ion_Event (MethodName As String, Args() As Object) As Object
If Args(0) = -1 Then
Try
Dim in As Intent = Args(1)
Log("args1:" & Args(1)) <-------is null??
If File.Exists(imageFolder, tempImagefile) Then
lastPicture = LoadBitmapSample(imageFolder, tempImagefile, imageView1.Width, imageView1.Height)
savePic
imageView1.Bitmap = lastPicture
myNote.setNote("")
Else If in.HasExtra("data") Then 'try to get thumbnail instead
Dim jo As JavaObject = in
lastPicture = jo.RunMethodJO("getExtras", Null).RunMethod("get", Array("data"))
End If
Catch
Log(LastException)
End Try
End If
If lastPicture.IsInitialized Then imageView1.Bitmap = lastPicture
Return Null
End Sub