注册 登录
编程论坛 VB6论坛

第一次接触VB中标准模块的问题

g414161696 发布于 2012-08-21 11:06, 2049 次点击
没找到关于标准模块的资料,都是跟类模块的对比,我就耐心看了看类模块的解释,最后还是有点云里雾里,所以现在直接来找人求教标准模块的应用。
如下面的例子(我比较喜欢用例子反推,学起来简单):
窗体中有一个command按钮,窗体代码是:
Private Sub Command1_Click()
Call acc
End Sub

Private Sub Form_Load()
End Sub

我添加一个模块,双击模块,在通用里面如下代码:
Sub acc()
Print "a="
End Sub


运行后,提示我 “没有适当的对象,方法无效”
弱智问题,求解释!
2 回复
#2
风吹过b2012-08-21 14:53
Print "a="

命令参数是:
obj.print
当此命令在窗口中执行时,省略 obj 时,使用 ME 这个对象。
当在 模块中 执行时,省略 obj 时,报错。

在模块中需要引用对象时,建议以给参数的形式进行调用。
Private Sub Command1_Click()
Call acc(me)          '把 me 这个对象传递过去。
End Sub

---------
Sub acc(obj as form1)  '仅接受 form1 窗体对象
obj.Print "a="
End Sub
#3
ppzpph2012-09-15 07:30
一般在模块里不进行对对象的操作,放置一些函数,定义什么的。
1