تقييم الموضوع :
  • 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 ) ضيف كريم