10 lines
181 B
Text
10 lines
181 B
Text
Public Sub Main()
|
|
Dim siCount As Short
|
|
|
|
For siCount = 1 To 10
|
|
Print siCount;
|
|
If siCount <> 5 And siCount <> 10 Then Print ",";
|
|
If siCount = 5 Then Print gb.NewLine;
|
|
Next
|
|
|
|
End
|