Asp.net vb.net Webapi项目中缺少request.CreateResponse

我似乎已经找到了问题，但不知道如何解决它，或者我是否可以

当我创建一个新的C WebAPI项目并为System.Net.Http添加导入时，我可以访问 Request.CreateResponse

当我创建一个新的VB.Net WebAPI项目，并为System.Net.Http添加一个导入时，我所拥有的就是Request.createODataErrorResponse

但是，我可以忽略intellisense并访问CreateResponse。看起来VB只是没有正确解释各种扩展

我想修复intellisense，但实际上并不需要它

谢谢

史蒂夫

更新 我在2012年8月发现了这个问题，并解释说它已经被复制，但似乎尚未修复

因为我是新来的，所以应该关闭吗？

有一个解决办法

我提出了以下解决方案：

创建调用原始CreateResponse方法的扩展方法CreateResponse2 在控制器中，调用新的自定义方法Request.CreateResponse2。。。 以下是我的解决方案：

创建新模块HttpRequestMessageExtensions

截图：

---

我想，这是由于IDE设置导致高级选项在VB中对intellisense隐藏，例如显示高级成员。这似乎没有关系，因为mVS2012选项中的框是选择的自动列表成员，而隐藏取消选择的高级成员。

 Imports System.Net
 Imports System.Net.Http
 Imports System.Web
 Imports System.Runtime.CompilerServices
 Imports System.Web.Http

 Public Module HttpRequestMessageExtensions

     <Extension()> _
     Public Function CreateResponse2(Of T)(ByVal request As HttpRequestMessage,     statusCode As HttpStatusCode, value As T) As HttpResponseMessage
         Return request.CreateResponse(Of T)(statusCode, value)
     End Function

     <Extension()> _
     Public Function CreateResponse2(Of T)(ByVal request As HttpRequestMessage, statusCode As HttpStatusCode, value As T, Configuration As HttpConfiguration) As HttpResponseMessage
         Return request.CreateResponse(Of T)(statusCode, value, Configuration)
     End Function

     <Extension()> _
     Public Function CreateResponse2(Of T)(ByVal request As HttpRequestMessage, statusCode As HttpStatusCode, value As T, mediaType As String) As HttpResponseMessage
         Return request.CreateResponse(Of T)(statusCode, value, mediaType)
     End Function

     <Extension()> _
     Public Function CreateResponse2(Of T)(ByVal request As HttpRequestMessage, statusCode As HttpStatusCode, value As T, formatter As Formatting.MediaTypeFormatter) As HttpResponseMessage
         Return request.CreateResponse(Of T)(statusCode, value, formatter)
     End Function

     <Extension()> _
     Public Function CreateResponse2(Of T)(ByVal request As HttpRequestMessage, statusCode As HttpStatusCode, value As T, mediaType As Headers.MediaTypeHeaderValue) As HttpResponseMessage
         Return request.CreateResponse(Of T)(statusCode, value, mediaType)
     End Function

     <Extension()> _
     Public Function CreateResponse2(Of T)(ByVal request As HttpRequestMessage, statusCode As HttpStatusCode, value As T, formatter As Formatting.MediaTypeFormatter, mediaType As String) As HttpResponseMessage
         Return request.CreateResponse(Of T)(statusCode, value, formatter, mediaType)
     End Function

     <Extension()> _
     Public Function CreateResponse2(Of T)(ByVal request As HttpRequestMessage, statusCode As HttpStatusCode, value As T, formatter As Formatting.MediaTypeFormatter, mediaType As Headers.MediaTypeHeaderValue) As HttpResponseMessage
         Return request.CreateResponse(Of T)(statusCode, value, formatter, mediaType)
     End Function

 End Module

 Return Request.CreateResponse2(Of SomeClass)(HttpStatusCode.BadRequest, objSomeClass)