Question

我有一个字符串，我已将其拆分为数组。这是我发送的字符串。字符串实际上是数字，它会变化，从1到565。

 magboxcreator(DirectCast(MychannelsListView.SelectedItem, DataRowView).Item("FIELD23"))

我有一个将该字符串拆分为数组的函数：

Public Function magboxcreator(channelnr As String)
    Dim chars As Char() = channelnr.ToCharArray()

End Function

现在我有数组中的数字，现在是字符串/字符，我想创建一个将＆＃34;转换＆＃34;那些＆＃34;数字＆＃34;各个值并创建一个字符串，我将发送给另一个函数。

对于每个值，我都有一个一致的计数器值（我需要转换数组中每个字符的值）。

我想要实现的目标的例子：

如果我解析了值72，我将在数组7和2中获得2个值。

值7需要转换为字符串：-kqt 0x37

值2需要转换为字符串：-kqt 0x32

在某些其他情况下，如果我得到另一个值，请说“＆＃39; 3＆＃39;”，该值需要转换为字符串-kqt 0x32

我的最终结果（我希望发送给另一个函数的最终字符串）需要为-kqt 0x37 && -kqt 0x32

Answer 1

我会使用查找表来处理这个问题。

Private mLookup As New Dictionary(Of Char, String)

Public Sub New()
    mLookup("7"c) = "-kqt 0x37"
    .... add more values
End Sub

Public Function Convert(value As String) As String
    Dim chars As Char() = value.ToCharArray()

    Dim output As New System.Text.StringBuilder
    For Each c In chars
        output.Append(mLookup(c)).Append(" && ")
    Next
    Return output.ToString().TrimEnd("&"c, " "c)

End Function

将值从数组转换为不同的值并生成新的字符串

1 个答案: