Discussion :

[Goupo]

Salut,

J'ai une fonction mais je n'arrive pas à faire le return. Comment ça marche en VB6?

Merci.

Code :

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

1
2
3
4
5
6
7
8
9
10
Public Function estTermine()
Private control As Boolean
control = False
    For i = 1 To 9
        If LesCases(i) <> 0 Then
            control = False
        End If
    Next i
Return control
End Function

[Vld44]

Salut à toi,

Code :

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

1
2
3
4
5
6
7
8
9
10
Public Function estTermine() as boolean
Private control As Boolean
    control = False
    For i = 1 To 9
        If LesCases(i) <> 0 Then
            control = False
        End If
    Next i
    estTermine = control
End Function

[Goupo]

Merci!