Est-il possible de passer des paramètres par référence en VB 6 ?

Version imprimable

21/09/2008, 13h35
beegees

Est-il possible de passer des paramètres par référence en VB 6 ?

Bonjour tout le monde,

Je débute en VB mais j'ai des connaissances de C, C++ et JAVA.

Sauriez-vous me dire si comme en C++, on peut passer un paramètre par référence en VB ?

J'aimerais envoyer "s" qui est un numéro de ligne à la procédure B qui va augmenter le s (ou le diminuer) et ensuite, quand je reviendrais dans la procédure de départ (A), le s devrait avoir la valeur modifiée dans la procédure B.

C'est faisable en Visual Basic 6 ?

Merci d'avance pour votre aide.

beegees
21/09/2008, 13h40
OhMonBato

Tu peux soit faire une sub en passant ta valeur en paramètres ou bien une fonction qui renverra la valeur calculée.
regarde un peu l'aide sur Sub et Function. Tu as sinon un lien sur des tutos dans ma signature.

b'jr

en VB les paramètres sont transmis par référence par défaut :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
Private Sub Command1_Click()
 Dim iNumLigne As Integer
 iNumLigne = 2
 MsgBox "AVANT " & iNumLigne
 MaSub1 iNumLigne
 MsgBox "Apres Mas sub 1 : " & iNumLigne
 MaSub2 iNumLigne
 MsgBox "Apres Mas sub 2 : " & iNumLigne
 MaSub3 iNumLigne
 MsgBox "Apres Mas sub 3 : " & iNumLigne
 
End Sub
 
Sub MaSub1(i As Integer)
   i = i + 1
End Sub
Sub MaSub2(ByRef i As Integer) 'Paramètre par référence
   i = i + 10
End Sub
Sub MaSub3(ByVal i As Integer) ' paramètre par valeur
   i = i + 100
End Sub

le mot clef byRef te permet d'afficher de façon plus explicite le passage de paramètre par référence.

Citation:

Envoyé par OhMonBato

Tu peux soit faire une sub en passant ta valeur en paramètres ou bien une fonction qui renverra la valeur calculée.
regarde un peu l'aide sur Sub et Function. Tu as sinon un lien sur des tutos dans ma signature.

Bonjour,

Merci pour ta réponse et surtout pour tes tutos que je vais m'empresser d'aller voir.

Encore un grand merci à toi.

beegees
Citation:
Envoyé par bbil
b'jr

en VB les paramètres sont transmis par référence par défaut :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 Private Sub Command1_Click() Dim iNumLigne As Integer iNumLigne = 2 MsgBox "AVANT " & iNumLigne MaSub1 iNumLigne MsgBox "Apres Mas sub 1 : " & iNumLigne MaSub2 iNumLigne MsgBox "Apres Mas sub 2 : " & iNumLigne MaSub3 iNumLigne MsgBox "Apres Mas sub 3 : " & iNumLigne End Sub Sub MaSub1(i As Integer) i = i + 1 End Sub Sub MaSub2(ByRef i As Integer) 'Paramètre par référence i = i + 10 End Sub Sub MaSub3(ByVal i As Integer) ' paramètre par valeur i = i + 100 End Sub
le mot clef byRef te permet d'afficher de façon plus explicite le passage de paramètre par référence.
Bonjour,

Merci pour ta réponse très claire et surtout pour cet exemple qui l'accompagne.

J'ai grâce à cela, très bien compris maintenant.

Encore un super grand merci et à très bientôt (vous me verrez assez souvent ici car j'ai pendant une année un cours de VB6).

Bon Dimanche.

beegeees