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

نسخة كاملة : استخلاص رقم من داخل text
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
هل من طريقة استخلاص الارقام فقط من داخل text
مثال
لدي text به 
عربي  2×2+1
ارجاع القيمة
2×1+2
اهلا و سهلا 
تفضل اخي الحبيب 
في المرفقات 
[attachment=9918]
جزاك الله خير اخي
ولاكن عند الضغط عليها اكثر من مرة يتم تكرار الرقم
أهلا أخي الكريم , كود أخي أمير لاغبار عليه , فقط قم بنقل تعريف المتغير Test_String والمتغير Str إلى داخل كود الزر وتنتهي المشكله وأقصد بالتعريف هذا الجزء :

PHP كود :
Dim Test_String As String
Dim Str 
As Integer 

ضعه داخل كود الزر ليصبح كود الفورم هكذا :

PHP كود :
Private Sub Command1_Click()
Dim Test_String As String
Dim Str 
As Integer
For Str 1 To Len(Text1)
        If 
Not InStr("0123456789+-/*"Mid$(Text1Str1)) = 0 Then
            Test_String 
Test_String Mid$(Text1Str1)
        
End If
Next Str
Text1 
Test_String
End Sub 
جزاكم الله خير