VB. Net Проблемы с подключением Xero API

Question

Я пытаюсь ознакомиться с В.Б.

Хотя руководство использует Xero в течение периода OAuth 1. Теперь он использует OAuth 2.

Я написал простую программу, которая должна принимать «Ключ потребителя», даже если я дал ему «Ключ клиента». Я не уверен, что это одно и то же, но это единственный ключ, который я, похоже, получаю от панели управления Xero для своего приложения.

Код, который я написал, выглядит следующим образом:

Imports DevDefined.OAuth.Consumer
Imports XeroApi.OAuth
Imports XeroApi
Imports System.Security.Cryptography.X509Certificates

Public Class Form1
    Dim xSession As XeroApi.OAuth.XeroApiPrivateSession
    Dim repository As XeroApi.Repository

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        xSession = New XeroApi.OAuth.XeroApiPrivateSession("MyAPITestSoftware", "E81B45AC4FD4532ER6007A57F5D6A", New X509Certificate2("C:\Program Files\OpenSSL-Win64\bin\public_privatekey.pfx"))
        repository = New XeroApi.Repository(xSession)
    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim myContacts = From contacts In repository.Contacts
                         Where contacts.ContactID = New System.Guid("c82900a5-064c-46e1-9d8b-86404c6bfd01")

        If myContacts.Count <> 0 Then
            For Each myContact As XeroApi.Model.Contact In myContacts
                MsgBox(myContact.ContactID.ToString & " " & myContact.Name)
            Next
        Else
            MsgBox("Contact not found")
        End If
    End Sub
End Class

Когда я запускаю приложение и нажимаю кнопку отправки, я получаю следующую ошибку:

DevDefined.OAuth.Framework.OAuthException: 'Consumer key was not recognised'

Есть ли что-то, что я явно делаю неправильно? Заранее благодарю за поддержку.