for i=30 to 1 step -1 为什么不能执行

[softjo]

private sub form_click()
dim i as byte
for i=30 to 1 step -1
msgbox "这是第"&i&"回合"
next i
end sub
我在执行该程序时出现溢出的错误！
请帮我解决，谢谢up有分

[3661512]

试试dim i as long

[trtror]

dim i%

[Qthinker]

byte 型不行，integer和long double,singer
都可以