منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] ازاي اعرف العدد الصحيح - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] ازاي اعرف العدد الصحيح (/showthread.php?tid=38280)



ازاي اعرف العدد الصحيح - حسن الجلب - 13-04-21

السلام عليكم
عايز كود يتحقق من العدد الصحيح أو العشري


RE: ازاي اعرف العدد الصحيح - messry - 13-04-21

(13-04-21, 01:14 AM)حسن الجلب كتب : السلام عليكم
عايز كود يتحقق من العدد الصحيح أو العشري

وعليكم السلام

كود :
Dim num1 As Double
       If Double.TryParse(TextBox1.Text, num1) Then
           Dim num2 As Double
           num2 = num1 Mod 1
           If num2 = 0 Then
               ‘ هذا رقم صحيح
           Else
               ‘ هذا رقم عشري
           End If
        Else
           ‘        هذا ليس رقم
       End If