منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - خانات الآحاد والعشرات والمئات ... الخ

السلام عليكم

كيف حالكم ؟؟

احتاج مساعدتكم في كود لإضافات خانات او فواصل الآحاد والعشرات والمئات ....

مثلا من هذا الرقم 5680123 إلى هذا الرقم 5,680,123

PHP كود :

Text1.Text = Format(Text1.Text, "00,000.00") 

اهلا وسهلا أخي الكريم

هذا الكود ضبط مع الارقام الكبيرة من 10000 فما فوق

ولكن مع الارقام الصغيرة مثلا 100 فيظهر بهذا الشكل 00,100
ومع رقم 25 يظهر بهذا الشكل 00,025

هل يوجد مايحذف الاصفار التي قبل الفاصلة

وشاكر لك مرورك الكريم

PHP كود :

Dim b As String
b = Text1.Text
Text1.Text = FormatCurrency(CDbl(b), "00,000.00") 

ألف شكر لك أخي الكريم

ضبط الكود مئة بالمئة

PHP كود :

Text1.Text = Format(Text1.Text, "##,###.00") 

الحمد الله و الشكر الله .

كذلك هذا الكود افضل وممتاز جداً

ولك مني الشكر الجزيل

اضافة الى ما قدمه الاخ / عاصم مشكوراً

جرب التالي

كود :

Text1.Text = Format(Val(Text1.Text), "0,0.00")

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

أبو عقيل

asemshahen5

أبو عقيل

asemshahen5

أبو عقيل

asemshahen5

أبو عقيل

sendbad100