24-01-20, 04:48 AM
24-01-20, 08:46 AM
اخي هذا ما يصير الا اذا كان هذا الجزء ثابت /pop/77885552 واذا كان ثابت ومعلوم عندك ما هي الحاجة للكود بعد ذلك ؟ وفي حال كان هذا الجزء متغير بالنص لكن ثابت من ناحية عدد الحروف فتحتاج الى كود يعكس النص اولا ويحسب العدد المطلوب ويحذف الباقي
وعلى كل حال بناء على كلامك هذا كود متعدد الخطوات للتوضيح والتعليم ينجز ما تريد
وعلى كل حال بناء على كلامك هذا كود متعدد الخطوات للتوضيح والتعليم ينجز ما تريد
كود :
Dim str, str1, str2 As String
str = TextBox1.Text
str1 = "/pop/77885552"
str2 = Replace(str, str1, "")
TextBox1.Text = Replace(str, str2, "")
24-01-20, 05:25 PM
باستخدام Regex
PHP كود :
Dim v=Regex.Match(Textbox1.Text,".+(/pop/\d+)").Groups(1).value
24-01-20, 06:44 PM
زيادة على كود الأخ جميل لو أحببت تأخذ الرقم الأخير فقط
PHP كود :
Dim v = Regex.Match(TextBox1.Text, ".+(/\d+)").Groups(1).Value
TextBox2.Text = v.Replace("/", "")
النتيجة ستكون 77885552