Imports System.IO
Imports System.Net
Imports System.Text
public class MainClass
Shared Sub Main()
Dim myHttpWebRequest As HttpWebRequest = CType(WebRequest.Create("http://www.microsoft.com"), HttpWebRequest)
Console.WriteLine(myHttpWebRequest.ProtocolVersion)
myHttpWebRequest.ProtocolVersion = HttpVersion.Version10
Dim myHttpWebResponse As HttpWebResponse = CType(myHttpWebRequest.GetResponse(), HttpWebResponse)
Console.WriteLine(myHttpWebRequest.ProtocolVersion)
Console.WriteLine(myHttpWebResponse.ProtocolVersion)
End Sub
End Class