将 htmlweb 委托从 c# 转换为 vb.net

Question

我需要将找到的这段代码 here 转换为其 vb.net 等效项，有人可以帮我吗？

代码摘录

/// <summary>
/// Represents the method that will handle the PreRequest event.
/// </summary>
public delegate bool PreRequestHandler(HttpWebRequest request);


//And they call that delegate right before making the GetResponse call:
if (PreRequest != null)
{
    // allow our user to change the request at will
    if (!PreRequest(req))
    {
        return HttpStatusCode.ResetContent;
    }              
}

HttpWebResponse resp;

try
{
    resp = req.GetResponse() as HttpWebResponse;
}

//So all you have to do is assign a delegate to PreRequest and set your timeout within that delegate:

var web = new HtmlWeb();
web.PreRequest = delegate(HttpWebRequest webRequest)
{
     webRequest.Timeout = 4;
     return true;
};
var doc = web.Load("http://www.msn.com/");

Answer 1

''' <summary> 
''' Represents the method that will handle the PreRequest event. 
''' </summary> 
Public Delegate Function PreRequestHandler(ByVal request As HttpWebRequest) As Boolean


'And they call that delegate right before making the GetResponse call: 
If PreRequest IsNot Nothing Then
    ' allow our user to change the request at will 
    If Not PreRequest(req) Then
        Return HttpStatusCode.ResetContent
    End If
End If

Dim resp As HttpWebResponse

Try
    resp = TryCast(req.GetResponse(), HttpWebResponse)
End Try

'So all you have to do is assign a delegate to PreRequest and set your timeout within that delegate: 

Dim web = New HtmlWeb()
web.PreRequest = Function(webRequest As HttpWebRequest)
     webRequest.Timeout = 4
     Return [True]
End Function
Dim doc = web.Load("http://www.msn.com/")

Answer 2

转到http://converter.telerik.com/ - 粘贴您的 C# 代码并取回 VB 代码。