منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

السلام عليكم

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

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

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

سلام

كود :

Dim s = System.Text.RegularExpressions.Regex.Matches(msg(1), "(\P{Lu}+)|(\p{Lu}+\P{Lu}*)")

For Each w In s

    MsgBox(w.value)

Next

موفقين

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

YazanOtoum

الطالب