我写了个数据库连接的web自定义控件请问如何动态加载到其他的.VB文件的代码中？

Question

Connection.ascx.vb的主要代码如下：Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim myConnection As SqlClient.SqlConnection
        Dim conn As String = ConfigurationSettings.AppSettings("connectionStringPublish") '在此处放置初始化页的用户代码
        myConnection = New SqlClient.SqlConnection(conn)
        myConnection.Open()End Sub

Answer 1

Private Sub getNewNews()
        uc1 Connection = (uc1)LoadControl("Connection.ascx")
        Dim sql = "SELECT * FROM tbInfo"
        Dim myCommand As SqlClient.SqlDataAdapter
        myCommand = New SqlClient.SqlDataAdapter
        myCommand.SelectCommand = New SqlClient.SqlCommand(sql, myConnection) '在此处放置初始化页的用户代码
    End Sub这样写还是没载进来，不知道还缺少什么东西没写。