[發問] 想問如何觸發TreeView的命令?

StanleyVic

各位太太好.
本人在Userform 建立了一個TreeView, 及一個 Textbox1.
現在TreeView1的代碼己經定義好了,但我想當我點擊子目錄時, textbox1.value可以出現子目錄的名稱.
請問我該如何做呢?

我開始以為這樣就可以..但報錯..,請指教.
Private Sub TreeView1_Click()
TextBox1.Value = Treeview1.item.value.
End Sub


Private Sub UserForm_Initialize()
Dim nodX As Node
With Me.TreeView1
    With .Nodes
        .Add , , "L1", "Root"
            .Add "L1", tvwChild, "L11", "1"
            .Add "L1", tvwChild, "L12", "2"
                .Add "L11", tvwChild, "L111", "3"
                .Add "L12", tvwChild, "L121", "4"
                .Add "L12", tvwChild, "L122", "5"
            
       ' .Add , , "L2", "Stanley"
        
        .Item("L122").EnsureVisible
        .Item("L111").EnsureVisible
    End With
    .Style = tvwTreelinesPlusMinusText
End With
End Sub

uf023630

將Treeview.item 改成 selectedItem 這樣就可以了

1. Private Sub TreeView1_DblClick()
   
2. TextBox1.Value = TreeView1.SelectedItem.Text
   
3. End Sub

複製代碼

c_c_lai

回復 2# uf023630
請教一下，在執行時出現型態為定義 (Node)，
是哪兒須加定義？  謝謝你！

StanleyVic

回復 2# uf023630


    HOHO~謝謝你的提醒..真是當局者迷!!^^

uf023630

回復 3# c_c_lai
工具--設定引用項目--將 " Microsoft Windows Common Controls 6.0 (SP6)" 勾選即可

c_c_lai

回復  c_c_lai
工具--設定引用項目--將 " Microsoft Windows Common Controls 6.0 (SP6)" 勾選即可
uf023630 發表於 2013-12-2 13:03

Microsoft Windows Common Controls 6.0 (SP6) MISSING!
(找不到呢！)

c_c_lai

回復 5# uf023630
作業系統我是使用 Win7, 以及
Office 2010 版本。

GBKEE

回復 7# c_c_lai
2003 Microsoft Windows Common Controls 6.0 (SP6) 也找不到ㄚ但.
如圖1

下載 (118.34 KB)

2013-12-2 16:55

執行一次表單,在圖2就出現

下載 (111.97 KB)

2013-12-2 16:55

c_c_lai

回復 8# GBKEE
感謝！ 終於知道如何建置了，再次言謝！

下載 (68.36 KB)

2013-12-2 17:26

下載 (57.96 KB)

2013-12-2 17:27

c_c_lai

回復 1# StanleyVic
如 uf023630 大大所言，將Treeview.item 改成 selectedItem 就可以了。

1. Private Sub TreeView1_Click()
   
2.     TextBox1.Value = TreeView1.SelectedItem.Text
   
3. End Sub

複製代碼