Infos composants

Signaler
Messages postés
1284
Date d'inscription
mardi 28 octobre 2003
Statut
Contributeur
Dernière intervention
3 juillet 2015
-
Messages postés
1284
Date d'inscription
mardi 28 octobre 2003
Statut
Contributeur
Dernière intervention
3 juillet 2015
-
Bonjour,

Pour contrôler que tous les champs d'un formulaire (contenant des textbox et combobox) sont renseignés, j'ai fait deux fonctions :

' *************************************
' * Controle validité contenu textbox *
' *************************************
Private Function CheckTextBox(stParam As String, tbCtrl As TextBox, bControlOK As Boolean) As Boolean
Dim bResult As Boolean

bResult = True
If bControlOK And IsNull(tbCtrl.Value) Then
MsgBox "Veuillez renseigner le champ """ & stParam & """"
bResult = False
End If
CheckCtrl = bResult
End Function

' *************************************
' * Controle validité contenu textbox *
' *************************************
Private Function CheckComboBox(stParam As String, cbCtrl As ComboBox, bControlOK As Boolean) As Boolean
Dim bResult As Boolean

bResult = True
If bControlOK And stValue = "" Then
MsgBox "Veuillez renseigner le champ """ & stParam & """"
bResult = False
End If
CheckCtrl = bResult
End Function

Ma question est la suivante : Existe-t-il un contrôle parent commun au textbox et au combobox qui me permettrait de ne faire qu'une seule fonction ?
Plus généralement, existe-t-il quelque part une arborescence des composants (visuels et non visuels) ?

Simon

1 réponse

Messages postés
1284
Date d'inscription
mardi 28 octobre 2003
Statut
Contributeur
Dernière intervention
3 juillet 2015
13
infos complémentaires

MS visual basic 6.3
Access 2007

Simon