Etienne BAUDOUX

Forum sur les projets de Etienne BAUDOUX


problème dans une fonction [RESOLU]

Partagez
avatar
polien


Masculin Nombre de messages : 2871
Age : 21
Localisation : Bouches du Rhones
Emploi/loisirs : velo, informatique, électronique, robotique, modélisme feroviaire
Humeur : Je commence tout mais ne finit rien :P
Date d'inscription : 19/05/2011

problème dans une fonction [RESOLU]

Message par polien le Ven 18 Mai 2012 - 14:04

Bonjour,

Au cours de mon projet sur le jeu CLICCLICCLIC (voir vos créations et vos plugins) j'ai plusieurs fonction qui comuniquent entrent elles.

Néammoint j'ai des erreur que je ne comprend pas:
Code:
Error === Line 746, Column 0, Error BC30043
Description : 'Me' est valide uniquement dans une méthode d'instance.


Error === Line 753, Column 0, Error BC30043
Description : 'Me' est valide uniquement dans une méthode d'instance.


Error === Line 760, Column 0, Error BC30043
Description : 'Me' est valide uniquement dans une méthode d'instance.


Error === Line 767, Column 0, Error BC30043
Description : 'Me' est valide uniquement dans une méthode d'instance.


Error === Line 784, Column 0, Error BC42025
Description : Accès d'un membre partagé, d'un membre de constante, d'un membre enum ou d'un type imbriqué via une instance ; l'expression qualifiante ne sera pas évaluée.






'------------------------------------------------------------------------------
' <auto-generated>
'    Ce code a été généré par un outil.
'    Version du runtime :4.0.30319.269
'
'    Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si
'    le code est régénéré.
' </auto-generated>
'------------------------------------------------------------------------------
[...]
    Public Class Fenêtre1
       
        'Fonction Form_Load
        'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:Form_Load
        Public Sub Form_Load(ByVal sender As Object, ByVal e As System.EventArgs)
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:|actionname:Commentaire
            'Cette fonction se déclenche à l'ouverture de la fenêtre.
            '
            'This function is launched during opening.
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:zn0ley48b2iaihankdwaggkthrs39a2yy6np5p75a3lc61bpvv4kb2qxjg8j3bp1w747ry0mujvmh3d9gw4twbqgh952m94d4trguvx94kqgo8rtmm3cwns1kuro5lf93a6xnvm22oisnaiioygxx3|actionname:Ajouter une valeur à une variable tableau
            couleurs.Add("Jaune")
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:zn0ley48b2iaihankdwaggkthrs39a2yy6np5p75a3lc61bpvv|actionname:Ajouter une valeur à une variable tableau
            couleurs.Add("Oranges")
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:wrouavlheqphp8bo8mldn2gryyhr14gyhppy5v8w93f698qaso|actionname:Ajouter une valeur à une variable tableau
            couleurs.Add("Vert")
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:1jxsg7gcn8pmwlkfrbhj125cks1pvzc4iqg4zb1ttyv2wu26zg|actionname:Ajouter une valeur à une variable tableau
            couleurs.Add("Bleu")
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:roox3uazfhetr89glrn8io5hw54ru7iwd3slwuq9wcxtx0c9rk|actionname:Ajouter une valeur à une variable tableau
            couleurs.Add("Gris")
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:6ww6qc7p6cvti7qh33jn34u36zrj2meb5e3kt36ipm1c6t8q6e|actionname:Ajouter une valeur à une variable tableau
            couleurs.Add("Violet")
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:xif3neqe8ce6vr9sw8j77cgn71kc0lolxq1oq7a34ynclo52bc|actionname:Ajouter une valeur à une variable tableau
            couleurs.Add("Marron")
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:1jxsg7gcn8pmwlkfrbhj125cks1pvzc4iqg4zb1ttyv2wu26zglum3344bq500rn4uwraud7t72krbx6f8wpn4lle2n7j57jyhdahrgrxi6343qw3vd3lkqutghogbt42dnthln4z7rh4cuk1dr96s|actionname:Ajouter une valeur à une variable tableau
            couleurs.Add("Bleu")
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:umlmz4tfa4bs2mkf4uyoeugtc820qb39t9zron9qn7kccuelnx7fd0l3u19r59mpazm56c7xkwhe0r98rpaplhdfpiau9t5fd1yumwkjaxkf58r19lnif3bjjehq83utqcmwfpgxyhej2qbzhfefbs|actionname:Ajouter une valeur à une variable tableau
            couleurs.Add("Rouge")
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:zn0ley48b2iaihankdwaggkthrs39a2yy6np5p75a3lc61bpvvuvxui79fkuz5mcuz9avflf2djmsgmdomscqqtdkrgi2wmh39pax8lqlkh8wogul2ddkrh0grp4h92chf710pm38srl2aejzfdlz4|actionname:Ajouter une valeur à une variable tableau
            couleurs.Add("Oranges")
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:ifzw4lynua88jlg8kis742am2jwnqgenh6telzx9kv9nhrv2sn3g9xzyfsevb0rrzjh6ft59f5j6eipwmfa8qey1bshn23i1o8b7|actionname:Ajouter une valeur à une variable tableau
            couleurs.Add("Jaune")
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:wrouavlheqphp8bo8mldn2gryyhr14gyhppy5v8w93f698qasopcf4igrf3n1fsbio632ztmzic5i6znwbqzempm37o21wx8x8cdmde4bnqm00s7rpyddiscaiu9nirxd7l5y8eiunydsm3ai6n0rc|actionname:Ajouter une valeur à une variable tableau
            couleurs.Add("Vert")
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:wrouavlheqphp8bo8mldn2gryyhr14gyhppy5v8w93f698qasopcf4igrf3n1fsbio632ztmzic5i6znwbqzempm37o21wx8x8cdmde4bnqm00s7rpyddiscaiu9nirxd7l5y8eiunydsm3ai6n0rcd1zx0q6r5dqr19wccbn9f1zb7w5n2y9p7y3t1306tqfgpuxjv7lq1yui3p2r4kzukgr7oyy1ayqhmzoroigohlwgzsfqwakqwaq1|actionname:Ajouter une valeur à une variable tableau
            couleurs.Add("Rouge")
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:zn0ley48b2iaihankdwaggkthrs39a2yy6np5p75a3lc61bpvvuvxui79fkuz5mcuz9avflf2djmsgmdomscqqtdkrgi2wmh39pax8lqlkh8wogul2ddkrh0grp4h92chf710pm38srl2aejzfdlz46odwytcvqwdh62w5p8aoawykag5xm9lcciqc06xnwv5apll5k45qeu9a7auy53196q5vjo4v174nrw7n1hm5qeyzi6ubtloognq1|actionname:Ajouter une valeur à une variable tableau
            couleurs.Add("Gris")
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:zn0ley48b2iaihankdwaggkthrs39a2yy6np5p75a3lc61bpvvuvxui79fkuz5mcuz9avflf2djmsgmdomscqqtdkrgi2wmh39pax8lqlkh8wogul2ddkrh0grp4h92chf710pm38srl2aejzfdlz46odwytcvqwdh62w5p8aoawykag5xm9lcciqc06xnwv5apll5k45qeu9a7auy53196q5vjo4v174nrw7n1hm5qeyzi6ubtloognq107jj15f6psbsyqvdocsn70bk5j8r8ipathwptybay2ok0342ogcb3we9eragbm89kcudazvlwewyurfn3ib14d9u5zkun0edzj1m|actionname:Ajouter une valeur à une variable tableau
            couleurs.Add("Marron")
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:zn0ley48b2iaihankdwaggkthrs39a2yy6np5p75a3lc61bpvvuvxui79fkuz5mcuz9avflf2djmsgmdomscqqtdkrgi2wmh39pax8lqlkh8wogul2ddkrh0grp4h92chf710pm38srl2aejzfdlz46odwytcvqwdh62w5p8aoawykag5xm9lcciqc06xnwv5apll5k45qeu9a7auy53196q5vjo4v174nrw7n1hm5qeyzi6ubtloognq1chanzom3n61qcads6y1xn1ow5pf0fu3fwqpxknjvjh1tuk4o8yv2elbpn9gfc3ovv10z34afg1lfz69o4lyosk4a65md4yhy7l6c|actionname:Ajouter une valeur à une variable tableau
            couleurs.Add("Violet")
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:yimwf7l5bxafmkvghkg0nf5ue4kjmtl5248wx2u1upo7r4ehcyaok87eic4wh0xwcaas2etzfplheewx0g2m50nyxu6zfregj5pvvswsnz1opzrkv5lei6y9cnm4ltgl9lddlrj07jr1sec6uyv9vcbzd2nigyp9xugzurr2xzwgndcgrzzcy2agux1d9rxicxzvuzl2xz6lok6p5zvwtee5w6du18cr92hikkn1dgfqakoeau9s18v1av|actionname:Démarrer un Minuteur
            Me.timer1.Start
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:optvt4ied4sw7xnlncc15ykfwrvg8xfxjqw5aur1gzm2xf2ul0|actionname:Démarrer un Minuteur
            Me.timer3.Start
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:boavk234de1hq1c9m0340xs2dxuv67m01o45v1n1luaypzpfcc|actionname:Modifier la valeur d'une variable
            Score = CInt(0)
            'project:Fenêtre_vierge1|function:Form_Load|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:9ergv463vrallq53pdrueacgw4227bimuea9c0ufhtf64xlmzg|actionname:Modifier une propriété d'un contrôle
            Me.pictureBox2.ImageLocation = "" & System.Windows.Forms.Application.StartupPath & "\artifice_011.gif"
        End Sub
       
        'Fonction kryptonButton1_Click
        'project:Fenêtre_vierge1|function:kryptonButton1_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:kryptonButton1_Click
        Public Sub kryptonButton1_Click(ByVal sender As Object, ByVal e As System.EventArgs)
            'project:Fenêtre_vierge1|function:kryptonButton1_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:9scu663jkogqdf12ovpxbe6xolzds8man10iu6z49p9xabkm4a|actionname:Quitter l'application
            System.Windows.Forms.Application.Exit
        End Sub
       
        'Fonction timer1_Tick
        'project:Fenêtre_vierge1|function:timer1_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:timer1_Tick
        Public Sub timer1_Tick(ByVal sender As Object, ByVal e As System.EventArgs)
            'project:Fenêtre_vierge1|function:timer1_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:aatkjas29cjcwl6gyofd9xvtrwbn18jv1g8q3m56jdoax2ij7i|actionname:Commandes Visual Basic.Net
Dim Random As New Random()
couleursortie = Random.Next(0, 1000)
            'project:Fenêtre_vierge1|function:timer1_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:cd6157cswra0qk5c46otgsw7l1lcrtbudwoaq3pw75jhevhiz0|actionname:Calcul
            couleursortie = System.Math.Truncate((16 * CInt( couleursortie )) / 1000)
            'project:Fenêtre_vierge1|function:timer1_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:tk5g6ug3nhhfnmu0d34xcbv0omjxya4tyi4z555kpsa1ub4m3gixgd06k2ps2s7nwyksr3l1jkv5h2q3ckwhthle83xefuer9xr1|actionname:Obtenir une valeur dans une variable tableau
            couleursortie = couleurs(couleursortie)
            'project:Fenêtre_vierge1|function:timer1_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:gg1m64c684ynxggmvdud69h63x0jyb4483n0ll8fwewgrf96m5|actionname:Si ... Alors ... Sinon
            If (couleursortie = "" & Me.Bleu.Name & "") Then
                'project:Fenêtre_vierge1|function:timer1_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:1zuu9dq04mqds2dwz0e1d7oc39hghwveihgqm8bgq08msl2wyg|actionname:Modifier une propriété d'un contrôle
                Me.pictureBox1.BackColor = System.Drawing.Color.FromArgb(255, 3, 3, 252)
            Else
                'project:Fenêtre_vierge1|function:timer1_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:qd74vwzpb46cdchbn2vu5qtb7g8r8egq8vw8tb7wfqaqrfgpfq|actionname:Si ... Alors ... Sinon
                If (couleursortie = "" & Me.Rouge.Name & "") Then
                    'project:Fenêtre_vierge1|function:timer1_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:1zuu9dq04mqds2dwz0e1d7oc39hghwveihgqm8bgq08msl2wygjcyj9rm7mvpxo5z0ihkmbniomdmwq5h8czx2nufpen4qg7mtey|actionname:Modifier une propriété d'un contrôle
                    Me.pictureBox1.BackColor = System.Drawing.Color.FromArgb(255, 252, 3, 21)
                Else
                    'project:Fenêtre_vierge1|function:timer1_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:ou2b4e9fxh0nlsnpxl7nt1102j7mate5mmuhv7f7mma67thlyagq4xeyfxfwv6g1zlwj9qzz26k64j18y3f5ut88sjh6wrd1yyzq|actionname:Si ... Alors ... Sinon
                    If (couleursortie = "" & Me.Vert.Name & "") Then
                        'project:Fenêtre_vierge1|function:timer1_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:1zuu9dq04mqds2dwz0e1d7oc39hghwveihgqm8bgq08msl2wygpom7mfddxzburz8pwpuvma8k0c4wjqkvpf6a7zueevqdwdj0lj|actionname:Modifier une propriété d'un contrôle
                        Me.pictureBox1.BackColor = System.Drawing.Color.FromArgb(255, 3, 252, 44)
                    Else
                        'project:Fenêtre_vierge1|function:timer1_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:w82lff2rk065y1d8fic78hw898bb5emau027521gsk67i5loqn|actionname:Si ... Alors ... Sinon
                        If (couleursortie = "" & Me.Jaune.Name & "") Then
                            'project:Fenêtre_vierge1|function:timer1_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:1zuu9dq04mqds2dwz0e1d7oc39hghwveihgqm8bgq08msl2wygo5cghexsikyhe29wtadwh0olvz4wqhlm5wsrkxq3lfznb8w4hf|actionname:Modifier une propriété d'un contrôle
                            Me.pictureBox1.BackColor = System.Drawing.Color.FromArgb(255, 243, 252, 3)
                        Else
                            'project:Fenêtre_vierge1|function:timer1_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:myx5faz59tytkoz4x0iwjosvhihbyzn9x12vwvg52vdogg61vf94zpkf8qrgo229qtywnrid3zcga9f354wolv18mbmysqowrl48|actionname:Si ... Alors ... Sinon
                            If (couleursortie = "" & Me.Oranges.Name & "") Then
                                'project:Fenêtre_vierge1|function:timer1_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:1zuu9dq04mqds2dwz0e1d7oc39hghwveihgqm8bgq08msl2wygdqnpf8nxh384mx2h4rxzb90rrpp8f251a1si0pyh9fdxajc5fx|actionname:Modifier une propriété d'un contrôle
                                Me.pictureBox1.BackColor = System.Drawing.Color.FromArgb(255, 248, 179, 13)
                            Else
                                'project:Fenêtre_vierge1|function:timer1_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:zqbeffao9b394jcwyiwzijw1trzob936xdzoniq78wnexs352t|actionname:Si ... Alors ... Sinon
                                If (couleursortie = "" & Me.Gris.Name & "") Then
                                    'project:Fenêtre_vierge1|function:timer1_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:1zuu9dq04mqds2dwz0e1d7oc39hghwveihgqm8bgq08msl2wygyaccfwi9zsetkab9ahw6pzhhmp0hy6xu2mhd13brjrjfslkykf|actionname:Modifier une propriété d'un contrôle
                                    Me.pictureBox1.BackColor = System.Drawing.Color.FromArgb(255, 188, 188, 197)
                                Else
                                    'project:Fenêtre_vierge1|function:timer1_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:6p5myrourcc5m1rk8kdfyktwak5c90ql016oendpgh6vpjw5n3nvpzm0ta4zkfngvhqsi17od40m4mx8vs4vkvjpz0pkim2kvl0p|actionname:Si ... Alors ... Sinon
                                    If (couleursortie = "" & Me.Violet.Name & "") Then
                                        'project:Fenêtre_vierge1|function:timer1_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:1zuu9dq04mqds2dwz0e1d7oc39hghwveihgqm8bgq08msl2wygyktoetc08rrsr1ltdevkdstvgvo70o133y7t6x1dsfod3y1mng|actionname:Modifier une propriété d'un contrôle
                                        Me.pictureBox1.BackColor = System.Drawing.Color.FromArgb(255, 214, 3, 252)
                                    Else
                                        'project:Fenêtre_vierge1|function:timer1_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:gf6cf3pqjf2sglxyizd8a4q6muh8rsy8tuf3i7ix4bl0jmsk5s|actionname:Si ... Alors ... Sinon
                                        If (couleursortie = "" & Me.Marron.Name & "") Then
                                            'project:Fenêtre_vierge1|function:timer1_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:1zuu9dq04mqds2dwz0e1d7oc39hghwveihgqm8bgq08msl2wygypuv8wu94bhz28yepqvdysmhl629qt2j7qui4ncj1agd3n9wbp|actionname:Modifier une propriété d'un contrôle
                                            Me.pictureBox1.BackColor = System.Drawing.Color.FromArgb(255, 158, 89, 28)
                                        End If
                                    End If
                                End If
                            End If
                        End If
                    End If
                End If
            End If
        End Sub
       
        'Fonction Rouge_Click
        'project:Fenêtre_vierge1|function:Rouge_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:Rouge_Click
        Public Sub Rouge_Click(ByVal sender As Object, ByVal e As System.EventArgs)
            'project:Fenêtre_vierge1|function:Rouge_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:04rt92kldis0poztvzxss1uckpzgrpijtzj3rtep6rekb7fosx|actionname:Si ... Alors ... Sinon
            If (couleursortie = "" & Me.Rouge.Name & "") Then
                'project:Fenêtre_vierge1|function:Rouge_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:2tck311uju3ihkmxa8oua6a7ezmw2ovjfzsfx3zptf470xhmebxkltg1ifmoaxsad00qke5pc37fqnik58vokzlj42m4n3xbrk1k|actionname:Calcul
                Score = CInt( Score ) * 2
                'project:Fenêtre_vierge1|function:Rouge_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:wbcd7liahniw80r7a08q79p0s7siwlkfpoykow5olq0muoek7i|actionname:Modifier une propriété d'un contrôle
                Me.label3.Text = "" & Score & ""
                'project:Fenêtre_vierge1|function:Rouge_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:6nd291ro2m2nynsze558dgo61h2vmkazxws8f0bz7ucqofov5p|actionname:Obtenir une propriété d'un contrôle
                coordelem = Me.Rouge.Location
                'project:Fenêtre_vierge1|function:Rouge_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:8hvz3233wepfg4ohgugdlciqx8kygaihv05hs8jpwsdpnht731|actionname:Modifier une propriété d'un contrôle
                Me.pictureBox2.Location = coordelem
                'project:Fenêtre_vierge1|function:Rouge_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:35uedmlw2ant7cgoxh1ewbi4hzmlk2qojnf6iwkgog5g2hmdiu|actionname:Exécuter une fonction d'un projet
                Me.animation()
            End If
        End Sub
       
        'Fonction Violet_Click
        'project:Fenêtre_vierge1|function:Violet_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:Violet_Click
        Public Sub Violet_Click(ByVal sender As Object, ByVal e As System.EventArgs)
            'project:Fenêtre_vierge1|function:Violet_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:04rt92kldis0poztvzxss1uckpzgrpijtzj3rtep6rekb7fosxnv8oj30td3zn4dz4liqm2hau5ee9xbw8tg8bnk6u0k5g3cbc64|actionname:Si ... Alors ... Sinon
            If (couleursortie = "" & Me.Violet.Name & "") Then
                'project:Fenêtre_vierge1|function:Violet_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:2tck311uju3ihkmxa8oua6a7ezmw2ovjfzsfx3zptf470xhmebnalg0kredrxswcyr169z9zh9v7r3siuvb0u8gq17ctrczu2l6u|actionname:Calcul
                Score = CInt( Score ) * 2
                'project:Fenêtre_vierge1|function:Violet_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:wbcd7liahniw80r7a08q79p0s7siwlkfpoykow5olq0muoek7iq00v1s2w9dseokyy1msms7ih83nvyjkhfkbxalpl2boi5wsqxc7se4hhrzawacnnofyfgyzrn67xtreg4ihevpl8a7drbbjlwluf|actionname:Modifier une propriété d'un contrôle
                Me.label3.Text = "" & Score & ""
                'project:Fenêtre_vierge1|function:Violet_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:6nd291ro2m2nynsze558dgo61h2vmkazxws8f0bz7ucqofov5p1febsksvzikyuu2ck08ubpbj0qnea9ovgab329gwu61phgpw6t09hlcw490x1y9xdwb6lxiuu50zhe823r167crl458cxik1zghx|actionname:Obtenir une propriété d'un contrôle
                coordelem = Me.Violet.Location
                'project:Fenêtre_vierge1|function:Violet_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:8hvz3233wepfg4ohgugdlciqx8kygaihv05hs8jpwsdpnht731n5mbrdepnl60qhihgdwczmuoy5bpnxk56gz25nchih74ltmth0ksow3xhx334hldv0y7xt0j8634trc0jznmtgohnvuw23aok75v|actionname:Modifier une propriété d'un contrôle
                Me.pictureBox2.Location = coordelem
                'project:Fenêtre_vierge1|function:Violet_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:35uedmlw2ant7cgoxh1ewbi4hzmlk2qojnf6iwkgog5g2hmdiun4ucuscgrfg0c3ogfxuwn2j3fut8df76slozlhgkaagefcdt100saldia0ismxuw4d6eijjs2al5x7m8gnco5gpo88tjabhqe7ma|actionname:Exécuter une fonction d'un projet
                Me.animation()
            End If
        End Sub
       
        'Fonction Vert_Click
        'project:Fenêtre_vierge1|function:Vert_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:Vert_Click
        Public Sub Vert_Click(ByVal sender As Object, ByVal e As System.EventArgs)
            'project:Fenêtre_vierge1|function:Vert_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:04rt92kldis0poztvzxss1uckpzgrpijtzj3rtep6rekb7fosxwq9l7qt95ju5wd8umm8qiodmzu95ioqs9ii175orgvrr1wwu0n|actionname:Si ... Alors ... Sinon
            If (couleursortie = "" & Me.Vert.Name & "") Then
                'project:Fenêtre_vierge1|function:Vert_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:2tck311uju3ihkmxa8oua6a7ezmw2ovjfzsfx3zptf470xhmeb0cqmyctaeuvou4rkxwh4cym3ochoh92ck1uumf5q18b2vprzf4|actionname:Calcul
                Score = CInt( Score ) * 2
                'project:Fenêtre_vierge1|function:Vert_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:wbcd7liahniw80r7a08q79p0s7siwlkfpoykow5olq0muoek7if6zxgm1qnewqywdi4b299ekiypftiwnx5gwnwjryk4g3wai7z6|actionname:Modifier une propriété d'un contrôle
                Me.label3.Text = "" & Score & ""
                'project:Fenêtre_vierge1|function:Vert_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:6nd291ro2m2nynsze558dgo61h2vmkazxws8f0bz7ucqofov5p1j69q15cr8x53mz8e9ipv2m5nxn0tvpkobkk5tpohul004buiqrqmv68jd1qqnxzczmzccr3rfv1avjf8urf0rwg7ddg5v1ammgd|actionname:Obtenir une propriété d'un contrôle
                coordelem = Me.Vert.Location
                'project:Fenêtre_vierge1|function:Vert_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:8hvz3233wepfg4ohgugdlciqx8kygaihv05hs8jpwsdpnht731gk94243kyj0qlpvqgq7yhogx9oxdi6vq7b7n8zz15kn1eb1igtjpuhi4v1gwtbet6bkx7grqytudlfn8l3zkn24nia2z0wotsopv|actionname:Modifier une propriété d'un contrôle
                Me.pictureBox2.Location = coordelem
                'project:Fenêtre_vierge1|function:Vert_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:35uedmlw2ant7cgoxh1ewbi4hzmlk2qojnf6iwkgog5g2hmdiurdhmkhqkx9fxvnker2e9nkdqz0ljj2apn7paow65qceuhn63k0|actionname:Exécuter une fonction d'un projet
                Me.animation()
            End If
        End Sub
       
        'Fonction Oranges_Click
        'project:Fenêtre_vierge1|function:Oranges_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:Oranges_Click
        Public Sub Oranges_Click(ByVal sender As Object, ByVal e As System.EventArgs)
            'project:Fenêtre_vierge1|function:Oranges_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:04rt92kldis0poztvzxss1uckpzgrpijtzj3rtep6rekb7fosxcuvoc4nuf44oujylpcp53mz347k1l2a5jgi97znw9wy60sn4ej|actionname:Si ... Alors ... Sinon
            If (couleursortie = "" & Me.Oranges.Name & "") Then
                'project:Fenêtre_vierge1|function:Oranges_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:2tck311uju3ihkmxa8oua6a7ezmw2ovjfzsfx3zptf470xhmeb0zx52r8k91f9d702hqcpq018xvz7puiodhn9xcx73h5ys9b723|actionname:Calcul
                Score = CInt( Score ) * 2
                'project:Fenêtre_vierge1|function:Oranges_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:wbcd7liahniw80r7a08q79p0s7siwlkfpoykow5olq0muoek7iy3zfk75shvw42zf7vhbo6kg69zchjdgji9y4zspusagynl0k2w|actionname:Modifier une propriété d'un contrôle
                Me.label3.Text = "" & Score & ""
                'project:Fenêtre_vierge1|function:Oranges_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:6nd291ro2m2nynsze558dgo61h2vmkazxws8f0bz7ucqofov5pb1ygm42n273uyeugjj44p56lb1otkst5swgmckw0rblien0yxqe06kqxf4bxdswff4rui515qc1il45a7ul2vbrx33lid80gtf0q|actionname:Obtenir une propriété d'un contrôle
                coordelem = Me.Oranges.Location
                'project:Fenêtre_vierge1|function:Oranges_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:8hvz3233wepfg4ohgugdlciqx8kygaihv05hs8jpwsdpnht7319gdt1bce4wfy39zvv8yjjq8nt9w2dj0f5rfmqnruk2aflparw0gaf3arjh7ww0cye5uiphf8l6lbscxtvlroheueqlip1h3msu0p|actionname:Modifier une propriété d'un contrôle
                Me.pictureBox2.Location = coordelem
                'project:Fenêtre_vierge1|function:Oranges_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:35uedmlw2ant7cgoxh1ewbi4hzmlk2qojnf6iwkgog5g2hmdiux2wr7afmjp3dgqx1y2rnv3ndz9xeo5gfuz3evi79wuw4nx2pyw|actionname:Exécuter une fonction d'un projet
                Me.animation()
            End If
        End Sub
       
        'Fonction Jaune_Click
        'project:Fenêtre_vierge1|function:Jaune_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:Jaune_Click
        Public Sub Jaune_Click(ByVal sender As Object, ByVal e As System.EventArgs)
            'project:Fenêtre_vierge1|function:Jaune_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:04rt92kldis0poztvzxss1uckpzgrpijtzj3rtep6rekb7fosx0dvsy3pp6w7nhr4j6z6koogs4o6w6dil271q3vr7vgdim6qbon|actionname:Si ... Alors ... Sinon
            If (couleursortie = "" & Me.Jaune.Name & "") Then
                'project:Fenêtre_vierge1|function:Jaune_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:2tck311uju3ihkmxa8oua6a7ezmw2ovjfzsfx3zptf470xhmebtg1t5fkvunqy4pfm9by96hy51lowy5d95axl73zfph2o46u0ox|actionname:Calcul
                Score = CInt( Score ) * 2
                'project:Fenêtre_vierge1|function:Jaune_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:wbcd7liahniw80r7a08q79p0s7siwlkfpoykow5olq0muoek7i7ssn9te1o867druaj5hcm7lkn05uiwlgupc9rd4obbxlp36q6c|actionname:Modifier une propriété d'un contrôle
                Me.label3.Text = "" & Score & ""
                'project:Fenêtre_vierge1|function:Jaune_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:6nd291ro2m2nynsze558dgo61h2vmkazxws8f0bz7ucqofov5pya5k945nuug0hqksjx39k7s1up1wlf9ex8t6fm6suq1u1d272f6jbgcvvhdejxxgfdocn8y0qmvd9ta0ilgis2mnhl2bxb6jxdyi|actionname:Obtenir une propriété d'un contrôle
                coordelem = Me.Jaune.Location
                'project:Fenêtre_vierge1|function:Jaune_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:8hvz3233wepfg4ohgugdlciqx8kygaihv05hs8jpwsdpnht731nbvg5bvquss8y52z7z41u88t0lbubddo8omro8fb8d9fkfoeu65tvc5lkc5v8bsfx7cjhzsy0wk5ererdibkjczc9mc3wcdniu8h|actionname:Modifier une propriété d'un contrôle
                Me.pictureBox2.Location = coordelem
                'project:Fenêtre_vierge1|function:Jaune_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:35uedmlw2ant7cgoxh1ewbi4hzmlk2qojnf6iwkgog5g2hmdiuq12w43s647b4uct23skvoxc1wj1tc2axi9t8h8ilwb9i6rgat7|actionname:Exécuter une fonction d'un projet
                Me.animation()
            End If
        End Sub
       
        'Fonction Bleu_Click
        'project:Fenêtre_vierge1|function:Bleu_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:Bleu_Click
        Public Sub Bleu_Click(ByVal sender As Object, ByVal e As System.EventArgs)
            'project:Fenêtre_vierge1|function:Bleu_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:04rt92kldis0poztvzxss1uckpzgrpijtzj3rtep6rekb7fosxrdoqdy1rgkq9j2e5amf5csbk4j7s4oopbh4d1li7j6k5p7852a|actionname:Si ... Alors ... Sinon
            If (couleursortie = "" & Me.Bleu.Name & "") Then
                'project:Fenêtre_vierge1|function:Bleu_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:2tck311uju3ihkmxa8oua6a7ezmw2ovjfzsfx3zptf470xhmeb05sf7ypjhemhvlzoui5xanhpkba7nwbujozc2hmaq38r2d1mt4|actionname:Calcul
                Score = CInt( Score ) * 2
                'project:Fenêtre_vierge1|function:Bleu_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:wbcd7liahniw80r7a08q79p0s7siwlkfpoykow5olq0muoek7irxr3zatt6p5iopq6gb15hjnjloarj67hfj3r6xfec9ymf5aytz|actionname:Modifier une propriété d'un contrôle
                Me.label3.Text = "" & Score & ""
                'project:Fenêtre_vierge1|function:Bleu_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:6nd291ro2m2nynsze558dgo61h2vmkazxws8f0bz7ucqofov5pclflwfov5tiktod2e31utg4yr6w03shckb1iv6d3pkvs99fpv9if7z351nhp7u76mgy016b1nzs2g1ntafyhlqoj5d778dtgtf69|actionname:Obtenir une propriété d'un contrôle
                coordelem = Me.Bleu.Location
                'project:Fenêtre_vierge1|function:Bleu_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:8hvz3233wepfg4ohgugdlciqx8kygaihv05hs8jpwsdpnht731v887i46i1cj0cplw0r5et0kq6hhhn6bo7d01rzj8dwsly4t6tee6vpildw21ipevex94sp6ne8u0pdhcs74im3lsietmrkrrpy9k|actionname:Modifier une propriété d'un contrôle
                Me.pictureBox2.Location = coordelem
                'project:Fenêtre_vierge1|function:Bleu_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:35uedmlw2ant7cgoxh1ewbi4hzmlk2qojnf6iwkgog5g2hmdiufybgi91xrw0rn5yncg8ktl02kwsigq8wn0hl4j4kzq7opk1hs8|actionname:Exécuter une fonction d'un projet
                Me.animation()
            End If
        End Sub
       
        'Fonction Marron_Click
        'project:Fenêtre_vierge1|function:Marron_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:Marron_Click
        Public Sub Marron_Click(ByVal sender As Object, ByVal e As System.EventArgs)
            'project:Fenêtre_vierge1|function:Marron_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:04rt92kldis0poztvzxss1uckpzgrpijtzj3rtep6rekb7fosx8agrou6wr8l6f63269h4a2ma4plmoqkycxla0p136lqsh412rh|actionname:Si ... Alors ... Sinon
            If (couleursortie = "" & Me.Marron.Name & "") Then
                'project:Fenêtre_vierge1|function:Marron_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:2tck311uju3ihkmxa8oua6a7ezmw2ovjfzsfx3zptf470xhmebzbzt1tw1wz8zg6eptrooi3wvr7ar4atu79j7w9ebmw4fwibq5j|actionname:Calcul
                Score = CInt( Score ) * 2
                'project:Fenêtre_vierge1|function:Marron_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:wbcd7liahniw80r7a08q79p0s7siwlkfpoykow5olq0muoek7itcq54nrf45813d69ek93urfhyj1bvv486cyy3h5w1e0v8rl1os|actionname:Modifier une propriété d'un contrôle
                Me.label3.Text = "" & Score & ""
                'project:Fenêtre_vierge1|function:Marron_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:6nd291ro2m2nynsze558dgo61h2vmkazxws8f0bz7ucqofov5psgpj52bz8n80qe9qywkl2wyeu927rxsp3kh19zp6q5p6x7zeby9ayshoj4mgx3mxaycw8u5ozlr18atrmjx95djb98yjg6fdcho2|actionname:Obtenir une propriété d'un contrôle
                coordelem = Me.Marron.Location
                'project:Fenêtre_vierge1|function:Marron_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:8hvz3233wepfg4ohgugdlciqx8kygaihv05hs8jpwsdpnht73132xmnt6gw4j3213s56mb89pjl40rhz32q63v1g5zzkwo527x0zegk9i02egcd2sumevg900f6a8su8jszjqwvi9lm51oalgw92cm|actionname:Modifier une propriété d'un contrôle
                Me.pictureBox2.Location = coordelem
                'project:Fenêtre_vierge1|function:Marron_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:35uedmlw2ant7cgoxh1ewbi4hzmlk2qojnf6iwkgog5g2hmdiuoxb84nht5bge67dcl6py5qvtjl39k2azb4og0g6qmz5bjcqp4v|actionname:Exécuter une fonction d'un projet
                Me.animation()
            End If
        End Sub
       
        'Fonction Gris_Click
        'project:Fenêtre_vierge1|function:Gris_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:Gris_Click
        Public Sub Gris_Click(ByVal sender As Object, ByVal e As System.EventArgs)
            'project:Fenêtre_vierge1|function:Gris_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:04rt92kldis0poztvzxss1uckpzgrpijtzj3rtep6rekb7fosxef40y61ooija8xmarzlgfszvhsqo8gezskr7jhpicw8sbqrfv44bywt0xxz6dm63lbhez2pmrlmaslibys3fhue4m6gdsyh0jsy6|actionname:Si ... Alors ... Sinon
            If (couleursortie = "" & Me.Gris.Name & "") Then
                'project:Fenêtre_vierge1|function:Gris_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:2tck311uju3ihkmxa8oua6a7ezmw2ovjfzsfx3zptf470xhmeb|actionname:Calcul
                Score = CInt( Score ) * 2
                'project:Fenêtre_vierge1|function:Gris_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:wbcd7liahniw80r7a08q79p0s7siwlkfpoykow5olq0muoek7ie8gqzgzjmrwov3vcdjyrb5xxx0zgexuntvq2q71wczs7vjxn3f|actionname:Modifier une propriété d'un contrôle
                Me.label3.Text = "" & Score & ""
                'project:Fenêtre_vierge1|function:Gris_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:6nd291ro2m2nynsze558dgo61h2vmkazxws8f0bz7ucqofov5pzacu41dhb7kw6pdof9tkfe2uw70soipd864fqy3r933t3rhan8moqazr50wuq0rzaw8niqay5lyeoiqp3np11ln5zule7nfduxy5|actionname:Obtenir une propriété d'un contrôle
                coordelem = Me.Gris.Location
                'project:Fenêtre_vierge1|function:Gris_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:8hvz3233wepfg4ohgugdlciqx8kygaihv05hs8jpwsdpnht731w0ckpeolviu250bo89xeg8zoplo39bz77pbw6u1lx4mwpsolab1kyh32qt5yvt5b3ohmdjyeo1p2e6krflqwdzgfvf0ojo6cn10w|actionname:Modifier une propriété d'un contrôle
                Me.pictureBox2.Location = coordelem
                'project:Fenêtre_vierge1|function:Gris_Click|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:35uedmlw2ant7cgoxh1ewbi4hzmlk2qojnf6iwkgog5g2hmdiu1jxqlqq9g7km2chulcppp0mb5kbnwxbko0hs0z7fgguh7snxox|actionname:Exécuter une fonction d'un projet
                Me.animation()
            End If
        End Sub
       
        'Fonction animation
        'project:Fenêtre_vierge1|function:animation|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:animation
        Public Sub animation()
            'project:Fenêtre_vierge1|function:animation|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:9ergv463vrallq53pdrueacgw4227bimuea9c0ufhtf64xlmzg9nd0nr8ek9a1gkkhbhkmobphhx36llbv0cyh1gq4p8cvsxf938pb0gihdof0sg9iz99u0sj7x5unjbeujv0230jzymeo9vrmjtn5|actionname:Modifier une propriété d'un contrôle
            Me.pictureBox2.ImageLocation = "" & System.Windows.Forms.Application.StartupPath & "\artifice_011.gif"
            'project:Fenêtre_vierge1|function:animation|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:nr5tih5hupxwc8roavfwfeiuytfvzp3g2b6pw6pzmsooyryhwy|actionname:Modifier une propriété d'un contrôle
            Me.pictureBox2.Visible = True
            'project:Fenêtre_vierge1|function:animation|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:hri1w5z7zdyatn62vq6hlugtvdyd05azzntaixpq796f6a4hqo|actionname:Arrêter un Minuteur
            Me.timer1.Stop
            'project:Fenêtre_vierge1|function:animation|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:do2i2gcq2o9qj79kt0eul77adp0e8z7imuo3sxq73me0mod9ejdldo54w8bels252s069no4viw458nsm9bnja1f7taxk1v5isvaqcwkbowqfko0cmfihsfa2uckkgbky6q1quzkcdiqyj7oh1tqmy|actionname:Arrêter un Minuteur
            Me.timer3.Stop
            'project:Fenêtre_vierge1|function:animation|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:whndlawt13mvlhabz00i02e8061p264au8uv5r7rsuxzyztkmz|actionname:Démarrer un Minuteur
            Me.timer2.Start
        End Sub
       
        'Fonction timer2_Tick
        'project:Fenêtre_vierge1|function:timer2_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:timer2_Tick
        Public Sub timer2_Tick(ByVal sender As Object, ByVal e As System.EventArgs)
            'project:Fenêtre_vierge1|function:timer2_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:vwmiifzywbjuoujcwa9ku2fpa3fs2e45f81mgt0uy59my0itii|actionname:Modifier une propriété d'un contrôle
            Me.pictureBox2.Visible = False
            'project:Fenêtre_vierge1|function:timer2_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:faicj92yhmpqyzgb8hcmi5za1asbtgsxabkqpyf4ydwtrbczw7|actionname:Arrêter un Minuteur
            Me.timer2.Stop
            'project:Fenêtre_vierge1|function:timer2_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:6mdi312884gb3bpy0jxxjbxasuo0dvgeo3yzyeqmf1x6n70uxn|actionname:Démarrer un Minuteur
            Me.timer1.Start
            'project:Fenêtre_vierge1|function:timer2_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:4pfkksyv1ha5yvmwm7twxl5vr3ynoudlnr087784mve1pctahf|actionname:Démarrer un Minuteur
            Me.timer3.Start
        End Sub
       
        'Fonction déplacement
        'project:Fenêtre_vierge1|function:déplacement|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:déplacement
        Public Shared Function déplacement(ByVal coord As Object) As Object
            'project:Fenêtre_vierge1|function:déplacement|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:sra0vsjrs5j6rwbkkl6gwwjrz30bacykpyu0vtiuo1am79nklm|actionname:Modifier la valeur d'une variable
            coordonnee = coord
            'project:Fenêtre_vierge1|function:déplacement|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:v3pl38fea3jb3dvn4fno59yx8tok01gei86oqkci8e70esgegi|actionname:Obtenir une propriété d'une variable
            xa = CType(coordonnee,System.Drawing.Point).X
            'project:Fenêtre_vierge1|function:déplacement|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:wha6tdqiwx19ahgou7e6wyf6w0u5kqbb97xxey9hjcuh9f40i5|actionname:Obtenir une propriété d'une variable
            ya = CType(coordonnee,System.Drawing.Point).Y
            'project:Fenêtre_vierge1|function:déplacement|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:aatkjas29cjcwl6gyofd9xvtrwbn18jv1g8q3m56jdoax2ij7iz8a0b2dcamf75mcuxuu55j8un3hrvqqie1lybx7jok5097vi96|actionname:Commandes Visual Basic.Net
Dim Random As New Random()
trajec = Random.Next(0, 3)
            'project:Fenêtre_vierge1|function:déplacement|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:2gpcfnb8394j00fjkuivwy4pycdpqy8ka9nhy6k0jyk82narad|actionname:Si ... Alors ... Sinon
            If (xb = CInt(0)) Then
                'project:Fenêtre_vierge1|function:déplacement|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:piab0r1wlxdjpqoq8a8rap6l60bzjihykysatojlmfzaoxn5x9|actionname:Exécuter une fonction d'un projet
                xa = Me.collisionx(xa)
                'project:Fenêtre_vierge1|function:déplacement|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:spipzh8u0uwo5gl85207j6c60a9p3g625l8lhnr7ckw9xsfa8v|actionname:Calcul
                xa = CInt( xa ) + 10
            Else
                'project:Fenêtre_vierge1|function:déplacement|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:vz80hf2eify2ldva5djoy4vbd3i3avn7ox6w9cskhzzytyglz9|actionname:Si ... Alors ... Sinon
                If (xb = CInt(1)) Then
                    'project:Fenêtre_vierge1|function:déplacement|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:rsece34tgnchho5oju3th9ffonaqp9w3f3jxg0g5k9v1m8q0m2|actionname:Exécuter une fonction d'un projet
                    xa = Me.collisionx(xa)
                    'project:Fenêtre_vierge1|function:déplacement|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:spipzh8u0uwo5gl85207j6c60a9p3g625l8lhnr7ckw9xsfa8v5s22hrejl2455vhjdq7q7ip13s8otmno4d4ods8d0h0wsl2qai|actionname:Calcul
                    xa = CInt( xa ) - 10
                Else
                    'project:Fenêtre_vierge1|function:déplacement|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:drwirbgdw4tmcau3wcr8xx7m1703o97elyuas2qeb7bs1palm6|actionname:Si ... Alors ... Sinon
                    If (xb = CInt(2)) Then
                        'project:Fenêtre_vierge1|function:déplacement|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:8i80zjbmv3b2rabb051tappwvoui97p38nfnmb2abg4s5f0e9g|actionname:Exécuter une fonction d'un projet
                        ya = Me.collisiony(ya)
                        'project:Fenêtre_vierge1|function:déplacement|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:b5r2b2jf5wae26t7ryqvnk6v56vmbfno71syiny9k3axnkp45g|actionname:Calcul
                        ya = CInt( ya ) - 10
                    Else
                        'project:Fenêtre_vierge1|function:déplacement|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:fu3ihm6adi88m6cr58pg3gyx57bhxugupzvbcaksi2pj7qtq82|actionname:Si ... Alors ... Sinon
                        If (yb = CInt(3)) Then
                            'project:Fenêtre_vierge1|function:déplacement|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:hrj03b9e8dv77thpkypks449gb13jheg2h54ptdu90cehx8k8k|actionname:Exécuter une fonction d'un projet
                            ya = Me.collisiony(ya)
                            'project:Fenêtre_vierge1|function:déplacement|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:akn2lrw3ghzbi8jmtwqggq5s6w817svbod94zvsqgjnoc17n1g|actionname:Calcul
                            ya = CInt( ya ) + 10
                        End If
                    End If
                End If
            End If
            'project:Fenêtre_vierge1|function:déplacement|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:9nmdv1sh2atxa41o9v681ika19kwovvmy3j3i22okdjqvbjmrz|actionname:Retourner une valeur d'une fonction
            Return New System.Drawing.Point(xa, ya)
        End Function
       
        'Fonction timer3_Tick
        'project:Fenêtre_vierge1|function:timer3_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:timer3_Tick
        Public Sub timer3_Tick(ByVal sender As Object, ByVal e As System.EventArgs)
            'project:Fenêtre_vierge1|function:timer3_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:pnuzd09dxu534vl3x28740r7dwo5kce4lq2zr1dra54pbl78u0|actionname:Obtenir une propriété d'un contrôle
            coordonnee = Me.Rouge.Location
            'project:Fenêtre_vierge1|function:timer3_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:dsu6fyjncbff1hmt3u7mnc780qlo3uthacz7xl6dopwz92axkt|actionname:Exécuter une fonction d'un projet
            coordonnee = Me.déplacement(coordonnee)
            'project:Fenêtre_vierge1|function:timer3_Tick|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:nj3dg2yosj74gx3gl5yhl6v1fk8ny3veneopojtuy2q9nm8cw7|actionname:Modifier une propriété d'un contrôle
            Me.Rouge.Location = coordonnee
        End Sub
       
        'Fonction collisionx
        'project:Fenêtre_vierge1|function:collisionx|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:collisionx
        Public Shared Function collisionx(ByVal x As Object) As Object
            'project:Fenêtre_vierge1|function:collisionx|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:ov2dyrcl58lgyk658grqd0u9qtd6rlorpqoi0sgmwctyy200exh5zi6khn272zcno8g8s3tqmf70025jk3kvk8ze1zcc09sqau6a|actionname:Modifier la valeur d'une variable
            xb = x
            'project:Fenêtre_vierge1|function:collisionx|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:0ghxoa1jf0i1isug5j6d82qj2olxbrtz9yi63vxmp1oestair91t2iyhy6x3vsafqq62k8xdpnba4g8t4t50hvqdh3rwgtxdcff4|actionname:Si ... Alors ... Sinon
            If (xb >= CInt(1206)) Then
                'project:Fenêtre_vierge1|function:collisionx|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:9ig5sdpdga0wl7524zxbnkl5xrd58f1d80678b7v06zxw1bhwf|actionname:Calcul
                xb = CInt( xb ) - 10
            Else
                'project:Fenêtre_vierge1|function:collisionx|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:9ig5sdpdga0wl7524zxbnkl5xrd58f1d80678b7v06zxw1bhwfj8qk35xknuhptndk21ikwvuawngq314z7ft42a1c47je6c89mi|actionname:Calcul
                xb = CInt( xb ) + 10
            End If
            'project:Fenêtre_vierge1|function:collisionx|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:rc9113t7x3mjutbvrgj6gyfmpgkhjzzh7be4u42o1881uhh5vi|actionname:Si ... Alors ... Sinon
            If (xb <= CInt(0)) Then
                'project:Fenêtre_vierge1|function:collisionx|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:9ig5sdpdga0wl7524zxbnkl5xrd58f1d80678b7v06zxw1bhwfj8qk35xknuhptndk21ikwvuawngq314z7ft42a1c47je6c89mi482xeztks5obp4uw1654kia1z3csuzelxqhirgu9kdbg0l5vq6|actionname:Calcul
                xb = CInt( xb ) + 10
            Else
                'project:Fenêtre_vierge1|function:collisionx|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:9ig5sdpdga0wl7524zxbnkl5xrd58f1d80678b7v06zxw1bhwfqdj960nqa4lzrfnrp2nk60k9bpqhe277k75e1rv2lmunctzamq|actionname:Calcul
                xb = CInt( xb ) - 10
            End If
            'project:Fenêtre_vierge1|function:collisionx|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:im3rbjeoyxpohs1dtqizufdww6qghr426tu6uy857i5r0hsenk|actionname:Retourner une valeur d'une fonction
            Return xb
        End Function
       
        'Fonction collisiony
        'project:Fenêtre_vierge1|function:collisiony|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:collisiony
        Public Shared Function collisiony(ByVal y As Object) As Object
            'project:Fenêtre_vierge1|function:collisiony|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:ov2dyrcl58lgyk658grqd0u9qtd6rlorpqoi0sgmwctyy200exh5zi6khn272zcno8g8s3tqmf70025jk3kvk8ze1zcc09sqau6au8eeivu775lnqmqe257m6sdkqwlgtr2corki6shwxzlvfgiani8mzxa88qql1kr3a1t20toz2tsep8t5fphpyepdcjtusn7s2147|actionname:Modifier la valeur d'une variable
            yb = y
            'project:Fenêtre_vierge1|function:collisiony|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:dsd5g5odg8linv14lb28xi0cc1l35y7cidjtok6go52hxoqhnbl0s7o8r2x4eisxp8x6khufvexy8znoosw5xlw3kiyun5qqj6sf|actionname:Si ... Alors ... Sinon
            If (yb <= CInt(46)) Then
                'project:Fenêtre_vierge1|function:collisiony|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:lws34h3moa9fkwrw4ony3geskeitr0v28nsjcnu82wgqog0yeh|actionname:Calcul
                yb = CInt( yb ) + 10
            Else
                'project:Fenêtre_vierge1|function:collisiony|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:lws34h3moa9fkwrw4ony3geskeitr0v28nsjcnu82wgqog0yehfqosb3z5pyfnpc9jfb0zu7mf4ui8un864yiqzjaa6t7g5mx5yz|actionname:Calcul
                yb = CInt( yb ) - 10
            End If
            'project:Fenêtre_vierge1|function:collisiony|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:2bcnsol42azof2b8i1v7wa4mhvha71v1jovb1djc96b1htadoi2467k0bqz6is7u3o9r57utorqinumlgk9pnmkivbov350ey8v9|actionname:Si ... Alors ... Sinon
            If (yb >= CInt(736)) Then
                'project:Fenêtre_vierge1|function:collisiony|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:mbbg0ayxtpmmy2r2kq8dswoenj6wjyv2hcb7xokxnxtc1cdhc8|actionname:Calcul
                yb = CInt( yb ) - 10
            Else
                'project:Fenêtre_vierge1|function:collisiony|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:mbbg0ayxtpmmy2r2kq8dswoenj6wjyv2hcb7xokxnxtc1cdhc8e8bbg5ktk904ziv14qqyxn94yg92cnuv4zc4psc3yfbt548o3u|actionname:Calcul
                yb = CInt( yb ) + 10
            End If
            'project:Fenêtre_vierge1|function:collisiony|file:D:\Users\JN\Documents\Mes Projets SoftwareZator\Solution2\Fenêtre_vierge1\WindowsForm1.szw|actionid:9v7feqlcbb6529jthha0025nsjljjd6wnvbhrx4m6mpxyckkr2|actionname:Retourner une valeur d'une fonction
            Return yb
        End Function
    End Class
End Namespace

Namespace Fenêtre_vierge1.My
   
    Partial Friend Class MyApplication
        Inherits Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase
       
        <System.Diagnostics.DebuggerStepThroughAttribute()>  _
        Public Sub New()
            MyBase.New(Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
            Me.IsSingleInstance = false
            Me.EnableVisualStyles = true
            Me.SaveMySettingsOnExit = true
            Me.ShutdownStyle = Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
        End Sub
       
        <System.Diagnostics.DebuggerStepThroughAttribute()>  _
        Protected Overrides Sub OnCreateMainForm()
            Me.MainForm = Variables.Fenêtre1
        End Sub
    End Class
End Namespace



NameSpace Fenêtre_vierge1
  Module Variables
      Public _manager As My.MyApplication = New My.MyApplication
      Public _computer As Microsoft.VisualBasic.Devices.Computer = New Microsoft.VisualBasic.Devices.Computer
      Public coordelem As New System.Object '
      Public coordonnee As New System.Object '
      Public couleurs As New System.Collections.Generic.List(Of System.Object) '
      Public couleursortie As New System.Object '
      Public gkj As New System.Object '
      Public Score As New System.Object '
      Public trajec As New System.Object '
      Public xa As New System.Object '
      Public xb As New System.Object '
      Public ya As New System.Object '
      Public yb As New System.Object '
      Private _Fenêtre1 As New Global.Fenêtre_vierge1.Fenêtre1()
      Public Property Fenêtre1 As Global.Fenêtre_vierge1.Fenêtre1 ' Window Fenêtre1
          Get
              If _Fenêtre1.IsDisposed Then _Fenêtre1 = New Global.Fenêtre_vierge1.Fenêtre1()
              Return _Fenêtre1
          End Get
          Set(ByVal value As Global.Fenêtre_vierge1.Fenêtre1)
              _Fenêtre1 = value
          End Set
      End Property
  End Module
End NameSpace

si quelqu'un pourait m'aider Wink
Merci d'avance


Dernière édition par polien le Ven 18 Mai 2012 - 19:39, édité 2 fois
avatar
lereparateurdepc


Masculin Nombre de messages : 5517
Age : 24
Localisation : Calvados
Emploi/loisirs : Electrotechnicien / électricité, HAUTE TENSION, électronique, informatique, automatisme , Arduino, bref le BRICOLAGE , ...
Humeur : toujours cool
Date d'inscription : 31/01/2010

Re: problème dans une fonction [RESOLU]

Message par lereparateurdepc le Ven 18 Mai 2012 - 19:10

re ,

Je pense que tu as plusieurs Form et que depuis une Form , tu en modifie une autre

Peut-tu mettre le code contenu aux ligne d'erreur stp ? je pense pouvoir y voir plus clair .

Il me semble avoir déjà eu un problème similaire sous VB .

Cordialement ,
Le réparateur de PC



Modérateur & Administrateur du forum
Merci de contacter les membres par MP ou mail que pour "urgences". Le forum est fait pour ça. Merci

@ Contact : franleboss@gmail.com  Smile
Arrow  Visitez mon site : désolé l'hébergeur à fermé Sad

Ma chaine tutube : https://www.youtube.com/channel/UC7iU59NNAHz-tW5wqcgONHA


avatar
polien


Masculin Nombre de messages : 2871
Age : 21
Localisation : Bouches du Rhones
Emploi/loisirs : velo, informatique, électronique, robotique, modélisme feroviaire
Humeur : Je commence tout mais ne finit rien :P
Date d'inscription : 19/05/2011

Re: problème dans une fonction [RESOLU]

Message par polien le Ven 18 Mai 2012 - 19:18

re,

non je n'ai qu'une form...
en fait l'erreur ne s'affiche plus (et sa marche) quand je remplace:
Code:
xa = Me.collisionx(xa)
par
Code:
xa = collisionx(xa)

sa doit être le 'Me' qui pose problème
résolu donc comme sa marche...



Cordialement,
Polien.

You want to have an english help for Software Zator ? Let's try to read the first tutorial in english Wink : CLIC HERE
BESOINS D'UN TUTO? CONSULTER LE SOMMAIRE !

Débutez avec SZ avec les tutos en pdf !

Contenu sponsorisé

Re: problème dans une fonction [RESOLU]

Message par Contenu sponsorisé


    La date/heure actuelle est Mer 18 Oct 2017 - 7:22