2016-11-13 2 views
0

Ich habe eine Zeichenfolge, die ich in Array aufgeteilt habe. Dies ist die Zeichenfolge, die ich sende. Der String ist tatsächlich Zahlen, variiert sie, und es geht von 1 bis 565.Konvertieren von Werten aus Array in andere Werte und Erstellen einer neuen Zeichenfolge

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

I haben eine Funktion, die die Zeichenfolge in eine Array-Splits:

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

End Function 

Nun, da ich habe Zahlen in Array, das sind nun strings/chars, ich möchte eine Funktion machen, die diese "Zahlen" in entsprechende Werte umwandelt und eine Zeichenkette macht, die ich an eine andere Funktion senden werde.

Für jeden Wert habe ich einen konsistenten Zähler-Wert (der Wert ich brauche jedes char von Array zu konvertieren).

Beispiel von dem, was ich versuche zu erreichen:

Wenn ich Wert analysieren 72 i 2 Werte in Array 7 und 2 bekommen.

Wert 7 in String konvertiert werden muss: -kqt 0x37

Wert 2 in String konvertiert werden muss: -kqt 0x32

In einem anderen Fall, wenn ich einen anderen Wert zu erhalten, lassen Sie uns ‚3‘ sagen, dass Wert Bedürfnisse zu String umgewandelt werden -kqt 0x32

Mein Endergebnis (final String i an eine andere Funktion gesendet werden soll) muss sein -kqt 0x37 && -kqt 0x32

Antwort

0

Ich würde dies mit einer Nachschlagetabelle behandeln.

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 
Verwandte Themen