主题：KillTimer(ID)执行时会提示类型不匹配

写了这样的一个宏

Sub IfQQ()
 call Application.SetTimer(0,5000) '创建一个0号定时器，间隔时间5秒
End Sub

Sub APPLICATION_Timer(ID)
    If ID=0 then    
     c

     Msgbox content
     KillTimer(ID)           
    end if
end sub

在执行KillTimer(ID)时提示错误“类型不匹配”，请问怎么样改。

还有就是在编辑时能不能编译出错误，不用等到执行时才报错？