langs a-z
This commit is contained in:
parent
db842d013d
commit
d066446780
11389 changed files with 98361 additions and 1020 deletions
15
Task/FizzBuzz/Visual-Basic-.NET/fizzbuzz.visual
Normal file
15
Task/FizzBuzz/Visual-Basic-.NET/fizzbuzz.visual
Normal file
|
|
@ -0,0 +1,15 @@
|
|||
Sub Main()
|
||||
|
||||
For i = 1 To 100
|
||||
If i Mod 15 = 0 Then
|
||||
Console.WriteLine("FizzBuzz")
|
||||
ElseIf i Mod 5 = 0 Then
|
||||
Console.WriteLine("Buzz")
|
||||
ElseIf i Mod 3 = 0 Then
|
||||
Console.WriteLine("Fizz")
|
||||
Else
|
||||
Console.WriteLine(i)
|
||||
End If
|
||||
Next
|
||||
|
||||
End Sub
|
||||
Loading…
Add table
Add a link
Reference in a new issue