Discussion :

[skillipo]

Bonjour,

je suis debutant en access , je voudrais creer une function qui me reenvoi un entier un peux comme :

Code :

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

1
2
3
4
5
 
Public function toto(chiffre As integer)
Dim compteur As integer
 
return  compteur

La meme chose en VBA .

MERCI

[Lou Pitchoun]

Salut,

'Simplement' comme ça

Code :

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

1
2
3
4
5
Public function toto(chiffre As integer) as Integer
Dim compteur As integer
 
toto = compteur
end function

[skillipo]

Merci et comment faire de l'autre function pour recupere les resultat de Test :

Genre :

Code :

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

1
2
3
4
5
6
7
8
9
sub toto()

........
Test(argument)

recupere la valeure de Test

End Sub

MERCI

[Lou Pitchoun]

Comme ça

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
sub toto()
 
Dim mavariable as type_de_retour
........
mavariable = Test(argument)
 
End Sub
 
Function test () as type_de_retour
 
test = variable
 
End Function

[Lou Pitchoun]

Tu as pleins de tutos sur le VBA ici.