Imports System Public Class MainClass Shared Sub Main(ByVal args As String()) Dim loopCounter As Single For loopCounter = 0.5 To 9 Step 0.5 Console.WriteLine("loopCounter: {0}", loopCounter) Next End Sub End Class