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

[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;
}
خروجی:
Untitled.png - 18.0 Kb (http://uplod.ir/i9qr4ojknwx8/Untitled.png.htm)

[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)