如何用VB编程语言获取网页的源代码？

在VB.NET中，你可以使用HttpClient类来获取网页源码，以下是一个简单的示例：

Imports System.Net.Http
Imports System.Threading.Tasks
Module Module1
    Sub Main()
        Dim url As String = "https://www.example.com"
        Dim htmlContent As String = GetHtmlAsync(url).Result
        Console.WriteLine(htmlContent)
    End Sub
    Async Function GetHtmlAsync(url As String) As Task(Of String)
        Using httpClient As New HttpClient()
            Dim response As HttpResponseMessage = Await httpClient.GetAsync(url)
            If response.IsSuccessStatusCode Then
                Return Await response.Content.ReadAsStringAsync()
            Else
                Throw New Exception($"Error: {response.StatusCode}")
            End If
        End Using
    End Function
End Module

这个示例中，我们首先导入了System.Net.Http和System.Threading.Tasks命名空间，我们定义了一个名为GetHtmlAsync的异步函数，该函数接受一个URL字符串作为参数，并返回一个包含网页源码的字符串。

在GetHtmlAsync函数中，我们创建了一个HttpClient实例，并使用GetAsync方法发送一个GET请求到指定的URL，如果请求成功（HTTP状态码为200），我们将响应内容读取为字符串并返回，如果请求失败，我们抛出一个异常，包含错误的状态码。

在Main函数中，我们调用GetHtmlAsync函数并传入一个URL，然后等待结果并将其输出到控制台，由于GetHtmlAsync是一个异步函数，我们需要使用.Result属性来等待其完成并获取结果，在实际应用程序中，你可能希望避免使用.Result，因为它会阻塞当前线程，直到异步操作完成，相反，你可以使用Await关键字来等待异步操作的结果。