Good Coding with ElseIF

[James D Jarvis]

Or maybe use Select Case?

Code: (Select All)

For i = 1 To 15
    a$ = Str$(i)
    Select EveryCase i
        Case Is > 5
            a$ = a$ + " " + Str$(i * 2)
        Case Is > 10
            a$ = a$ + " " + Str$(i * 3)

    End Select
    Print a$
Next i