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

نسخة كاملة : السلام عليكم محتاج افهم شئ صغير
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
عندي الكلمه دي abc.def.abz123/pop/77885552 في تكست بوكس 
محتاج احذف abc.def.abz123 بالكود وهذه الكلمه متغير 
احذفها كيف
اخي هذا ما يصير الا اذا كان هذا الجزء ثابت /pop/77885552 واذا كان ثابت ومعلوم عندك  ما هي الحاجة للكود بعد ذلك ؟ وفي حال كان هذا الجزء متغير بالنص لكن ثابت من ناحية عدد الحروف فتحتاج الى كود يعكس النص اولا ويحسب العدد المطلوب ويحذف الباقي
وعلى كل حال بناء على كلامك هذا كود متعدد الخطوات للتوضيح والتعليم ينجز ما تريد

كود :
  Dim str, str1, str2 As String
       str = TextBox1.Text
       str1 = "/pop/77885552"
       str2 = Replace(str, str1, "")
       TextBox1.Text = Replace(str, str2, "")
باستخدام Regex
PHP كود :
Dim v=Regex.Match(Textbox1.Text,".+(/pop/\d+)").Groups(1).value 
زيادة على كود الأخ جميل لو أحببت تأخذ الرقم الأخير فقط

PHP كود :
Dim v Regex.Match(TextBox1.Text".+(/\d+)").Groups(1).Value
        TextBox2
.Text v.Replace("/"""

النتيجة ستكون  77885552