13-04-21, 01:14 AM
13-04-21, 06:08 AM
(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