MrDogbert
Messages postés133Date d'inscriptionjeudi 26 octobre 2000StatutMembreDernière intervention20 juillet 20041 25 févr. 2003 à 23:45
Private Sub Form_Load()
set TreeView1.Nodes(1).Tag = Form1
set TreeView1.Nodes(2).Tag = form2
End Sub
Private Sub TreeView1_Click()
TreeView1.SelectedItem.Expanded = True - TreeView1.SelectedItem.Expanded
End Sub
Private Sub TreeView1_DblClick()
TreeView1.SelectedItem.Tag.show
End Sub
Dans le Form_Load je dis que je place un pointeur vers les forms dans les différents noeuds donc qd je fais .tag.show je fais appel a la methode .show de la fenetre
qd je fais ...Expanded true - ...Expanded je dis en fait que si ..Expanded true alors ...Expanded = true - true = false et inversement