I know nothing but I would have thought you would code it something like this

private sub cmdCommand1_click()
dim i as integer
for i = 1 to 99
print i
i=i+1
next i
end sub