Question

我有以下格式“24849_1”的VendorID。我试图将“1”分开，并用它填充一个字段。下面的代码是我正在使用的，但我所要做的就是完全放弃“1”。有人有什么建议吗？

Dim strCustom1 As String
Dim strVendorID As String 
strCustom1 = pWorkdoc.Fields("VendorID").Text
If strCustom1 <> "" Then
   strCustom1 = Split(strCustom1, "_") (0)
   xmlDoc.getElementsByTagName("RemitTo").Item(0).Text = strCustom1
End If

Answer 1

您正在致电Split但是您真的很想知道它的作用吗？它返回一个包含拆分部分的数组。然后，您将获得该数组中索引0的部分。如果你真的想要索引1的部分，即第二部分，那么你应该使用索引1而不是索引0。

Answer 2

Split会给你一个数组，而你只是第一个元素;你能做的是：

strCustom1 = pWorkdoc.Fields("VendorID").Text // let it be 24849_1
If strCustom1 <> "" Then
   Dim resultArray = Split(strCustom1, "_")
   //resultArray[0] will be  24849
   //resultArray[1] will be  1
   //assign them as you need
End IF

Answer 3

Split函数返回一个String数组，但是您只取了第一个元素（包含“1”的第二个元素被丢弃）。

将split数组保存在变量中，以便可以访问这两个元素。

    Dim strCustom1 As String = "24849_1"
    Dim split As String()
    split = strCustom1.split("_")

    Console.WriteLine("Part1={0} Part2={1}", split(0), split(1))

如何将一个数字与另一个数字分开以填充字段

3 个答案: