M
Manu64
Guest
Bonjour,
Comment passer un TextBox en argument dans une fonction, S.V.P. ?
Merci d'avance
ex de ce que je cherche à faire
Function Valeur_Ok (Zone as TextBox) as Boolean
If Zone.value <> 5 ...........
End Function
Sub TextBox1_Change()
Ret =Valeur (TextBox1)
End Sub
Sub TextBox2_Change()
Ret =Valeur (TextBox2)
End Sub
etc...
Merci d'avance.
EX-CNRE
Comment passer un TextBox en argument dans une fonction, S.V.P. ?
Merci d'avance
ex de ce que je cherche à faire
Function Valeur_Ok (Zone as TextBox) as Boolean
If Zone.value <> 5 ...........
End Function
Sub TextBox1_Change()
Ret =Valeur (TextBox1)
End Sub
Sub TextBox2_Change()
Ret =Valeur (TextBox2)
End Sub
etc...
Merci d'avance.
EX-CNRE