做treeview时遇到问题！

xxxlls

在一个叫test的库存表中有id 、parentid 、text 三个字段

Dim Rec As New ADODB.Recordset
    Dim stRecQL As String
    Dim i As Integer
    Dim oNode As Node
    Set oNode  = TreeView.Nodes.Add(, 0, “顶”, "库存")
    oNode .Sorted = True
    Rec.Open "test", CurrentProject.Connection, adOpenKeyset, adLockOptimistic, adCmdTableDirect
    For i = 0 To Rec.RecordCount - 1
        Set oNode  = TreeView.Nodes.Add(Rec.Fields("parentid"), tvwChild, Rec.Fields("id") , Rec.Fields("text"))
        oNode .Sorted = True
        Rec.MoveNext
    Next
    Rec.Close
问题一：
   Set oNode  = TreeView.Nodes.Add(, , “顶”, "库存")可以通过本句，换成
  Set oNode  = TreeView.Nodes.Add(, 0, “1”, "库存") 时不能通过 1 是文本。
问题二：
测试到了 Set oNode  = TreeView.Nodes.Add(Rec.Fields("parentid"), tvwChild, Rec.Fields("id") , Rec.Fields("text"))
不能通过，说非法key.

[ 本帖最后由 xxxlls 于 2007-9-29 20:04 编辑 ]

wuaza

http://www.office-cn.net/forum.p ... ;highlight=%2Bwuaza

wuaza

几个月不来，发现自己变成论坛元老了。

yjs_ks

路过，学习学习，顶一个。

xxxlls

那第二个问题呢？？？

[ 本帖最后由 xxxlls 于 2007-9-29 22:01 编辑 ]

白河寒秋

附件怎么下不下来呢？感觉没有老论坛方便了