تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مشكلة في Split
#1
السلام عليكم

اخواني انا استخدم الكود الاتي في استخراج 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

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


ما السبب وما الحل وشكرااا
الرد }}}
تم الشكر بواسطة:
#2
سلام


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


موفقين
متغيب
الرد }}}
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم