تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
عملة دالة لاستخراج اسم المحافظة
#15
والحمد لله  نجح هذا الكود  اضعه للاستفادة العامة
وشكرا لكل من ساعدني

  Dim dictionary() As String = System.IO.File.ReadAllLines(Application.StartupPath & "\aaa111.txt")
        For Each item In dictionary
           If item.Contains(Microsoft.VisualBasic.Mid((TextBox1.Text), 8, 2)) Then
            '    TextBox9.Text = item.Split(","c)(1)
            'End If

            If item.Split(","c)(0) = Microsoft.VisualBasic.Mid((TextBox1.Text), 8, 2) Then 
                TextBox9.Text = item.Split(","c)(1)
            End If

        Next
الرد }}}
تم الشكر بواسطة:


الردود في هذا الموضوع
RE: عملة دالة لاستخراج اسم المحافظة - بواسطة atefkhalf2004 - 24-02-18, 11:13 PM


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


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