Déclaration variable global en VB6

phenX Messages postés 704 Date d'inscription mercredi 4 mai 2005 Statut Membre Dernière intervention 28 août 2012 - 9 nov. 2005 à 16:18
ScSami Messages postés 1488 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 décembre 2007 - 9 nov. 2005 à 17:23
bonjour,



voila, j'ai un TextBox avec une valeur entré par l'utilisateur, comment faire pour:

la déclarer en variable global (genre VARIABLAUT=a)



Merci

2 réponses

cs_Jack Messages postés 14006 Date d'inscription samedi 29 décembre 2001 Statut Modérateur Dernière intervention 28 août 2015 79
9 nov. 2005 à 16:48
Salut
le terme Global est obsolète, utilise Public
Public ne s'utilise que dans les modules.
Si tu n'en as pas dans ton projet, ajoutes-en un juste pour cette déclaration
Public maVariable As String
Il te suffiras de faire le transfert TextBox vers variable au moment opportun :
maVariable = monTextBox.Text

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage. (Socrate)
0
ScSami Messages postés 1488 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 décembre 2007 24
9 nov. 2005 à 17:23
Tu ne peux pas déclarer des variables en cours d'exécution de ton code.
Autrement dit, ton programme est comme "encapsulé" dans son processus et les utilisateurs n'ont accès qu'a l'interface graphique et ne peuvent donc en aucun cas "programmer" ton programme, donc, ne peuvent pas déclarer des variables.

En revanche, tu peux prévoire à l'avance la variable dans ton code. Et, si l'utilisateur est suceptible de rentrer plusieurs variables, tu peux tout simplement les stocker dans un tableau dynamique (à taille variable donc).

Public varPredefinit

Private Sub Button1_Click()
varPredefinit = Text1.Text
End Sub

Soit plus précis dans tes questions s'il te plait !
Donne toi la peinne de perdre le temps que nous perdons pour toi en réponse !

Enjoy

<hr size="2" width="100%">
( Si une réponse vous convient, cliquez sur le bouton "Réponse acceptée". )
0
Rejoignez-nous