如何使用visual basic从url文件中获取文本数据

Imports System.Net
Imports System.IO

Function GetTextFromURL(url As String) As String
    Dim result As String = ""
    
    ' 创建一个WebClient对象
    Using client As New WebClient()
        ' 从URL下载文本数据
        result = client.DownloadString(url)
    End Using
    
    Return result
End Function

Dim url As String = "http://example.com/data.txt"
Dim textData As String = GetTextFromURL(url)

' 处理文本数据
Console.WriteLine(textData)