تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] حذف جزء من سطر
#1
Information 
السلام عليكم ورحمة الله ويركاته

كيفكم أخواني .. أنا لدي سطر في Textbox
كود :
C:\Users\ِAl3zabe\AppData\Local\Temp\a_1441_01_01_07_38_54.jpg
أريد فقط أسم الملف وإمتداده


a_1441_01_01_07_38_54.jpg


ولكم أطيب التماني  Heart
الرد
تم الشكر بواسطة:
#2
السلام عليكم ورحمة الله وبركاته
اخي العزيز Dell
الكثير يقومون بعمل ذلك بالريجكس 
اما انا فسأجلبها لك بطريقة اخرى اليك الكود مع الشرح

هذا
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Dim MyFile() As String = TextBox1.Text.Split("\") ' انشاء مصفوفة من النص الموجود في تكست بوكس1 مع التقطيع بدلالة الباك سلاش
       TextBox2.Text = MyFile(MyFile.Length - 1) ' جلب العنصر ذو الاندكس طول المصفوفة -1  اي العنصر الاخير
   End Sub
او هذا
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Dim MyFile() As String = TextBox1.Text.Split("\") ' انشاء مصفوفة من النص الموجود في تكست بوكس1 مع التقطيع بدلالة الباك سلاش
       TextBox2.Text = MyFile.Last ' جلب من المصفوفة آخر عنصر
   End Sub
الرد
تم الشكر بواسطة: dell , ابو روضة
#3
الف شكر لك سيتم التجربة وابلاغك بالنتيجة
الرد
تم الشكر بواسطة: ابراهيم ايبو


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


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