Question

示例，在线文档：[已删除不再需要的链接]

哪个输出：

Value1=1
Value2=5

The rest of this document would have random text to ignore.

我想搜索Value1和Value2，然后输出它的值[如果我决定在将来添加新信息，我需要这个可扩展]

[输出可能长于一个字符，可能是文本而不是数字]

Dim Value1Result as Integer = [value from online file] '1 in this case
Dim Value2Result as Integer = [value from online file] '5 in this case

Answer 1

编辑：添加逻辑以删除版本号。非常基本，但只要格式没有改变它应该工作。如果你曾经使用＆＃34; 1.2＆＃34;你需要处理解析为int，double等。或任何版本。

如果我正确理解您的问题，您只需要下载文件，将其存储在本地变量中，然后对其执行操作。如果情况并非如此，我将进行评论，我将进行调整。

我会通过创建WebClient，下载数据，将其转换为字符串，然后对其进行操作来实现。我没有添加任何标题 - Dropbox不需要它，但需要注意生产...下面的小例子：

Dim bResult() As Byte
Dim sUrl As String = "https://dl.dropboxusercontent.com/s/bus2q71wsn9txuz/Test.txt?dl=0"
Using client As New WebClient
    bResult = client.DownloadData(sUrl)
End Using
Dim retData As String = Encoding.UTF8.GetString(bResult)
Dim retList As List(Of String) = retData.Split(Environment.NewLine).ToList()
Dim sMin = retList(0).Split("=").Last()
Dim sNew = retList(1).Split("=").Last()

如何在在线文档中搜索特定字符串及其值？

1 个答案: