Translate Code Snippet from C# to VB

Question

I need to translate line 4 in the code snippet below into VB. For some reason I cannot get this done tonight. I am either too tired or having a brain drain... Can you help?

var provider = new NativeApplicationClient(GoogleAuthenticationServer.Description);
provider.ClientIdentifier = ClientCredentials.ClientID;
provider.ClientSecret = ClientCredentials.ClientSecret;
var auth = new OAuth2Authenticator<NativeApplicationClient>(provider, GetAuthentication);

Translation tools have gotten me this far, but it's not right.

Dim provider As NativeApplicationClient = New NativeApplicationClient(GoogleAuthenticationServer.Description)
provider.ClientIdentifier = ClientCredentials.ClientID
provider.ClientSecret = ClientCredentials.ClientSecret
Dim auth As OAuth2Authenticator(Of NativeApplicationClient) = New OAuth2Authenticator(Of NativeApplicationClient)(provider, GetAuthorization)

The GetAuthorization method has the following signature.

Private Function GetAuthorization(ByVal arg As NativeApplicationClient) As IAuthorizationState

Albin Sunnanbo · Accepted Answer · 2011-09-29 06:10:28Z

3

You need AddressOf

Dim auth As OAuth2Authenticator(Of NativeApplicationClient) = New OAuth2Authenticator(Of NativeApplicationClient)(provider, AddressOf GetAuthorization)

answered Sep 29, 2011 at 6:10

Albin Sunnanbo

47.2k8 gold badges72 silver badges110 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

Will Strohl Over a year ago

I knew I was missing something simple. :D Thanks!

Sai Kalyan Kumar Akshinthala · Accepted Answer · 2011-09-29 06:16:07Z

1

Refer to this Website for the Translation of any code from C# to VB and the code after conversion is

Dim provider = New NativeApplicationClient(GoogleAuthenticationServer.Description)
provider.ClientIdentifier = ClientCredentials.ClientID
provider.ClientSecret = ClientCredentials.ClientSecret
Dim auth = New OAuth2Authenticator(Of NativeApplicationClient)(provider, GetAuthentication)

edited Sep 29, 2011 at 6:16

answered Sep 29, 2011 at 6:07

Sai Kalyan Kumar Akshinthala

11.9k8 gold badges45 silver badges68 bronze badges

1 Comment

Sai Kalyan Kumar Akshinthala Over a year ago

The DownVoters should say a Reason why?

BigL · Accepted Answer · 2011-09-29 06:09:07Z

0

You are trying to use OAuth2Authenticator to GetAuthorization and the two are different, maybe that's your problem.

answered Sep 29, 2011 at 6:09

BigL

1,6311 gold badge11 silver badges10 bronze badges

Comments

jazzwhistle · Accepted Answer · 2012-02-19 18:12:55Z

0

AddressOf never calls the function, you need to use

Dim getAuth As Func(Of NativeApplicationClient, IAuthorizationState) = AddressOf GetAuthorization
Dim auth As New OAuth2Authenticator(Of NativeApplicationClient)(provider, getAuth)

edited Feb 19, 2012 at 18:12

answered Feb 17, 2012 at 6:58

jazzwhistle

3463 silver badges13 bronze badges

Collectives™ on Stack Overflow

Translate Code Snippet from C# to VB

4 Answers 4

1 Comment

1 Comment

Comments

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

4 Answers 4

1 Comment

1 Comment

Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Related