添加了类模块,其中定义了这个方法:
Public Sub InitByTime(ByVal strY As String, ByVal strM As String)程序中这样用:
dim objenergy as new clsenergy
objenergy.InitByTime(cstr(year(now)),cstr(month(now)))
但是写完第二句时,提示编译错误:缺少'='之前我还定义了其他的类,其中有类似的方法,只是只有一个参数而已,用时却没什么问题啊

解决方案 »

  1.   

    objenergy.InitByTime(cstr(year(now)),cstr(month(now)))
    改为
    objenergy.InitByTime cstr(year(now)),cstr(month(now))
    或者
    call objenergy.InitByTime(cstr(year(now)),cstr(month(now)))
    如果你不获取返回值来调用某个方法,不要添加参数列表最外层的括号,或者在调用前加上 call
      

  2.   

    objenergy.InitByTime cstr(year(now)),cstr(month(now))
      

  3.   

    大家说的这个写法我也试过的,提示说语句未结束我刚才把那个方法改成一个参数的试了一下,就可以了,但改回来就又不行了
    我还试了把参数改成byref的,也不行。