VB.Net Variable Static?? [Résolu]

Messages postés
929
Date d'inscription
vendredi 10 novembre 2000
Statut
Membre
Dernière intervention
10 septembre 2010
- - Dernière réponse : cs_Stephane33
Messages postés
630
Date d'inscription
samedi 15 février 2003
Statut
Modérateur
Dernière intervention
9 octobre 2011
- 8 nov. 2007 à 22:27
Salut à tous...

J'ai un petit problème pour préserver les valeurs de 2 variables Static.

J'ai un bouton... quand j'appuis la premiere fois dessus, il va dans un condition et rempli 2 variables. Lorsque j'appuis sur le même bouton une deuxième fois, il entre dans un autre condition et rempli 2 autres varaibles.

Par la suite je veux utiliser les 4 variable pour faire mon truc.

Le problème c'est que le résultats de 2 varaibles ne sont pas préservé et vallent 0. Je perd l'information des variable CoordX1 et CoordY1

Merci d'avance

Static CoordY1
As
Single, CoordX1
As
Single
Dim CoordY2
As
Single, CoordX2
As
Single
If

CountTracer =
False
Then 'Premier Click sur le Bouton
   CoordX1 = ((Convert.ToDouble(LigneSplit(2)) + Facteur) - ValMinX) * (X_initial / (ValMaxX - ValMinX))
   CoordY1 = Y_initial - ((Convert.ToDouble(LigneSplit(1) + Facteur)) - ValMinY) * (Y_initial / (ValMaxY - ValMinY))

Else 'Deuxième Click sur le bouton
CoordX2 = ((Convert.ToDouble(LigneSplit(2)) + Facteur) - ValMinX) * (X_initial / (ValMaxX - ValMinX))
CoordY2 = Y_initial - ((Convert.ToDouble(LigneSplit(1) + Facteur)) - ValMinY) * (Y_initial / (ValMaxY - ValMinY))

End
If
Est-ce que mon problème est relié au Compact Framwork ???
Afficher la suite 

1 réponse

Meilleure réponse
Messages postés
630
Date d'inscription
samedi 15 février 2003
Statut
Modérateur
Dernière intervention
9 octobre 2011
3
Merci
Comment sont déclarées tes variables
Avant les fonctions et procédures, elles sont exploitables dans ta class(form) si elles sont déclarées Private ou Dim
Elles sont déclarée dans une class ou un module en Public elles sont accessibles depuis ton projet.
Elles sont déclarées dans une fonction ou une procédure, elles disparaissent à la fin de l'exécution de cette fonction ou procédure

Dim Variable1 as string  'Visible que dans ma Class
Public Variable2 as String 'visible dans mon projet

Private Function MaFonction() as string
Dim Variable3 as string   'Visible que dans cette fonction
.................
For i = 0 to 25
 Dim Variable4 as string 'Visible que dans cette boucle
 ............
 ............
Next i
................
End Function

Le savoir n'est que le filtre de l'experience

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 206 internautes nous ont dit merci ce mois-ci

Commenter la réponse de cs_Stephane33