Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim ds As New Data.DataSet()
        Dim CN As New SqlConnection()
        Try
            '初始化连接字符串
            CN.ConnectionString = "data source=xie;initial catalog=scm2;persist security info=False;user id=sa;Password=;"
            CN.Open()
            Dim adp As SqlDataAdapter = New SqlDataAdapter("select * from tbTree", CN)
            adp.Fill(ds)
            Me.ViewState("ds") = ds
        Catch ex As Exception
#If DEBUG Then
            Session("Error") = ex.ToString()
            Response.Redirect("error.aspx")        '̀跳转程序的公共错误处理页面
#End If
        Finally
            '关闭连接
            CN.Close()
        End Try
        '调用递归函数,完成树形结构的生成
        AddTree(0, Nothing)
    End Sub'递归添加树的节点
    Private Sub AddTree(ByVal ParentID As Integer, ByVal pNode As TreeNode)
        Dim ds As Data.DataSet
        ds = Me.ViewState("ds")
        Dim dvTree As New Data.DataView()
        dvTree = New Data.DataView(ds.Tables(0))
        '过滤ParentID,得到当前的所有子节点
        dvTree.RowFilter = "PARENTID = " + ParentID.ToString        Dim Row As Data.DataRowView
        For Each Row In dvTree
            Dim Node As New TreeNode()
            If pNode Is Nothing Then  '判断是否根节点
                '添加根节点
                Node.Text = Row("ConText").ToString()
                TreeView1.Nodes.Add(Node)
                Node.Expanded = True
                '再次递归
                AddTree(Int32.Parse(Row("ID").ToString()), Node)
            Else
                '̀添加当前节点的子节点
                Node.Text = Row("ConText").ToString()
                pNode.Nodes.Add(Node) '问题在这,提示Nodes不是"System.Web.UI.WebControls.TreeNode" 的成员
                Node.Expanded = True
                '再次递归
                AddTree(Int32.Parse(Row("ID").ToString()), Node)
            End If
        Next
   End Sub请问各位兄弟,  错误:pNode.Nodes.Add(Node) '问题在这,提示Nodes不是"System.Web.UI.WebControls.TreeNode" 的成员
该怎么处理?谢谢!
QQ:88981904