Dim nn As Node
Dim RootID(0 To 2) As Integer, BranchID(0 To 2) As Integer
Set nn = Form1.smartTreeView1.Nodes.Add(, , , "Root01")
RootID(0) = nn.Index
Set nn = Form1.smartTreeView1.Nodes.Add(, , , "Root02")
RootID(1) = nn.Index
Set nn = Form1.smartTreeView1.Nodes.Add(, , , "Root03")
RootID(2) = nn.Index
着是我在 form2里的一个按钮得代码 可是提示错误 未找到方法或者数据成员
要怎么才可以解决呢
还有TOOLBAR 中有两个按钮 怎么才可以定义他按得方法呢 ? 我按第一个按钮 form2.show
Dim RootID(0 To 2) As Integer, BranchID(0 To 2) As Integer
Set nn = Form1.smartTreeView1.Nodes.Add(, , , "Root01")
RootID(0) = nn.Index
Set nn = Form1.smartTreeView1.Nodes.Add(, , , "Root02")
RootID(1) = nn.Index
Set nn = Form1.smartTreeView1.Nodes.Add(, , , "Root03")
RootID(2) = nn.Index
着是我在 form2里的一个按钮得代码 可是提示错误 未找到方法或者数据成员
要怎么才可以解决呢
还有TOOLBAR 中有两个按钮 怎么才可以定义他按得方法呢 ? 我按第一个按钮 form2.show
Set nn = Form1.smartTreeView1.Nodes.Add(, , "Root01", "Root01")
'工具栏选项
Select Case Button.index
Case 1
form2.show
End Select
End Sub看msdn就行,什么都有
'设置 Treeview 控件属性。
TreeView1.LineStyle = tvwRootLines ' Linestyle 1 '添加 Node 对象。
Dim nodX As Node '声明 Node 变量。
'带有文本 'Root' 的第一个节点。
Set nodX = TreeView1.Nodes.Add(, , "r", "Root") '下一个节点是节点 1 ("Root") 的子节点。
Set nodX = TreeView1.Nodes.Add("r", tvwChild, "child1", "Child")End Sub