子程序不能是form(对象)的属性,只能是方法。属性和方法的设置很简单,参见下面代码: (在form1中) Public aaa as String '属性aaa Public bbb as integer '属性bbb …… Public Sub abcd(parm1 as string, parm2 as string) '方法abcd …… End Sub使用(form1之外):form1.aaa = xxx xxx=form1.aaacall form1.abcd(p1,p2) '要带上括号 form1.abcd pa, p2 '不要括号
将其定义为公用的,就可以在任何时候调用了如:call form1.abcd()
鼠标右键点击在“工程”窗口内,选择“添加”——“模块”……
把你的Sub abcd()放在模块里,一定要用public。
如果放在某个form中,就采用楼上的做法。
但如何设计成form1的属性?能否用代码给我表示出来.
(在form1中)
Public aaa as String '属性aaa
Public bbb as integer '属性bbb
……
Public Sub abcd(parm1 as string, parm2 as string) '方法abcd
……
End Sub使用(form1之外):form1.aaa = xxx
xxx=form1.aaacall form1.abcd(p1,p2) '要带上括号
form1.abcd pa, p2 '不要括号
但如果form1没有调用就没有作用吗?
大家一起来说说.....
Public property let aaa()
……