Soyez le premier à donner votre avis sur cette source.
Vue 7 445 fois - Téléchargée 478 fois
' --= =-- ' Déclaration de la classe Dim clGestionErreur As New ClasseGestionErreur Private Sub ValideSaisies() ' Enregistrer la combobox clGestionErreur.cboListeErreur = Me.tscboListeErreur ' Ajouter contrôle à vérifier clGestionErreur.VerifierCtrl(Me.Textbox1, "TextBox1 - Une saisie est requise.", Me.TabPage1) Dim i() As Integer = {1, 2} clGestionErreur.VerifierDgv(Me.DataGridView1, i, "DataGridView1 - Une saisie est requise.", Me.TabPage3) End Sub ' --= =-- ' A la sortie du contrôle If Me.tscboListeErreur.Items.Count > 0 Then ' Vérification de la saisie ValideSaisies() End If ' --= =-- Pour l'exemple et le reste du code, Cf. Zip
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.