TreeView
Private Sub Command1_Click()
Dim m As Integer, n As Integer
Dim tNode As Node
For m = 1 To 5
Set tNode = TreeView1.Nodes.Add(, , CStr(m), CStr(m))
For n = 1 To 4
Set tNode = TreeView1.Nodes.Add(CStr(m), tvwChild, CStr(n), CStr(n))
Next
Next
End Sub
第四行为什么老报错,说"无效关键字"
[此贴子已经被作者于2006-2-28 13:59:02编辑过]