/source/43870-classe-liste-de-fichier-recursive
Cacalex en fait si, si tu donne un chemin qui n'existe pas ou auquel tu n'as pas accés, dir() va retourner une chaine vide et donc on zap la suite, déja testé sur des chemin réseaux ;o) Pour les optimisations suivantes je vais lancer la recherche dans un thread et lever un evenement lors de la fin de la recherche, comme ca je laisse ...
/source/26620-la-vie-application-3-lois-de-john-h-conway-1969
'******************************* On affiche la vie 'Form1.gfx.Cls '** Efface le screen gfx '** On affiche les cellules For X = 1 To 100 For Y = 1 To 100 If vie(X, Y) = 1 Then If Form1.gfx.Point(X * 2, Y * 2) &HFF& Then Form1.gfx.ForeColor = &HFF& Form1.gfx.PSet (X * 2, Y * ...
/source/23299-creer-un-group-de-control-comme-en-vb6
Voila ma nouvelle version - Je definie Public Tab(10) As Control dans la partie declaration global de mon formulaire - Une fonction qui alimente mon tableau d'objet For Nav = 0 To 10 Tab(Nav) = New Label Controls.Add(Tab(Nav)) Tab(Nav).Top = 50 + Nav * 15 Tab(Nav).Left = 50 ...
En effet, par contre je bute pour gerer les evenements d'un membre du tableau specifiquement, des idées?
Je crois que j'ai quelque chose qui se rapproche + de ce qui existait dans VB6 - Je definie Public Tab_label(10) As Control dans la partie declaration global de mon formulaire - Une fonction qui alimente mon tableau d'objet For Nav = 0 To 10 Tab(Nav) = New Label Controls.Add(Tab(Nav)) Tab(Nav)...