Dim i As Intent
i.Initialize("android.media.action.IMAGE_CAPTURE", "")
Dim uri As Uri
i.PutExtra("crop", "true")
i.PutExtra("aspectX", 0)
i.PutExtra("aspectY", 0)
i.PutExtra("outputX", 100)
i.PutExtra("outputY", 100)
uri.Parse("file://" & File.Combine(imageFolder, tempImageFile))
i.PutExtra("output", uri)
Try
StartActivityForResult(i)