以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  关于强制变量声明  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=73854)

--  作者:wukong_32
--  发布时间:2015/1/2 14:28:40
--  关于强制变量声明

给下面的代码,增加强制变量声明,但是总是报错,错误信息:“ 缺少语句”

baidu上查询半天,不知道什么原因

试过Option Explicit on 和 Option Explicit

 

Option Explicit on
\'Option Explicit

 

Sub APPLICATION_VBAStart()
 call Application.SetTimer(1,5*1000)
 call Application.SetTimer(2,10*1000)
End Sub

\'定时器事件
Sub APPLICATION_Timer(ID)   

  MsgBox "当前时间2:"&now
 if id=2 then 
  MsgBox "当前时间:"&now
    end if

end sub


此主题相关图片如下:3.jpg
按此在新窗口浏览图片
[此贴子已经被作者于2015/1/2 14:28:58编辑过]

--  作者:guotx2010
--  发布时间:2015/1/2 15:35:20
--  
Option Explicit 语句不支持的,如果要强制变量定义,在选项中找到VBA强制变量定义
--  作者:wukong_32
--  发布时间:2015/1/3 19:38:39
--  

收到,谢谢!