添加了类模块,其中定义了这个方法:
Public Sub InitByTime(ByVal strY As String, ByVal strM As String)程序中这样用:
dim objenergy as new clsenergy
objenergy.InitByTime(cstr(year(now)),cstr(month(now)))
但是写完第二句时,提示编译错误:缺少'='之前我还定义了其他的类,其中有类似的方法,只是只有一个参数而已,用时却没什么问题啊
Public Sub InitByTime(ByVal strY As String, ByVal strM As String)程序中这样用:
dim objenergy as new clsenergy
objenergy.InitByTime(cstr(year(now)),cstr(month(now)))
但是写完第二句时,提示编译错误:缺少'='之前我还定义了其他的类,其中有类似的方法,只是只有一个参数而已,用时却没什么问题啊
解决方案 »
- 求《Visual Basic6编程技术大全》这本书的配套光盘源代码
- 菜请教,怎样在DataGrid控件中进行查询?
- 如何让程序停一下
- 您好.我想问个数组排序问题[处男贴~]
- 哪个函数是取得时间数值的日期部分,比如1986-12-20 17:08:30转换为1986-12-20
- 如何实现用键盘控制SSTAB控件
- 请教在TREEVIEW控件的NODECLICK事件中如何判断单击结点的是左键还是右键?如何判断双击?
- 求救:调用dll出现如下错误:“实时错误:‘48’,找不到文件:storage.dll"
- 菜单上的横线是怎样加入的?
- :如何根据已建立数据库的标准表结构,创建打开保存新的工作表(VB6)?
- 请教隐藏的问题
- 一个字符查找程序
改为
objenergy.InitByTime cstr(year(now)),cstr(month(now))
或者
call objenergy.InitByTime(cstr(year(now)),cstr(month(now)))
如果你不获取返回值来调用某个方法,不要添加参数列表最外层的括号,或者在调用前加上 call
我还试了把参数改成byref的,也不行。