Hi,
möchte in einen string mit stringbuilder jede 4 zeichen einen doppelpunkt hinzufügenn.
Aber nur wenn wirklich noch 4 zeichen folgen.
Da liegts Problem. Ich hab zwar Abfragen, die checken sobald der folgende string <4 ist, die werden aber erst gar nicht benutzt, sonern es kommt einfach Fehler wenns so ist.
111122223333
ist also kein problem. Wenn dann aber noch was folgt(44), crashts.
Danke !
mfg der vbnoob
möchte in einen string mit stringbuilder jede 4 zeichen einen doppelpunkt hinzufügenn.
Aber nur wenn wirklich noch 4 zeichen folgen.
Da liegts Problem. Ich hab zwar Abfragen, die checken sobald der folgende string <4 ist, die werden aber erst gar nicht benutzt, sonern es kommt einfach Fehler wenns so ist.
111122223333
ist also kein problem. Wenn dann aber noch was folgt(44), crashts.
Danke !
mfg der vbnoob
VB.NET-Quellcode
- Dim iie As String = "11112222333344"
- Dim richtig As Boolean
- Dim newiie As New System.Text.StringBuilder()
- For i As Integer = 0 To iie.Length - 1 Step 4
- 'alles was nach i kommt ist irgendwnan nicht mehr 4 groß.
- If (richtig = iie.Substring(i, 4)) = False Then
- If iie.Substring(i, 3).Length = 3 Then
- newiie.Append(iie.Substring(i, 3))
- ElseIf iie.Substring(i, 2).Length = 2 Then
- newiie.Append(iie.Substring(i, 2))
- ElseIf iie.Substring(i, 1).Length = 1 Then
- newiie.Append(iie.Substring(i, 1))
- ElseIf iie.Substring(i, 0).Length = 0 Then
- newiie.Append(iie.Substring(i, 0))
- End If
- End If
- 'normale 4er Blöcke im format AAAA:
- If iie.Substring(i, 4).Length = 4 Then
- newiie.Append(iie.Substring(i, 4))
- newiie.Append(":")
- End If
- ' MessageBox.Show(iie.Substring(i, 4))
- Next
- MessageBox.Show("newiie:" & vbCrLf & newiie.ToString)