[superwoofer]

هل من طريقة استخلاص الارقام فقط من داخل text
مثال
لدي text به 
عربي  2×2+1
ارجاع القيمة
2×1+2

[superwoofer]

جزاك الله خير اخي
ولاكن عند الضغط عليها اكثر من مرة يتم تكرار الرقم

[Ahmed_Mansoor]

أهلا أخي الكريم , كود أخي أمير لاغبار عليه , فقط قم بنقل تعريف المتغير 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$(Text1, Str, 1)) = 0 Then
            Test_String = Test_String + Mid$(Text1, Str, 1)
        End If
Next Str
Text1 = Test_String
End Sub 


[superwoofer]

جزاكم الله خير