Amélioration d'une fonction reset
Bonjour, voici mon code pour la fonction RAZ de mon formulaire de saisie
Private Sub RAZ_Click()
Dim v As Control
Dim u As Variant
For Each v In Me.Controls
If v.Properties("controltype") = 109 Then
v = ""
End If
Next v
End Sub
mon problème est qu'il plante car j'ai des masque de saisie et que mes champs texte n'accepte pas les valeurs nulle comment faire
merci d'avance
Private Sub RAZ_Click()
Dim v As Control
Dim u As Variant
For Each v In Me.Controls
If v.Properties("controltype") = 109 Then
v = ""
End If
Next v
End Sub
mon problème est qu'il plante car j'ai des masque de saisie et que mes champs texte n'accepte pas les valeurs nulle comment faire
merci d'avance
Configuration: Windows XP Safari 530.5
