Imports System public class MainClass Shared Sub Main() Dim counter As Integer For counter = 1 To 100 Console.Write("{0} ", counter) If counter Mod 10 = 0 Then Console.WriteLine(vbTab & counter) End If Next counter End Sub End Class