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

نسخة كاملة : هل يوجد دالة تعرض المئات والعشرات الموجودة في الرقم
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله وبركاته
هل توجد دالة تعرض مئات الرقم مثلا
(fun_name(354

فيكون الناتج 3
وكذلك داله لاظهار العشرات والاحاد
شكرا
السلام عليكم ورحمة الله وبركاته
تفضل أخي الكريم

كود :
Dim Number As Double = 2541543.58
        ' للمئات
        MsgBox(Strings.Right(Math.Floor(Number / 100).ToString, 1))
        ' للعشرات
        MsgBox(Strings.Right(Math.Floor(Number / 10).ToString, 1))
        ' للآحاد
        MsgBox(Strings.Right(Math.Floor(Number).ToString, 1))

بالتوفيق
Good Solution Mr.Sooriaty03