Dim i As Intent
i.Initialize("android.media.action.IMAGE_CAPTURE", "")
File.Delete(Starter.Provider.SharedFolder, tempImageFile)
Dim u As Object = Starter.Provider.GetFileUri(tempImageFile)
i.PutExtra("output", u) 'the image will be saved to this path