damdam2801
Messages postés15Date d'inscriptionmercredi 6 décembre 2000StatutMembreDernière intervention12 avril 2008
-
30 mars 2008 à 18:37
damdam2801
Messages postés15Date d'inscriptionmercredi 6 décembre 2000StatutMembreDernière intervention12 avril 2008
-
30 mars 2008 à 23:26
Bonjour a tous voilà j' ai parcourus le forum, les tutos et le site de long en marge et en travers sans réussir a résoudre mon problème...
je voudrais faire une variable qui s'applique a une forme entière (ici la variable a) voici mon code :
Public Class Form1
Public a As String
. .
Public Sub bouttonrouge_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bouttonrouge.Click
a = a + 1
End Sub
. .
Public Sub form1()
If a = 1 Then
PictureBox3.Image = list.Images(1)
PictureBox3.Visible = True
End If
End Sub
End Class
seulement quand je clic sur le bouttonrouge le if de public sub form 1() ne s'execute pas pourriez vous m'aider
merci
nhervagault
Messages postés6063Date d'inscriptiondimanche 13 avril 2003StatutMembreDernière intervention15 juillet 201137 30 mars 2008 à 20:58
C'est une nouvelle methode qui sert à factoriser les appels à son contenu
que pour ces derniers soit appelé depuis le constructeur (form1)
ou depuis le click sur le bouton
Mais l'appel à partir du form1 est inutile car normalement a = 0.
Cycle de vide de ton appli
initialisation variable globale a = 0
constructeur
appel newmathode - mais rien est fait car a = 0
pas d'appel au constructeur (form1)
clic bouton --> a = 1
appel newmethode - travail car a = 1
deuxieme click bouton --> a=2
appel newmethode --> pas de travail car a = 2
damdam2801
Messages postés15Date d'inscriptionmercredi 6 décembre 2000StatutMembreDernière intervention12 avril 2008 30 mars 2008 à 20:26
excuse moi mais je débute en programation...
pourrais tu s'il te plait me montrer ce que tu veux me dire dans mon code s'il te plait
merci
Public Class Form1
Public a As String
.
.
Public Sub bouttonrouge_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bouttonrouge.Click
a = a + 1
End Sub
.
.
Public Sub form1()
If a = 1 Then
PictureBox3.Image = list.Images(1)
PictureBox3.Visible = True
nhervagault
Messages postés6063Date d'inscriptiondimanche 13 avril 2003StatutMembreDernière intervention15 juillet 201137 30 mars 2008 à 20:31
Voila un code
Public Class Form1
Private a As Integer = 0
.
.
Public Sub bouttonrouge_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bouttonrouge.Click
a = a + 1
manewmathode()
End Sub
.
private sub manewmathode()
If a = 1 Then