تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] دالة ياخذ الكسر فقط
#1
بسم الله الرحمن الرحيم
الاخوة الافاضل في المنتدى سئالي هو هل يوجد دالة او طريقة تاخذ الكسر فقط مثال على ذلك اذا كان الرفم 2.8 اثنين وثمانية من عشرة اريد الدالة تاخذ الثامنية من عشرة فقط من غير الرقم الصحيح رقم 2
الله المستعان
الرد }}}
تم الشكر بواسطة:
#2
حقيقا لا توجد دالة صريحة تقوم بعمل ذلك

بل يمكنك عمل معادلات رياضية

او تحويل الرقم الى نص ومعالجته ثم ارجاعه الى رقم .. كلها حلول يمكنك اتباعها


كتبت دالة على السريع تقوم باستعمال مبدا تحويل الرقم الى نص ثم استعمال spilt واخذ الرقم الي مابعد الفاصلة :-

PHP كود :
Private Sub Form1_Load(sender As ObjectAs EventArgsHandles MyBase.Load

        MsgBox
(GetDecimalNumber(23.4546))  'output : 4546'

    
End Sub

    
''' <summary>
    ''' 
دالة استخراج الارقام العشرية من الاعداد
    
''' </summary>
    ''' 
<param name="number">الرقم المراد استخراج الارقام العشرية منه</param>
    
''' <returns></returns>
    ''' 
<remarks></remarks>
    Public Function 
GetDecimalNumber(ByVal number As Double) As Integer

        Dim StringNumber 
As String number.ToString().Split("."c).Last()
        Return 
Integer.Parse(StringNumber)

    
End Function 
الرد }}}
تم الشكر بواسطة: Mahmoud Taha , السندبااد
#3
PHP كود :
private void button1_Click(object senderEventArgs e)
        {
            
MessageBox.Show(GetDecimalPart(13.894).ToString()); // Output: 0.894
        
}

        public 
double GetDecimalPart(double num)
        {
            return 
num Math.Truncate(num);
        } 
الرد }}}
تم الشكر بواسطة:
#4
اخي الكريم ... انا الي بعرفو انو التكست بالفجوال بيعطي الفاصلة بدون اي كود ولكن تكتب الاكواد لكي تحول رقم الفاصلة الى اقرب رقم .
الرد }}}
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم