Discussion :

[stracoma]

Bonsoir à vous.
extrait du tuto de Plasserre:


J'ai essayé cet exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
Public Class Class1
    Public age As Integer
    Public Sub New()
    End Sub
 
End Class

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
Module Module1
 
    Sub Main()
        Dim c1 As New Class1
        Dim c2 As New Class1
        c2.age = 40
        c1.age = c2.age
        c1.age = 50
 
        Console.WriteLine(c1.age)
        Console.WriteLine(c2.age) 'donne 40, alors que je m'attends à 50
        Console.ReadKey()
 
    End Sub
 
End Module

D'après le Tuto si je change C1.age, C2.age devrait changer, n'est ce pas?

[rv26t]

Bonjour,

Il faut affecter les instances (objets) pas les propriétés

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

        c1 = c2

[Sehnsucht]

D'après le Tuto si je change C1.age, C2.age devrait changer, n'est ce pas?

Non, d'après le tuto si tu changes C1 par C2 (l'objet entier) alors la modification de l'age de l'un sera répercutée sur l'autre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Module Module1
 
    Sub Main()
        Dim p1, p2 As Person
        p1 = New Person
        Console.WriteLine(p1.Age) ' 0
        p2 = p1
        p2.Age = 42
        Console.WriteLine(p1.Age) ' 42
    End Sub
 
End Module
 
Class Person
    Public Property Age As Integer
End Class

[clementmarcotte]

Bonjour,

Sauf erreur de ma part, la notion de passage par valeur ou de passage par référence n'intervient que quand une procédure transmet des valeurs à une autre.

Supposons que par esprit de faire du zèle tu aies quelque chose de ce genre:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
sub LesCalculs()
   dim nombre as double = 2
   LaRacineCarrée(Nombre)
end sub

Version 1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Sub LaRacineCarrée(ByVal Nombre as double)
     Nombre = Nombre +1
     dim Réponse as double = sqr(Nombre)
end sub

Version 2

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Sub LaRacineCarrée(ByRef Nombre as double)
   Nombre = Nombre +1
   dim Réponse as double = sqr(Nombre)
end sub

Dans le cas de la version 1, avec un passage par valeur la valeur de nombre dans LesCalculs est toujours à 2, peu importe ce qui se passe avec le "Nombre" dans LaRacineCarrée.

Dans le cas de la version 2, avec un passage par référence, la valeur de nombre dans LesCalculs deviens 3, parce que, "Nombre" dans LaRacineCarrée est devenu 3.

Cependant, cela vaut la peine de signaler en complément que, dans VB.net, le passage se fait par valeur, par défaut, alors qu'en VB6 - VBA, le passage se fait par référence, par défaut. Donc, toute personne qui fait un Copier-Coller dans VB.net d'une procédure ramassée sur un site consacré à VB6 ou à VBA, doit être très prudent, dans son passage de paramètres.

[stracoma]

Ok, je vois ma faute. (affecter les objets et non leurs paramètres)
Merci

[rv26t]

la notion de passage par valeur ou de passage par référence n'intervient que quand une procédure transmet des valeurs à une autre.

Ce n'est pas le sujet de la question.
La question porte sur les types des variables, valeur ou référence.
L'instance d'une classe est référencée par une variable de type référence.
Un boolean, un entier, une structure sont des variables de type valeur (contiennent une valeur).
Voir dans ma signature La mémoire en .NET - Qu'est-ce qui va où ?

VB est permissif à ce sujet

[Sehnsucht]

VB est permissif à ce sujet

On peut avoir plus d'infos sur ce point précis ?

[rv26t]

VB accepte (je suis en version 2010)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Option Explicit On
Option Strict On ' idem si défini dans projet
Public Class Form1
    Dim b As Boolean = Nothing
End Class

Alors que C# en écrivant ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
        private void Form1_Load(object sender, EventArgs e)
        {
            Bool b = null;
        }

indique immédiatement un message d'erreur

Impossible de convertir Bool en null, car il s'agit d'un type valeur qui n'autorise pas les valeurs null

[Sehnsucht]

Oui et c'est tout à fait normal ; Nothing n'a jamais vraiment été l'équivalent de null mais plutôt quelque chose s'approchant de default(type)voir documentation de Nothing dont la première ligne dit bien (pour ceux qui auraient la flemme d'ouvrir le lien )

Représente la valeur par défaut d'un type de données. Pour les types référence, la valeur par défaut est la référence d' null . Pour les types valeur, la valeur par défaut varie selon que le type valeur est nullable.

[rv26t]

Oui, c'est vrai. Il faut le déclarer Dim bn As Nullable(Of Boolean) pour qu'il permette l'équivalent de null, valeur non définie . Merci d'avoir repréciser.