时间戳

首页 > 解决方案 > 通过分隔符插入每个数字

vb.net - 通过分隔符插入每个数字

问题描述

Textbox1.Text= 你应该在每个数字后用逗号分隔这些数字。那么我该怎么做呢？

227
72
13
492

代码：

    On Error Resume Next
    Dim pieces() As String = TextboxIndex1.Text.Split(ControlChars.CrLf.ToCharArray(), StringSplitOptions.RemoveEmptyEntries)
    Dim str As String = ""
    For Each piece As String In pieces
        str &= piece.Insert(piece.Length - 1, ",") & ControlChars.CrLf
    Next
    TextBox1.Text = str.Substring(0, str.Length - 3)
    'Get all chars

输出：

22,7
7,2
1,3
49,2

预期输出：

2,2,7
7,2
1,3
4,9,2

标签： vb.net

解决方案

您当前的代码仅在倒数第二个位置插入逗号。您可以使用String.Join给定的分隔符连接数组的元素。

'On Error Resume Next    'Remove this
Dim pieces() As String = TextBox1.Text.Split(ControlChars.CrLf.ToCharArray(), StringSplitOptions.RemoveEmptyEntries)
Dim str As String = ""

For Each piece As String In pieces
    str &= String.Join(",", piece.ToCharArray().ToList()) & ControlChars.CrLf
Next

TextBox2.Text = str

piece.ToCharArray()把String变成Char(). 不幸的是，我们不能直接将它传递给，String.Join因为编译器将 char 数组视为字符串。.ToList()这就是打电话的原因。

推荐阅读