تحديد عدد الارقام بعد الفاصلة العشرية

[Hasan-hasan]

السادة المشرفين الاساتذة الكرام حياكم الله 

كيف يمكن تحديد عدد الارقام بعد الفاصلة العشرية في الليست بوكس 

في ملف الاكسل ذهبت الى الخيار تخصيص واخترت التنسيق رقمين بعد الفاصلة العشرية 

لكن في الفورم تظهر داخل الليست بوكس ارقام كثيرة بعد الفاصلة 

[أ / محمد صالح]

هذا يعتمد على طريقة بنائك لعناصر القائمة ليست بوكس

أثناء إضافة العناصر إليها يمكنك التحكم في تنسيق القيم الموجودة في الخلايا مثلا بهذه الصورة

Dim i As Integer
For i = 1 To 10
    ListBox1.AddItem Format(Cells(i, 1).Value, "0.00")
Next i

هذا الكود يقوم بإضافة الخلايا من A1:A10 إلى القائمة وتنسيق الرقم بها إلى رقمين عشريين

بالتوفيق

[Hasan-hasan]

كل الشكر والتقدير للأستاذ محمد صالح