第一次有vb，多多帮助小弟，高手请进，谢谢！

Question

我想问一下，象论坛里左边的树型结构怎么编程，用什么控件？还是有什么好一点的方法？
主要是要有前面的加，减号，谢谢

Answer 1

vb中有控件treeview
网页中你可以用google搜一下树型菜单有很多例子。

Answer 2

我怎么在vb中没找到treeview控件啊，还有，能帮我做出来，分可以再给啊

Answer 3

在左方工具条上右击鼠标，选部件，然后选控件页，在列表中的microsoft windows common controls,你可以在左方找到treeview，呵呵。祝好运。

Answer 4

VB6.0  英文版
按CTRL+T,弹出Commponet框选microsoft windows common controls5.0(sp2) 或者microsoft windows common controls6.0(sp4)都可以,确定后,到工具栏找吧.

Answer 5

Private Sub Form_Load()
   Dim nodX As Node
   Set nodX = TreeView1.Nodes.Add(,,"R","Root")
   Set nodX = TreeView1.Nodes.Add("R", tvwChild,"C1","Child 1")
   Set nodX = TreeView1.Nodes.Add("R", tvwChild,"C2","Child 2")
   Set nodX = TreeView1.Nodes.Add("R", tvwChild,"C3","Child 3")
   Set nodX = TreeView1.Nodes.Add("R", tvwChild,"C4","Child 4")
   nodX.EnsureVisible
   TreeView1.Style = tvwTreelinesText 
   TreeView1.BorderStyle = vbFixedSingle
End SubPrivate Sub Form_Click()
   Dim i As Integer
   Dim strNodes As String
   For i = 1 To TreeView1.Nodes.Count
   strNodes = strNodes & TreeView1.Nodes(i).Index & " " & _
   "Key: " & TreeView1.Nodes(i).Key & " " & _
   "Text: " & TreeView1.Nodes(i).Text & vbLF
   Next i
   MsgBox strNodes
End Sub

Answer 6

代码中
TreeView1.Style = tvwTreelinesText 去掉
把控件的LineStyle选1
Style选2,3,6,7都可以

Answer 7

看MSDN，查TreeView，里面有Example。