如题,有2个窗口 form1,form2 一个类 class
inte1_StateChanged 这是窗口"form2"中的 inte1控件(又名Internet Transfer 控件)的事件, 我想把它返回到一个类"class"中 ,程序运行的顺序是 "form1" 执行类"class"中方法
form1:
Set zx = New class
call zx.clStatus
class:
Public Sub clStatus()
Set clform = New form2
clform.inte1.Execute "http://baidu.com", "GET" '开始下载
'问题在这里了我想在这里获取"form2"中的 inte1控件的StateChanged事件
End Sub
inte1_StateChanged 这是窗口"form2"中的 inte1控件(又名Internet Transfer 控件)的事件, 我想把它返回到一个类"class"中 ,程序运行的顺序是 "form1" 执行类"class"中方法
form1:
Set zx = New class
call zx.clStatus
class:
Public Sub clStatus()
Set clform = New form2
clform.inte1.Execute "http://baidu.com", "GET" '开始下载
'问题在这里了我想在这里获取"form2"中的 inte1控件的StateChanged事件
End Sub
在"form2"中的 inte1控件的StateChanged事件里面,改变这个变量的值,然后在使用的地方判断值如果是调用该事件里面的过程代码的话,把"form2"中的 inte1控件的StateChanged事件 前面的Private改成Public
然后直接调用过程的名字即可