一、Excel添加treeview控件
如果是以VBA中為窗體添加,菜單:工具->附加控件,從中選擇“Microsoft TreeView Control”;
在控件工具箱中點(diǎn)擊其它控件,從中選擇“Microsoft TreeView Control”。
二、treeview控件加載菜單:
●TreeView控件是以樹形結(jié)構(gòu)顯示數(shù)據(jù)的控件。利用TreeView控件,可以設(shè)計(jì)出樹形結(jié)構(gòu)圖,便于用戶選擇不同的項(xiàng)目。
●要使用TreeView控件,需要首先將其添加到控件工具箱,控件名稱為“Microsoft TreeView Control 6.0(p4)”。
使用TreeView控件時(shí)應(yīng)注意的幾點(diǎn):
●在TreeView控件中添加節(jié)點(diǎn)的方法是使用Add方法,即Set NewNode=TreeView1.Nodes.Add(字符串1,節(jié)點(diǎn)參數(shù),字符串2,字符串3)。
這里“NewNode”是用戶定義的Node對象變量;
1.“字符串1”表示添加的節(jié)點(diǎn)是同級節(jié)點(diǎn)還是子節(jié)點(diǎn)。如果省略表示添加的節(jié)點(diǎn)是同級節(jié)點(diǎn),如果設(shè)置了字符串1,表示添加的是子節(jié)點(diǎn);
2.“節(jié)點(diǎn)參數(shù)”為添加節(jié)點(diǎn)類別的參數(shù),如果添加的節(jié)點(diǎn)是同級節(jié)點(diǎn),則該參數(shù)值為tvwNext,如果添加的節(jié)點(diǎn)是子節(jié)點(diǎn),則該參數(shù)值為tvwChild;
3.“字符串2”表示添加節(jié)點(diǎn)的名稱,通過它可以對該節(jié)點(diǎn)進(jìn)行操作和訪問;
4.“字符串3”表示添加節(jié)點(diǎn)的標(biāo)題,也就是TreeView控件中的文字。
●展開TreeView控件節(jié)點(diǎn)的方法是將Expanded屬性設(shè)置為True,即TreeView1.Nodes(i).Expanded=true.
如果要收縮節(jié)點(diǎn),則要將Expanded屬性設(shè)置為False,即TreeView1.Nodes(i).Expanded=False.
●把節(jié)點(diǎn)與節(jié)點(diǎn)之間的“樹線”顯示出來的方法是將LineStyle屬性設(shè)置為tvwTreeLine,即TreeView1.LineStyle=tvwTreeLine。
●讀取TreeView控件節(jié)點(diǎn)數(shù)量的方法是使用Count屬性,即n=TreeView1.Nodes.count。
●讀取TreeView控件標(biāo)題文本的方法是使用Text屬性,即MyText=Treeview1.Nodes(i).text,其中,Nodes(i)為TreeView控件的第i個(gè)節(jié)點(diǎn),i為節(jié)點(diǎn)的索引值。
●判斷節(jié)點(diǎn)是否被選中的方法是使用Selected屬性,即TreeView1.Nodes(i).selected,如果選中某節(jié)點(diǎn),則selected屬性為True, 反之則返回False。
●刪除節(jié)點(diǎn)的方法是使用Remove方法,即TreeView1.Nodes.Remove TreeView1.SelectedItem.Index,這里Remove方法的唯一參數(shù)是TreeView1.SelectedItem.Index,表示被選中的待刪除節(jié)點(diǎn)的Index值。