Вы можете взять access_token из ответа, десериализовав ответ:
Добавьте ссылку на System.Web.Extensions
и добавьте Imports System.Web.Script.Serialization
в начало вашего файла.Затем следующий код получит access_token:
Dim j As Object = New JavaScriptSerializer().Deserialize(Of Object)(response)
Dim accessToken = j("access_token")
Затем вы можете использовать токен при вызове API, добавив заголовок Authorization
со значением Bearer <token>
.