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

نسخة كاملة : تنسيق الخلايا بالليست فيو ؟
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
بسم الله الرحمن الرحيم
السلام عليكم

كيف لي ان اقوم بتنسيق الخلايا التي تحمل ارقام، ودلك حتى يسهل قراءة تلك الارقام
اي
3500
تكون 3،500

وهكدا

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

تفضل أخي الكريم هذه طريقة لعمل ذلك

كود :
For Each LVI As ListViewItem In ListView1.Items
       LVI.SubItems.Item(1).Text = FormatNumber(LVI.SubItems.Item(1).Text)
       LVI.SubItems.Item(2).Text = FormatNumber(LVI.SubItems.Item(2).Text)
       LVI.SubItems.Item(3).Text = FormatNumber(LVI.SubItems.Item(3).Text)
Next

بالتوفيق
الف شكر
اخي Sooriaty
على اجابتك

تم تجربة الكود، وعمل بنجاح
ولكن

هل بالامكان تعديل الكود السابق بحيث يكون تنسيق الرقم على النحو التالي
5،600

وليس على النحو
5،600.00


اي يدون الفواصل العشرية

والف شكر
يمكنك إزالة الأصفار بإضافة صفر في نهاية دالة الفورمات :

كود :
For Each LVI As ListViewItem In ListView1.Items
            LVI.SubItems.Item(1).Text = FormatNumber(LVI.SubItems.Item(1).Text, 0)
            LVI.SubItems.Item(2).Text = FormatNumber(LVI.SubItems.Item(2).Text, 0)
            LVI.SubItems.Item(3).Text = FormatNumber(LVI.SubItems.Item(3).Text, 0)
        Next
الف شكر
اخي
Kslawy

بارك الله فيك وبأمثالك