VB不同窗体的控件名传递问题

Question

在编一个小程序玩但遇到一个问题，简单点说就是
有3个FORM，分别为main，f_Lbcx，f_cbxx。f_Lbcx，f_cbxx有adodc控件
f_lbcx中的为adodc1；f_cbxx中的为adodc1和adodc2。希望在main里编辑函数
Public Sub SJKChuShiHua(names As Form,adodcs As Adodc, adoconnstr)
names.Adodcs.ConnectionString = adoconnstr
End Sub
对不同窗体的不同adodc控件的ConnectionString进行赋值，但是在执行Call main.SJKChuShiHua(Me, Adodc1, main.adoconnstr)时确发现adodc1没有传递过去还是怎么了，一直报错，但将sub里的赋值函数改为names.Adodc1.ConnectionString = adoconnstr可以正常运行，但却不是我的目的，我还准备用他对f_cbxx.adodc2进行赋值呢，盼解决方法

Answer 1

Call main.SJKChuShiHua(Me, Adodc1, main.adoconnstr)
在那里？

Answer 2

想用函数SJKChuShiHua（）实现可以对不同窗体下不同adodc.ConnectionString进行初始化的功能
比如对f_Lbcx中的adodc1可以调用Call main.SJKChuShiHua(f_Lbcx, Adodc1, main.adoconnstr)
f_cbxx中的adodc2可以调用Call main.SJKChuShiHua(f_cbxx, Adodc2, main.adoconnstr)实现
ps:adoconnstr这个字符串是个public 在main中定义的

Answer 3

Call main.SJKChuShiHua(Me, Adodc1, main.adoconnstr)
这个是在f_Lbcx的load里 所以我用了me代替 

Answer 4

Call main.SJKChuShiHua(f_Lbcx.Adodc1, main.adoconnstr)
Public Sub SJKChuShiHua(adodcs As Adodc, adoconnstr)
    Adodcs.ConnectionString = adoconnstr
End Sub