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

سلام الله عليكم اخوتي الكرام من فضلكم كيف اقوم بتجاوز مشكل الدي هو..
عند كتابة رقم واستخدام الفاصلة عند الحفظ يجمع الرقم كامل بدون فاصلة متلا
12,50. يعطي 1250
قمت بكتابة 12.50 يعطي الاجابة التي اريد
ادا اين تكمن المشكلة

وعليكم السلام ورحمة الله وبركاته

الفاصلة من نوع نقطة (.)  هذه فاصلة عشرية..
الفاصلة من نوع شحطة سفلية (,)  هذه لتنسيق الخانات الآلاف - ملايين ..  يعني للتنسيق ولا قيمة لها..

المشكل انه عند ادخال رقم بالنقطة متلا 12.50 وعند اشتتعائه للواجهة يعطي قيمة 12,50
وعند اعادة حفظها يعطي 1250
يعني كيف يمكنني ان اعطيه امر عند الاستدعاء يقوم بتغيير شحطة سفلية (,) الى النقطة (.)

اذا كنت تستخدم الارقام الهندية ستظهر (.) عندك على شكل الفاصلة(,)
بينما اذا كنت تستخدم الارقام العربية فستظهر  بهذا الشكل فقط نقطة (.)

وأحياناً نوع الخط المستخدم يلعب دوراً في تحديد نوع الفاصلة..

استخدم الارقام الهندية اخي

---

اامشكل انه في برنامج اخر يشتغل عدي قمت بتطبيق نفس الخطوات لكن الاخر نفس المشكل

مشكور اخي طه تم اخيرا حل المشكل بهدا الكود لتغيير الفاصلة الى نقطة

Private sub text1_change
Text1=replace(text1,",",".")
End sub

استخدم هذا الكود
Text2.text=CDEC(text1.text)