hur.cn - 华软网

 热门搜索

简单的treeview问题,在线等

  作者:未知    来源:网络    更新时间:2018/4/16
简单的treeview问题

以前没有用过treeview  请问如何实现

+全部
  -第一
  -第二
  -第三
  -第四

这样的最简单的treeview结构

打对50分全给

------华软网友回答------
再附送一级:

long ll_lev1, ll_lev2 ,ll_lev3
treeviewitem l_tv1

tv_list.PictureHeight = 32

tv_list.PictureWidth = 32

ll_lev1 = tv_list.InsertItemFirst(0,"全部",1)
il_1 = ll_lev1
tv_list.GetItem(il_1, l_tv1)
il_2 = handle(l_tv1)

ll_lev2 = tv_list.InsertItemLast(ll_lev1,"第一",2)

ll_lev3 = tv_list.InsertItemLast(ll_lev2,"第一 - 1", 3)

tv_list.ExpandItem(ll_lev2)

ll_lev2 = tv_list.InsertItemLast(ll_lev1,"第二",2)

ll_lev2 = tv_list.InsertItemLast(ll_lev1,"第三",2)

ll_lev2 = tv_list.InsertItemLast(ll_lev1,"第四",2)

tv_list.ExpandItem(ll_lev1)
------华软网友回复------

------华软网友回复------
如果点击“第一”弹出窗口怎么写啊! 有点笨了

请留下你的QQ好吗

我的是81007251
------华软网友回复------
在TREEVIEW的CLICKED事件中写:

TreeViewItem ltvi_current

This.GetItem(handle, ltvi_current)
messagebox("您点击了:",ltvi_current.Label)

------华软网友回复------
一般都是用DataStore + For...配合添加树的结点
------华软网友回复------
TreeViewItem ltvi_current

tv_1.GetItem(handle, ltvi_current)

if ltvi_current.Label = "养护人基本情况" then


open(w_yhrjbzlcx)

end if

为什么我这么写打不开窗口
------华软网友回复------
应该可以打开窗口,你确认LABEL与你条件相符合吗?      
华软声明:本内容来自网络,如有侵犯您版权请来信指出,本站立即删除。