也许有一种更简单的方法,但是我是 VStudio 的新手,习惯于旧的 vb3 或 6,共享的新类我们过去必须将它们全部编码到一个模块中并保存该模块,事实是我可以做 application.path 绝对令人惊叹......也许我错过了一些东西
公共函数 extractStr(源为字符串,开始为字符串,结束为字符串) 返回 source.Substring(InStr(source, start, CompareMethod.Text) + start.Length - 1, InStr(source,ending) - (InStr(source, start, CompareMethod.Text) + start.Length)) 结束功能
我在按钮中调用该函数......
Private Sub Button5_Click(sender As Object, e As EventArgs) 处理 Button5.Click Dim tickr As String = extractStr(TxtScrape.Text, lblPreTickData1.Text, lblPreTickData2.Text) 将 LastSearchEnd 调暗为整数 = 0 出错时继续下一步 'Dim tickrperc As Decimal = extractStr(TxtScrape.Text, lblPreTickData1.Text, lblPreTickData2.Text) TickerPRE.Text = ticker MsgBox("找到" & TickerPRE.Text) 结束子
我是 StreamReader 的新手......很多事情都发生了变化,因为我已经 20 年没有编码了......它不断返回相同的字符串,而不是转到下一个起点或以不同的点结束......
我确信这可能就像将起点更改为终点一样简单?
希望有人能帮忙
我也对这个简单的事实有疑问,我必须输入“和< into a string. a workaround from the old days was instead of char(13) was to label it into a label, then call the label... maybe someone also has an answer to that as well.