How to pass JSON in Body of Http request in Visual Basic

I want to pass JSON in body of the POST request in VBA. What is the keyword to append data in Body of the below request?

Dim reqObject as Object
With Object
    .open "POST", URL, True
    .setRequestHeader "Authorization", "basic xyz"
    . Send
End With