Android Question Intent, image sharing to WhatsApp

[StephenRM]

    Dim i As Intent
    Dim u As Uri
    DoEvents
    i.Initialize(i.ACTION_SEND,"")
    u.Parse(File.Combine(File.DirDefaultExternal, "image.jpg"))
    Activity.Title=File.Combine(File.DirDefaultExternal, "image.jpg")
    i.SetType("image/*")
    i.PutExtra("android.intent.extra.STREAM",u)
    i.Flags = 1
    i.WrapAsIntentChooser("Select")
    StartActivity(i)

The image is available, saved. But I receive the message, "The File Format is not supported" from WhatsApp Business/ WhatsApp.

Can somebody help here. ?

 

[Erel]

Code with File.DirDefaultExternal = broken code.
Code with Activity = almost broken code.

Search for FileProvider.