Bonjour,
Je tourne en round, j'ai une classe cCalculatrice :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26 Public Class cCalculatrice Dim Pile0 As Decimal Dim Pile1 As Decimal Dim Resultat As Decimal Dim Operateur As Char Sub Addition(ByVal dNb As Decimal) Pile0 = dNb Operateur = "+" End Sub Sub Egal(ByVal dNb As Decimal) Pile1 = dNb Operation() End Sub Sub Operation() Select Case Operateur Case "+" Resultat = Pile0 + Pile1 Case Else Resultat = 0 End Select End Sub End Class
Je cherche un moyen de rajouter à cette classe une méthode Get pour recuperer la valeur Resultat, par ex:
Code:
1
2
3
4
5
6
7 Class Form1 Dim Calculatrice as cCalculatrice Dim Nb as Decimal Nb = Calculatrice.Get() End Class
Je debute avec le Vb, et je n'arrive pas à comprendre comment on se sert de Get avec ce langage. Quelqu'un pourrait-il m'aider?
Merci d'avance
Menontona