Ekteki dosyayı çalıştırınca Form1 kodu içindeki Private Sub treeyap(Tv)sub içinde "TreeView1.Nodes.Add(ALT2, 4, treekey, "(" & Rst("techizat_kod") & ") " & Rst("techizat_adi"), 3).Expanded = False" olan yerde hata veriyor. Sizin en son eklediğiniz treeview.rar dosyasından ekteki dosyanın farkı tablo içerikleri. Şimdiki tablonun basamak sayısı artmış oldu. Dolayısıyla Sub treeyap(Tv) içinde Alt3 değişkenine ilave olarak Alt4 değişkenini ilave ettim. Ancak ekteki programı bir türlü çalıştıramıyorum.