我想请问是否有人会用TreeView控件作出像csdn.net社区这样效果的(即,左边用树型结构,点击哪个节点,右边就有相应的内容出现。)
谢谢各位大虾们了,小妹是新手,很急的要的。
帮帮我吧!!!!!!!!!!!!!!!!!
谢谢各位大虾们了,小妹是新手,很急的要的。
帮帮我吧!!!!!!!!!!!!!!!!!
解决方案 »
- 如何让VB正确的识别“YY-MM-DD”格式的日期
- MDI主窗体关闭问题,有满意答案马上结贴,顶者有分
- 在VB中为什么SUM函数用法有问题?急等
- 请问如何读取数据库表中的字段名?
- 紧急情况,初次用VsFlex控件遇到的问题?
- 我子在VBA编程操作EXCEL时,遇到“运行时错误‘1004’,不能取得类Range的specialcell属性”的错误,如何解决呀?
- recordset 的find怎么用啊
- 如何制作一个右键快捷菜单
- ##这个语句为什么在win98里不行正确定执行(紧急!)
- 大家帮忙看一个这个程序,是怎么回事。
- 请问有知道要响应listview里item的双击应该怎么做吗?给点帮助啊
- 如何解决LoadPicture速度慢的问题
C/S方式下很容易实现,可以查看MSDN找帮助,里面有实例
如果B/S方式下,恐怕你贴错地方了
TreeView1.LineStyle = tvwRootLines ' Linestyle 1
Private Sub Form_Load()
'設定 Treeview 控制項屬性。
TreeView1.LineStyle = tvwRootLines ' Linestyle 1 '新增 Node 物件。
Dim nodX As Node '宣告 Node 變數。
'第一個節點帶有文字 'Root' 。
Set nodX = TreeView1.Nodes.Add(, , "r", "MSHFlexGrid")
Set nodX = TreeView1.Nodes.Add(, tvwNext, "rdf", "test")
'下一個節點是節點 1 ("Root") 的子節點。
Set nodX = TreeView1.Nodes.Add("r", tvwChild, "child1", "form1")
Set nodX = TreeView1.Nodes.Add("r", tvwChild, "child2", "form2")
end sub
Private Sub TreeView1_DblClick()
Dim a As Node
With TreeView1
Set a = .SelectedItem
MsgBox a.Text end with
end sub