.net 旧的visual basic中间和左侧函数

我正在使用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)

---

由于您没有提供变量的数据内容：

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)

---

由于您没有提供变量的数据内容：

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)

---

NET仍然拥有VB6所拥有的功能。我会坚持使用这些，而不是试图重新发明轮子。现在，如果您要迁移到C#，我的答案会有所不同。VB字符串函数只是底层网络函数的包装器。除非您是VB6的向导，或者正在处理大量的遗留代码，否则没有理由通过中间层。VB.NET仍然拥有VB6所拥有的。我会坚持使用这些，而不是试图重新发明轮子。现在，如果您要迁移到C#，我的答案会有所不同。VB字符串函数只是底层网络函数的包装器。除非您是VB6上的向导或正在处理大量遗留代码，否则没有理由通过中间层。请务必注意，子字符串是以零为基础的，其中Mid是以一为基础的，如果请求的值超出范围，Mid不会引发异常。此外，MID可以充当替换函数，这在子串中不可用。@ JFr.CARR-在VB6中，字符串函数可以是0或1，这取决于选项基的设置。@ CysDayWale- Trtrue，但是非常少见的是VB6程序员，而不是强制使用VB的C++程序员。将0 base与字符串函数一起使用。另外要记住的是，如果所需的部分不存在，

Substring（）

将引发异常。i、 e.

“ShortString”。子字符串（8,20）

将抛出一个

ArgumentOutOfRangeException

。需要注意的是，子字符串是以零为基础的，其中Mid是以一为基础的，如果请求的值超出范围，则Mid不会抛出异常。此外，MID可以充当替换函数，这在子串中不可用。@ JFr.CARR-在VB6中，字符串函数可以是0或1，这取决于选项基的设置。@ CysDayWale- Trtrue，但是非常少见的是VB6程序员，而不是强制使用VB的C++程序员。将0 base与字符串函数一起使用。另外要记住的是，如果所需的部分不存在，

Substring（）

将引发异常。i、 子字符串（8，20）将抛出一个

ArgumentOutOfRangeException

。