Textbox Inhalt "filtern"

[yunses]

Hallo,

ich müsste einen Textboxinhalt filtern.

Wenn ich z.B. 005394029300 habe, sollen die "00" Stellen in ein "?" umgewandelt werden und der Rest der 2er Stellen in "x"

sollte dann so aussehen:
?xxxx?

Bisher habe ich:

With TextBox1
            .Text = Replace(.Text, "00", "?")
        End With

,
nur wie kann ich 2er Stellen, die nicht 00 sind, in "x" umwandeln?

Danke

 

[wincnc]

Hallo

Das kannst Du mit regex machen.

Beispiel:

Imports System.Text.RegularExpressions

Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim cText As String = New Regex("00", RegexOptions.None).Replace(Me.TextBox1.Text, "?")

        cText = New Regex("[0-9][0-9]", RegexOptions.None).Replace(cText, "x")

        MsgBox(cText)
    End Sub
End Class

 

[Nico Graichen]

Hi

Du solltest nur als Suchausdruck die Zahlen 1-9 nutzen nicht 0-9
Auch wenn die 0 vorher schon eleminiert wurde, ist so eher erkenntlich, was gemacht wird

 

[yunses]

Danke für eure Antwort.

Super, läuft perfekt, genau das was ich gesucht habe.

Danke