منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
مشكلة في Split - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : مشكلة في Split (/showthread.php?tid=13197)

مشكلة في Split - YazanOtoum - 11-09-15

السلام عليكم

اخواني انا استخدم الكود الاتي في استخراج strings معينه في Array strings 


كود :
Dim eachprocess As String() = msg(1).Split("ProSplit")
                        For i = 0 To eachprocess.Length - 2
                            MsgBox(eachprocess(i))

Next

و المتغير
كود :
msg(1)
عبارة ايضا عن String Array



وكذلك 

كود :
eachprocess

مثلا كان في msg هذه الاسماء
كود :
YazanProSplitOtoumProSplit


حاولت في كودي ان يستخرج منها الاتي 
Yazan
Otoum

ويظهر كل واحده على حدى في MsgBox

ولكن فقط ظهرت الاولى صحيحة و الثانية لا


ما السبب وما الحل وشكرااا


RE: مشكلة في Split - الطالب - 11-09-15

سلام


كود :
Dim s = System.Text.RegularExpressions.Regex.Matches(msg(1), "(\P{Lu}+)|(\p{Lu}+\P{Lu}*)")
For Each w In s
    MsgBox(w.value)
Next


موفقين