تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] استخراج اكثر من رقم داخل التكست
#1
السلام عليكم
استخدم هذا الكود فى استخراج رقم من نص داخل التكست

PHP كود :
Dim myString As String DGV.Rows(0).Cells(2).Value.ToString
        Dim number 
myString.Split(" "c).Where(Function(fIsNumeric(f)).FirstOrDefault
        MsgBox
(number
ولكن واجهتنى مشكلة وهى ان هناك رقمين فى النص على هاكذا

Newborn : 100 – 120 fl
فهناك الحد الادنى وهو 100
وهناك الحد الاقصى وهو 120

وعند استخادم الكود يظهر الحد الادنى ولا يظهر الحد الاعلى

فكيف استخدام اصغر رقم داخل التكست وايضا اكبر رقم
الرد
تم الشكر بواسطة:
#2
السلام عليكم ورحمة الله وبركاته

بالتعدل علي كودك:
كود :
Dim myString As String = DGV.Rows(0).Cells(2).Value.ToString
        Dim number = myString.Split(" "c).Where(Function(f) IsNumeric(f)).ToList

        For Each num In number
            MsgBox(num)
        Next

باستخدام الركجس (Regex):
كود :
Dim Patren As String = "((\d+)? – (\d+)?)" ' هذا التشكيل للبحث عن الأرقام فقط
        Dim txtBox As String =  DGV.Rows(0).Cells(2).Value.ToString

        Dim match As System.Text.RegularExpressions.MatchCollection = System.Text.RegularExpressions.Regex.Matches(txtBox, Patren, System.Text.RegularExpressions.RegexOptions.IgnoreCase)
        If match.Count > 0 Then
            Dim f As String = match.Item(0).Groups(0).Value
            Dim s() As String = f.Split("–")
            MsgBox(s(0))
            MsgBox(s(1))
        End If

****
***
**
*
(وَقُل رَّبِّ زِدْنِي عِلْمًا)

الرد
تم الشكر بواسطة: aftfm
#3
شكرا الى كل من ساهم فى الحل 
ولكن عندى سؤال كيف احصل على اعلى قيمة واقل قيمة
مثال اريد استخدام اكبر قيمة واقل قيمة من هذا النموذج
كود :
Newborn : 14 - 22 g/dl
1 month : 11.5 – 16.5 g/dl
2 month: 9.4 – 13.0 g/dl
3 - 11 month : 11.1–14.1 g/dl
1 Year: 11.1 – 14.1 g/dl
2 – 6 Year : 11.0 – 14.0 g/dl
7 – 12 Year : 11.5 – 15.5 g/dl
Female : 12.0 – 15.0 g/dl
Male : 13.0 – 17.0 g/dl

ففى هذا النموذج توجد ارقام كثيرة ولكن اريد الحصول على اعلى قيمية واقل قيمية حتى استطيع استخدامها 
الرد
تم الشكر بواسطة:
#4
شكرا للاخ الكريم على الرد والاهتمام

ولكن عندما استخدم هذه الطريقة فى كل نوع من انواع التحليل اى اننى اقوم بتنفيذ الكود على حوالى 500 نوع من انواع التحليل 
وهذا مجهود كبير 
ولكن عند اضافة اسم تحليل الى الداتا جريد فيو اريد ان يقوم الكود بااستخراج اقل قيمية واعلا قيمة فى الحقل الذى يحمل المعدالات البيانية وعند كتابة قيمة فى نتيجة التحليل بحقل اخرى اذا كانت القيمة اقل من المعدل الطبيعى يعطى لون الحقل بلون واذا كان القيمة اكبر من المعدل الطبيعلا يعطى الحقل بلون  فهذا هو المطلوب فقط 
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] حماية ملف الdll من استخراج الاكواد mohamed haroon 9 1,601 منذ 8 ساعة مضت
آخر رد: black coder
  كيفية استخراج بيانات من اكثر من جدول وطباعتها المتألق9 4 207 12-06-19, 11:41 AM
آخر رد: new2016
  [ تمّ الحل ] : إختفاء الأدوات داخل الفورم عبد العزيز البسكري 7 185 10-06-19, 02:05 PM
آخر رد: sendbad100
  اتمنى مساعدتي في كتابة كود توقيف التكست عند القيمة صفر asoomh1416 9 262 06-06-19, 05:59 AM
آخر رد: ابراهيم ايبو
  [سؤال] طلب مساعدة كود التحكم بعرض بيانات حقل حسابية في التكست بكس على ان لا يظهر لاصفار essawq 12 752 29-05-19, 10:43 PM
آخر رد: egbest2
  منع تشغيل البرنامج اكثر من مره مع توجيه امر الى النسخة الشغاله معاذ_ابراهيم 4 188 18-05-19, 11:53 PM
آخر رد: elgokr
  [سؤال] كيف يمكنني الحصول علي رابط داخل كود جافا من خلال الويب براوزر dametucorazon 0 69 11-05-19, 06:10 AM
آخر رد: dametucorazon
Photo مطلوب كود لتقسيم نص لعدة نصوص من داخل ملف نصي Top King 8 258 07-05-19, 06:15 PM
آخر رد: asemshahen5
  سورس كود لوضع زر امر داخل الداتا جريد فيو احمد129 2 174 01-05-19, 12:45 PM
آخر رد: DK-x
  [VB.NET] حفظ ما في listview داخل settings trakktour 2 176 30-04-19, 02:33 AM
آخر رد: trakktour

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


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