( فوری ) جداسازی حرف و رقم

[vahidmasoudi1391]

سلام دوستان عزیز
من چظور می توانم DE1215 را جداسازی کنم
DE جدا در یک تک باکس و 1215 در تکس باکس دیگر
با تشکر

[alitavakoli]

بهترین راه برای این کار استفاده از Regular expression هست
نمونه کد:

 private void button1_Click(object sender, EventArgs e)

        {

            var maintext = new Regex("(?<Alpha>[a-zA-Z]*)(?<Numeric>[0-9]*)");

            var split = maintext.Match("DE1215");



            var strings = split.Groups["Alpha"].Value;

            var numbers = split.Groups["Numeric"].Value;

            txtword.Text = strings;

            txtnumber.Text = numbers;

        }

خروجی:
[IMG]Untitled.png - 18.0 Kb[/IMG]

[vahidmasoudi1391]

سلام دوست عزیز
اگر می شود نمونه برایم بگذارید
با تشکر

[Abbas Amiri]

تابع زیر باگرفتن مقدار تکست ، خروجی را بصورت یک آرایه 2 عضوی به صورت عدد وتکست مجزا ایجاد میکند . مهم نیست که ابتدا عبارت حرفی یا عددی باشد درهردو صورت اولین اندیس ، مقدار عددی ودومی مقدار حرفی را برمیگرداند

Function IsolateNumberAndText(s As String)

Dim tmp As String, var(1) As String

tmp = s

If Val(s) Then

    tmp = Replace(tmp, Val(s), "")

    var(0) = Val(s)

    var(1) = tmp

Else

    For k = 1 To Len(s)

        If IsNumeric(Mid(s, k)) Then

            var(0) = Mid(s, k)

            var(1) = Left(s, k - 1)

            Exit For

        End If

    Next

End If

IsolateNumberAndText = var

End Function

مثال:

varText=IsolateNumberAndText("DE1215")

Text1=varText(0)

Text2=varText(1)