정규식 표현

http://blog.eairship.kr/205

사이트 참조

예제

 With New Post_it

            .Show()

            .BringToFront()

            .WindowState = FormWindowState.Normal

            .Width = 900

            .TextBox1.Text = Me.Label2.Text

            .RichTextBoxEx1.Rtf = DataGridView5(3, e.RowIndex).Value

            .Label7.Text = DataGridView5(0, e.RowIndex).Value '날짜

            If Val(Format(Now.AddHours(-2), "yyyyMMddHHmmss")) > Val(Label1.Text) Then

                '전화번호

                '.RichTextBoxEx1.Text = Regex.Replace(.RichTextBoxEx1.Text, "(?<= [0-9][0-9])[0-9][0-9]", "**")

                .RichTextBoxEx1.Text = Regex.Replace(.RichTextBoxEx1.Text, "(?<=[0-9][0-9])[0-9][0-9] ", "**")

                .RichTextBoxEx1.Text = Regex.Replace(.RichTextBoxEx1.Text, "(?<= [0-9][0-9])[0-9][0-9]", "**")

                .RichTextBoxEx1.Text = Regex.Replace(.RichTextBoxEx1.Text, "(?<= - [0-9][0-9])[0-9][0-9]", "**")

                .RichTextBoxEx1.Text = Regex.Replace(.RichTextBoxEx1.Text, "(?<=-[0-9][0-9])[0-9][0-9]", "**")

                .RichTextBoxEx1.Text = Regex.Replace(.RichTextBoxEx1.Text, "(?<=[0-9][0-9])[0-9][0-9] ", "**")

                .RichTextBoxEx1.Text = Regex.Replace(.RichTextBoxEx1.Text, "(?<=[0][1][0-9]-[0-9])[0-9][0-9]", "**") '011 - 3자리

                .RichTextBoxEx1.Text = Regex.Replace(.RichTextBoxEx1.Text, "(?<=[0][1][0-9] [0-9])[0-9][0-9]", "**")

                .RichTextBoxEx1.Text = Regex.Replace(.RichTextBoxEx1.Text, "(?<=[1] [0-9])[0-9][0-9]", "**") ' 1 3자리

                .RichTextBoxEx1.Text = Regex.Replace(.RichTextBoxEx1.Text, "(?<=[7] [0-9])[0-9][0-9]", "**") ' 1 3자리

                .RichTextBoxEx1.Text = Regex.Replace(.RichTextBoxEx1.Text, "(?<=[6] [0-9])[0-9][0-9]", "**") ' 1 3자리

                .RichTextBoxEx1.Text = Regex.Replace(.RichTextBoxEx1.Text, "(?<=[9] [0-9])[0-9][0-9]", "**") ' 1 3자리

                '주민번호

                .RichTextBoxEx1.Text = Regex.Replace(.RichTextBoxEx1.Text, "(?<=[0-9][0-9])[0-9][0-9][0-9][0-9]-", "******")

                .RichTextBoxEx1.Text = Regex.Replace(.RichTextBoxEx1.Text, "(?<=[0-9][0-9])[0-9][0-9][0-9][0-9] -", "******")

                .RichTextBoxEx1.Text = Regex.Replace(.RichTextBoxEx1.Text, "(?<=-[0-9])[0-9][0-9][0-9][0-9][0-9][0-9]", "*******")

                .RichTextBoxEx1.Text = Regex.Replace(.RichTextBoxEx1.Text, "(?<= [0-9])[0-9][0-9][0-9][0-9][0-9][0-9]", "*******")

                .RichTextBoxEx1.Text = Regex.Replace(.RichTextBoxEx1.Text, "(?<=[0-9][0-9]<!\**-)[0-9][0-9]", "**")

            End If

        End With

출처: http://byhwan.tistory.com/entry/정규식-표현?category=535198 [By Hwan]