主题：再问一个VBA问题 如何在窗体里使用SETtime

我使用在FUNCTION里做了一个时间触发的程序 我想用到窗体里 我在窗体里有一个按钮，想按一下按钮就开始按时间循环，但是SUB里不能放SUB，那我想放在代码的最上面，然后我在按钮的SUB里调用APPLICATION_VBAStart()和APPLICATION_Timer(ID)，好像达不到我想要的效果，这个窗体载入的时候就被调用了APPLICATION_VBAStart()和APPLICATION_Timer(ID)，而不是在我按按钮的时候。。。谢谢高手

还是不行，APPLICATION_VBAStart()的代码就只有，我拷贝到这个按钮里去了,APPLICATION_Timer(2)里的代码我放在最上面

Sub xxx_CommandButton1_Click()

if xxx_CheckBox7.value=true then
call Application.SetTimer(2,5000)
APPLICATION_Timer(2)
end if

end sub

好像还是不行，如果我把APPLICATION_Timer(2)里的代码也放入这个按钮的话就按时间循环了。。