02-12-13, 10:43 AM
السلام عليكم و رحمة الله و بركاته,
تفضل أخي:
تفضل أخي:
كود :
If count Mod 2 = 0 Then
MsgBox "الرقم زوجي."
Else
MsgBox "الرقم فردي."
End If