PDA

View Full Version : سوال: کمک در مورد tree view



oliya24
پنج شنبه 13 آبان 1389, 16:46 عصر
سلام دوستان کسی میتونه در مودرد تری ویو من رو کمک کنه که چطور میتونم اطلاعات رو توش

بنویسم و2 چیز خیلی مهم یکی انکه اطلاعات رو از تکست باکس بگیره و یکی دیگه هم اینکه

امکان سرچ داشته باشه ممنون میشم اگه من رو در این 3 مورد کمک کنید

Hossis
جمعه 14 آبان 1389, 05:24 صبح
اما در مورد سؤال اول
sub AddNodes
dim nd ,Nod as treenode
for I=0 to 5
nod=tv.nodes.add(textbox1.text)
for j=0 to 6
nd=nod.nodes.add(textbox2.text)
next
next
end if

Hossis
جمعه 14 آبان 1389, 05:31 صبح
اما در مورد سوآل دوم(سرچ)


sub getnodes(txt as string)
for each node as treeNode in tv.nodes
if node.text=txt then list1.items.add(txt)
call getchilds(node)
next
end sub

sub getchilds(node as treenode)
for each Node as treenode in node.nodes
if node.text=txt then list1.items.add(txt)
getchilds(node)
next
end sub