Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/15.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
在我的windows phone项目中将C#转换为VB.NET时出错_C#_Vb.net_Visual Studio 2010_Windows Phone 7_Hammock - Fatal编程技术网

在我的windows phone项目中将C#转换为VB.NET时出错

在我的windows phone项目中将C#转换为VB.NET时出错,c#,vb.net,visual-studio-2010,windows-phone-7,hammock,C#,Vb.net,Visual Studio 2010,Windows Phone 7,Hammock,一段时间以来,我一直在尝试将一些c#代码转换为VB.NET。这样做的目的是,我试图构建某种类型的Twitter客户端,我几乎已经为我的项目中的一个类转换了以下所有代码,目前是: Friend Shared Function GetRequestTokenQuery() As OAuthWebQuery Dim oauth = New OAuthWorkflow() With { _ Key .ConsumerKey = AppSettings.consum

一段时间以来,我一直在尝试将一些c#代码转换为VB.NET。这样做的目的是,我试图构建某种类型的Twitter客户端,我几乎已经为我的项目中的一个类转换了以下所有代码,目前是:

        Friend Shared Function GetRequestTokenQuery() As OAuthWebQuery
    Dim oauth = New OAuthWorkflow() With { _
        Key .ConsumerKey = AppSettings.consumerKey, _
        Key .ConsumerSecret = AppSettings.consumerKeySecret, _
        Key .SignatureMethod = OAuthSignatureMethod.HmacSha1, _
        Key .ParameterHandling = OAuthParameterHandling.HttpAuthorizationHeader, _
        Key .RequestTokenUrl = AppSettings.RequestTokenUri, _
        Key .Version = AppSettings.oAuthVersion, _
        Key .CallbackUrl = AppSettings.CallbackUri _
    }

        Dim info = oauth.BuildRequestTokenInfo(WebMethod.[Get])
        Dim objOAuthWebQuery = New OAuthWebQuery(info, False)
        objOAuthWebQuery.HasElevatedPermissions = True
        objOAuthWebQuery.SilverlightUserAgentHeader = "Hammock"
        Return objOAuthWebQuery
    End Function

但是,我随后得到错误“在对象初始值设定项中初始化的字段或属性的名称必须以“.”开头,第一次提到的“key”用蓝色下划线。有人知道我需要如何更改代码吗?

VB.net中正确的语法如下

Friend Shared Function GetRequestTokenQuery() As OAuthWebQuery
    Dim oauth = New OAuthWorkflow() With { _
        .ConsumerKey = AppSettings.consumerKey, _
        .ConsumerSecret = AppSettings.consumerKeySecret, _
        .SignatureMethod = OAuthSignatureMethod.HmacSha1, _
        .ParameterHandling = OAuthParameterHandling.HttpAuthorizationHeader, _
        .RequestTokenUrl = AppSettings.RequestTokenUri, _
        .Version = AppSettings.oAuthVersion, _
        .CallbackUrl = AppSettings.CallbackUri _
    }

        Dim info = oauth.BuildRequestTokenInfo(WebMethod.[Get])
        Dim objOAuthWebQuery = New OAuthWebQuery(info, False)
        objOAuthWebQuery.HasElevatedPermissions = True
        objOAuthWebQuery.SilverlightUserAgentHeader = "Hammock"
        Return objOAuthWebQuery
    End Function

这是因为每个字段前面都有一个键,在vb.net中,“.”之前不应该有任何内容,所以要删除所有的键吗?