如何在自己建的模块里使用UserControl里的控件?

[zhl1015]

以前做的EXE,在其他自己建的模块里可以Form1.Inet1这样调用,现在想把EXE做成ActiveX,所以挪了所有的界面元素和模块

可是在模块里居然不能UserControl1.Inet这样调用了,这是为什么啊?要怎么做啊?大家帮帮忙~~谢谢了~~

[大王派我去巡山]

封装成接口吧，没有别的办法。

[zhl1015]

怎么封装接口啊，大哥,是啥意思,我不太会VB啊,给个例子吧.就差这一步了

[zhl1015]

UserControl:
Public Property Get MyText() As Variant
Set MyText = Text1
End Property

Private Sub Command1_Click()
Module1.test
End Sub

Module:
Public Sub test()
Dim a As UserControl1
a.MyText.Text = "fdsfds"
End Sub

大哥,不成啊~~

[zhl1015]

我现在也有点理解为什么不行了~~~
但是还不知道解决的方法.

现在我就是做了一个EXE的VB程序,想把它放到IE中去用,在网上跑,这要怎么做啊?

[韧恒]

没太明白你的意思，不过感觉好像你这个“UserControl1.Inet”中的引用Usercontrol1有点问题。

[zhl1015]

回songyaowu: 就是UserControl1.Inet有问题啊,引用不了,我问的就是怎么能引用

回dlyme: 怎么封装接口啊?帮忙啊~~

[fante2007]

把这个UserControl生成.ocx文件，然后再用regsvr32 写进注册表，以后再用的时候就可以像其它控件一样引用了

[大王派我去巡山]

Public Property Get MyInet() As Variant
    Set MyInet = Inet1
End Property

UserControl的代码里加进去这个属性接口.

然后UserControl1.MyInet，这样用.