Dim rp As RuntimePermissions
rp.CheckAndRequest(rp.PERMISSION_WRITE_EXTERNAL_STORAGE)
Wait For Activity_PermissionResult (Permission As String, Result As Boolean)
If Result Then
Log(File.Exists(File.DirrootExternal , "1.jpg"))
ImageView1.Bitmap=LoadBitmap(File.DirrootExternal, "1.jpg")
Else
'no permission
End If