12 lines
237 B
Text
12 lines
237 B
Text
|
For i As Integer = 1 To 100
|
||
|
|
If i Mod 3 = 0 And i Mod 5 = 0 Then
|
||
|
|
Print("FizzBuzz")
|
||
|
|
ElseIf i Mod 3 = 0 Then
|
||
|
|
Print("Fizz")
|
||
|
|
ElseIf i Mod 5 = 0 Then
|
||
|
|
Print("Buzz")
|
||
|
|
Else
|
||
|
|
Print(Str(i))
|
||
|
|
End If
|
||
|
|
Next
|