How to write the program to find the even and odd number between 1-100 and the number that can be divided by 3 and 5 at the same time in VB

How to write the program to find the even and odd number between 1-100 and the number that can be divided by 3 and 5 at the same time in VB

Find odd and even numbers:
For i = 1 to 100
If i/2 i\2 Then
MSG = MSG & I & is odd
Else
MSG = MSG & I & is even
Next i
Print msg
It can be divisible by 3 and 5 simultaneously
For i = 1 to 100
If i/3 = i\3 And i/5 = i\5 Then
MSG = MSG & I & "divisible by both 3 and 5"
Else
MSG = MSG & I & "cannot be divisible by 3 and 5 at the same time"
End If
Next i
Print msg