VB.NET erreur SendGrid "transportWeb" n'est pas déclaré

Question

SendGrid v6.3.4.0
VB 2017 Pro
sur Windows 10 64b Pro

Je veux ajouter SendGrid mail à mon application Windows VB.
J'ai installé NuGet SendGrid pour projeter (Ajouter référence, etc.) sans problème. Mais je reçois une erreur de construction (voir l'emplacement dans Sub send_by_SendGrid ci-dessous): "transportWeb" n'est pas déclaré.

Tout cela fonctionne sur mon autre ordinateur.

Imports SendGrid 

...

Sub send_by_SendGrid(ByVal Addr, ByVal Subject, ByVal Message, ByVal From_Address) 

    ' Prevent email problem with Verizon: 
    addr=replace(addr,"vzwpix","vtext",) 

    if subject = "" then 
     subject = " " 
     'Message = "" 
    End If 

    ' Create the email object first, then add the properties. 
    Dim myMessage As SendGridMessage 
    myMessage = New SendGridMessage() 

    ' Add the message properties. 
    myMessage.AddTo(Addr) 
    myMessage.From = New MailAddress(From_Address) 


    if Subject <> "" then 
     myMessage.Subject = Subject 
    end if 

    ' Add plain text body only: 
    myMessage.Text = Message 

    Dim username As String 
    Dim pswd As String 
    username = "MYUSERNAME@azure.com" 
    pswd = "MY_PW" 



    Dim credentials As NetworkCredential 

    credentials = New NetworkCredential(username, pswd) 
    ' // Create an Web transport for sending email. 
    transportWeb = New Web(credentials) <<<<<<<<<<<<<<< 'transportWeb' is not declared 

    transportWeb.DeliverAsync(myMessage) <<<<<<<<<<<<<<<<<< 'transportWeb' is not declared 
End Sub 

Answer 1

Change:

transportWeb = New Web(credentials) 

à

Dim transportWeb As New Web(credentials)