vb.net 代码以将字符串与第二个位置分隔符分开

Question

add = address.Split(",")
For count = 0 To add.Length - 1
para = New Paragraph(add(count), FontFactory.GetFont("Times New Roman", 8, iTextSharp.text.Font.BOLD, BaseColor.BLACK))
para.Alignment = Element.ALIGN_LEFT
document.Add(para)

下一个

上面的代码在新行中拆分所有字符串。我想在找到第二个位置分隔符时拆分字符串

Answer 1

如果我答对了你的问题，那么你希望字符串从第二个位置开始。在这种情况下，您可以从循环形式 1 而不是 0 开始。

    For count = 1 To add.Length - 1
      'Your piece of code
    Next

Answer 2

此代码正在工作，可根据您的要求进行更改

public Class Form1
  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim splitchops() As String
    Dim count As Integer
    splitchops = TextBox1.Text.Split(",")
    For count = 0 To splitchops.Length - 1
      If count = 0 Then
        ListBox1.Items.Add(splitchops(count).ToString + "," + splitchops(count + 1).ToString)
      ElseIf count = 2 Then
        ListBox1.Items.Add(splitchops(count).ToString)
      End If
    Next
  End Sub
End Class