RosettaCodeData/Task/Even-or-odd/Xojo/even-or-odd.xojo
2023-07-01 13:44:08 -04:00

7 lines
142 B
Text

For num As Integer = 1 To 5
If num Mod 2 = 0 Then
MsgBox(Str(num) + " is even.")
Else
MsgBox(Str(num) + " is odd.")
End If
Next