旧视觉基本中左功能

Question

我正在使用vb中的旧代码，但我想知道什么是vb.net新代码的最佳方法..

test = Mid(strData, Pos1 + Len(strFirst))
test = Mid(strData, Pos1 + Len(strFirst) + 3 + Len(strID))
test = Microsoft.VisualBasic.Left(strID, Pos2 - 1)

Answer 1

由于您没有提供变量的数据内容：strData strID strFirst Pos1 Pos2我无法编写更好的代码来解释，但这个例子应该足够了。

等同于VB6函数：

Len  = "String".Length
Left = "String".Substring(0, length)
Mid  = "String".Substring(start position, length)

然后VB.NET代码翻译应如下所示：

test = strData.Substring(pos1 + strFirst.length)
test = strData.Substring(pos1 + strFirst.length + 3 + strID.length)
test = strID.Substring(Pos2 - 1)